diff options
| author | pfg github <[email protected]> | 2015-03-08 09:18:40 -0700 |
|---|---|---|
| committer | pfg github <[email protected]> | 2015-03-08 09:18:40 -0700 |
| commit | a3db778746af40eb9f9ec2cccfb3c935164600f5 (patch) | |
| tree | 6fd5220c1283aeb448d4b67c8c122f78d2a7a8dc | |
| parent | bfd7c782b02bce11bb07cc228e5d0775ad0d98d5 (diff) | |
| download | shiftos-a3db778746af40eb9f9ec2cccfb3c935164600f5.tar.gz shiftos-a3db778746af40eb9f9ec2cccfb3c935164600f5.tar.bz2 shiftos-a3db778746af40eb9f9ec2cccfb3c935164600f5.zip | |
Full Source
| -rw-r--r-- | .gitattributes | 17 | ||||
| -rw-r--r-- | .gitignore | 42 | ||||
| -rw-r--r-- | Bitnote Address generator.exe | bin | 0 -> 32256 bytes | |||
| -rw-r--r-- | CustomColorTable.vb | 330 | ||||
| -rw-r--r-- | File Opener.resx | 322 | ||||
| -rw-r--r-- | File Saver.resx | 322 | ||||
| -rw-r--r-- | File Skimmer.resx | 322 | ||||
| -rw-r--r-- | File Skimmer.vb | 661 | ||||
| -rw-r--r-- | LICENSE.MD | 54 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher.sln | 20 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/App.config (renamed from App.config) | 0 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.Designer.vb | 108 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.resx | 760 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.vb | 36 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.Designer.vb | 114 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.resx | 760 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.vb | 123 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Application.Designer.vb | 38 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Application.myapp | 10 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/AssemblyInfo.vb | 35 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.Designer.vb | 62 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.resx | 117 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.Designer.vb (renamed from My Project/Settings.Designer.vb) | 6 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.settings (renamed from My Project/Settings.settings) | 0 | ||||
| -rw-r--r-- | ShiftOS Launcher/ShiftOS Launcher/ShiftOS Launcher.vbproj | 136 | ||||
| -rw-r--r-- | ShiftOS Save File Converter.vb | 215 | ||||
| -rw-r--r-- | ShiftOS.sln | 25 | ||||
| -rw-r--r-- | ShiftOS/API.vb (renamed from API.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/App.config | 18 | ||||
| -rw-r--r-- | ShiftOS/ApplicationEvents.vb (renamed from ApplicationEvents.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/ArtPad.Designer.vb (renamed from ArtPad.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/ArtPad.resx (renamed from ArtPad.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/ArtPad.vb (renamed from ArtPad.vb) | 269 | ||||
| -rw-r--r-- | ShiftOS/Audio Player.Designer.vb (renamed from Audio Player.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Audio Player.resx (renamed from Audio Player.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Audio Player.vb (renamed from Audio Player.vb) | 246 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Digger.Designer.vb (renamed from Bitnote Digger.Designer.vb) | 98 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Digger.resx (renamed from Bitnote Digger.resx) | 3 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Digger.vb | 493 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Wallet.Designer.vb (renamed from Bitnote Wallet.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Wallet.resx (renamed from Bitnote Wallet.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Bitnote Wallet.vb (renamed from Bitnote Wallet.vb) | 262 | ||||
| -rw-r--r-- | ShiftOS/Calculator.Designer.vb (renamed from Calculator.Designer.vb) | 19 | ||||
| -rw-r--r-- | ShiftOS/Calculator.resx (renamed from Calculator.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Calculator.vb (renamed from Calculator.vb) | 324 | ||||
| -rw-r--r-- | ShiftOS/Clock.Designer.vb (renamed from Clock.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Clock.resx (renamed from Clock.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Clock.vb (renamed from Clock.vb) | 257 | ||||
| -rw-r--r-- | ShiftOS/Colour Picker.Designer.vb (renamed from Colour Picker.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Colour Picker.resx (renamed from Colour Picker.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Colour Picker.vb (renamed from Colour Picker.vb) | 275 | ||||
| -rw-r--r-- | ShiftOS/CustomColorTable.vb | 330 | ||||
| -rw-r--r-- | ShiftOS/Custom_Menu.Designer.vb | 486 | ||||
| -rw-r--r-- | ShiftOS/Custom_Menu.resx (renamed from infobox.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Custom_Menu.vb | 3 | ||||
| -rw-r--r-- | ShiftOS/Dodge.Designer.vb | 385 | ||||
| -rw-r--r-- | ShiftOS/Dodge.resx | 208 | ||||
| -rw-r--r-- | ShiftOS/Dodge.vb | 548 | ||||
| -rw-r--r-- | ShiftOS/Downloader.Designer.vb (renamed from Downloader.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Downloader.resx (renamed from Downloader.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Downloader.vb (renamed from template.vb) | 283 | ||||
| -rw-r--r-- | ShiftOS/Downloadmanager.Designer.vb | 561 | ||||
| -rw-r--r-- | ShiftOS/Downloadmanager.resx | 140 | ||||
| -rw-r--r-- | ShiftOS/Downloadmanager.vb | 579 | ||||
| -rw-r--r-- | ShiftOS/File Opener.Designer.vb (renamed from File Opener.Designer.vb) | 11 | ||||
| -rw-r--r-- | ShiftOS/File Opener.resx | 421 | ||||
| -rw-r--r-- | ShiftOS/File Opener.vb (renamed from File Opener.vb) | 342 | ||||
| -rw-r--r-- | ShiftOS/File Saver.Designer.vb (renamed from File Saver.Designer.vb) | 69 | ||||
| -rw-r--r-- | ShiftOS/File Saver.resx | 421 | ||||
| -rw-r--r-- | ShiftOS/File Saver.vb (renamed from File Saver.vb) | 319 | ||||
| -rw-r--r-- | ShiftOS/File Skimmer.Designer.vb (renamed from File Skimmer.Designer.vb) | 17 | ||||
| -rw-r--r-- | ShiftOS/File Skimmer.resx | 421 | ||||
| -rw-r--r-- | ShiftOS/File Skimmer.vb | 936 | ||||
| -rw-r--r-- | ShiftOS/File_Crypt.vb (renamed from File_Crypt.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/FloatyBird.Designer.vb | 237 | ||||
| -rw-r--r-- | ShiftOS/FloatyBird.resx (renamed from template.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/FloatyBird.vb (renamed from Downloader.vb) | 227 | ||||
| -rw-r--r-- | ShiftOS/FloodGate Manager.Designer.vb | 508 | ||||
| -rw-r--r-- | ShiftOS/FloodGate Manager.resx | 141 | ||||
| -rw-r--r-- | ShiftOS/FloodGate Manager.vb | 700 | ||||
| -rw-r--r-- | ShiftOS/FloodRegistry.Designer.vb | 37 | ||||
| -rw-r--r-- | ShiftOS/FloodRegistry.resx | 120 | ||||
| -rw-r--r-- | ShiftOS/FloodRegistry.vb | 37 | ||||
| -rw-r--r-- | ShiftOS/Graphic Picker.Designer.vb (renamed from Graphic Picker.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Graphic Picker.resx (renamed from Graphic Picker.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Graphic Picker.vb (renamed from Graphic Picker.vb) | 293 | ||||
| -rw-r--r-- | ShiftOS/Helper.vb | 9 | ||||
| -rw-r--r-- | ShiftOS/HijackScreen.Designer.vb (renamed from HijackScreen.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/HijackScreen.resx (renamed from HijackScreen.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/HijackScreen.vb (renamed from HijackScreen.vb) | 18 | ||||
| -rw-r--r-- | ShiftOS/Icon Manager.Designer.vb (renamed from Icon Manager.Designer.vb) | 966 | ||||
| -rw-r--r-- | ShiftOS/Icon Manager.resx (renamed from Icon Manager.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Icon Manager.vb (renamed from Icon Manager.vb) | 510 | ||||
| -rw-r--r-- | ShiftOS/Installer.Designer.vb (renamed from Web Browser.Designer.vb) | 260 | ||||
| -rw-r--r-- | ShiftOS/Installer.resx | 135 | ||||
| -rw-r--r-- | ShiftOS/Installer.vb | 597 | ||||
| -rw-r--r-- | ShiftOS/Knowledge Input.Designer.vb (renamed from Knowledge Input.Designer.vb) | 23 | ||||
| -rw-r--r-- | ShiftOS/Knowledge Input.resx (renamed from Knowledge Input.resx) | 3 | ||||
| -rw-r--r-- | ShiftOS/Knowledge Input.vb (renamed from Knowledge Input.vb) | 852 | ||||
| -rw-r--r-- | ShiftOS/Labyrinth.designer.vb | 1048 | ||||
| -rw-r--r-- | ShiftOS/Labyrinth.resx | 140 | ||||
| -rw-r--r-- | ShiftOS/Labyrinth.vb | 684 | ||||
| -rw-r--r-- | ShiftOS/Module1.vb (renamed from Module1.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/My Project/Application.Designer.vb (renamed from My Project/Application.Designer.vb) | 4 | ||||
| -rw-r--r-- | ShiftOS/My Project/Application.myapp (renamed from My Project/Application.myapp) | 2 | ||||
| -rw-r--r-- | ShiftOS/My Project/AssemblyInfo.vb (renamed from My Project/AssemblyInfo.vb) | 8 | ||||
| -rw-r--r-- | ShiftOS/My Project/Resources.Designer.vb (renamed from My Project/Resources.Designer.vb) | 575 | ||||
| -rw-r--r-- | ShiftOS/My Project/Resources.resx (renamed from My Project/Resources.resx) | 1199 | ||||
| -rw-r--r-- | ShiftOS/My Project/Settings.Designer.vb | 85 | ||||
| -rw-r--r-- | ShiftOS/My Project/Settings.settings | 9 | ||||
| -rw-r--r-- | ShiftOS/My Project/app.manifest (renamed from My Project/app.manifest) | 0 | ||||
| -rw-r--r-- | ShiftOS/MyPreviewToolStripRenderer.vb (renamed from MyPreviewToolStripRenderer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/MyToolStripRenderer.vb (renamed from MyToolStripRenderer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Name Changer.Designer.vb (renamed from Name Changer.Designer.vb) | 831 | ||||
| -rw-r--r-- | ShiftOS/Name Changer.resx (renamed from Name Changer.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Name Changer.vb (renamed from Name Changer.vb) | 326 | ||||
| -rw-r--r-- | ShiftOS/NewAPI.vb | 79 | ||||
| -rw-r--r-- | ShiftOS/OrcWrite.Designer.vb | 482 | ||||
| -rw-r--r-- | ShiftOS/OrcWrite.resx | 141 | ||||
| -rw-r--r-- | ShiftOS/OrcWrite.vb | 619 | ||||
| -rw-r--r-- | ShiftOS/Pong.Designer.vb (renamed from Pong.Designer.vb) | 27 | ||||
| -rw-r--r-- | ShiftOS/Pong.resx (renamed from Pong.resx) | 3 | ||||
| -rw-r--r-- | ShiftOS/Pong.vb (renamed from Pong.vb) | 292 | ||||
| -rw-r--r-- | ShiftOS/PreviewCustomColorTable.vb (renamed from PreviewCustomColorTable.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/ProgressBarEX.Designer.vb | 29 | ||||
| -rw-r--r-- | ShiftOS/ProgressBarEX.vb | 275 | ||||
| -rw-r--r-- | ShiftOS/QuickChatStory.Designer.vb | 37 | ||||
| -rw-r--r-- | ShiftOS/QuickChatStory.resx | 120 | ||||
| -rw-r--r-- | ShiftOS/QuickChatStory.vb | 89 | ||||
| -rw-r--r-- | ShiftOS/Resources/3beepvirus.wav (renamed from Resources/3beepvirus.wav) | bin | 41874 -> 41874 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadOval.png (renamed from Resources/ArtPadOval.png) | bin | 49912 -> 49912 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadRectangle.png (renamed from Resources/ArtPadRectangle.png) | bin | 47715 -> 47715 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadcirclerubber.png (renamed from Resources/ArtPadcirclerubber.png) | bin | 50761 -> 50761 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadcirclerubberselected.png (renamed from Resources/ArtPadcirclerubberselected.png) | bin | 50132 -> 50132 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPaderacer.png (renamed from Resources/ArtPaderacer.png) | bin | 61665 -> 61665 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadfloodfill.png (renamed from Resources/ArtPadfloodfill.png) | bin | 47957 -> 47957 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadlinetool.png (renamed from Resources/ArtPadlinetool.png) | bin | 48840 -> 48840 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadmagnify.png (renamed from Resources/ArtPadmagnify.png) | bin | 51680 -> 51680 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadnew.png (renamed from Resources/ArtPadnew.png) | bin | 48513 -> 48513 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadopen.png (renamed from Resources/ArtPadopen.png) | bin | 48573 -> 48573 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadpaintbrush.png (renamed from Resources/ArtPadpaintbrush.png) | bin | 49222 -> 49222 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadpencil.png (renamed from Resources/ArtPadpencil.png) | bin | 48154 -> 48154 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadpixelplacer.png (renamed from Resources/ArtPadpixelplacer.png) | bin | 49614 -> 49614 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadredo.png (renamed from Resources/ArtPadredo.png) | bin | 62500 -> 62500 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadsave.png (renamed from Resources/ArtPadsave.png) | bin | 50125 -> 50125 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadsquarerubber.png (renamed from Resources/ArtPadsquarerubber.png) | bin | 47969 -> 47969 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadsquarerubberselected.png (renamed from Resources/ArtPadsquarerubberselected.png) | bin | 49971 -> 49971 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadtexttool.png (renamed from Resources/ArtPadtexttool.png) | bin | 47446 -> 47446 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ArtPadundo.png (renamed from Resources/ArtPadundo.png) | bin | 63747 -> 63747 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/AxInterop.WMPLib.dll | bin | 0 -> 53760 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp | bin | 0 -> 9878 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/DSC01042.JPG (renamed from Resources/DSC01042.JPG) | bin | 1200585 -> 1200585 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/DesktopPlusPlusAbout.txt | 7 | ||||
| -rw-r--r-- | ShiftOS/Resources/Gray Shades.png (renamed from Resources/Gray Shades.png) | bin | 64411 -> 64411 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/Industrial.skn | bin | 0 -> 1018138 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/Interop.WMPLib.dll | bin | 0 -> 281072 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/LICENSE.md | 31 | ||||
| -rw-r--r-- | ShiftOS/Resources/Linux Mint 7.skn | bin | 0 -> 3590437 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/Minimatchbackground.png | bin | 0 -> 53708 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/Receive.png (renamed from Resources/Receive.png) | bin | 52348 -> 52348 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ReceiveClicked.png (renamed from Resources/ReceiveClicked.png) | bin | 49484 -> 49484 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/Send.png (renamed from Resources/Send.png) | bin | 52178 -> 52178 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/SendClicked.png (renamed from Resources/SendClicked.png) | bin | 49617 -> 49617 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/ShiftOS License.txt | 33 | ||||
| -rw-r--r-- | ShiftOS/Resources/Symbolinfo.png (renamed from Resources/Symbolinfo.png) | bin | 56780 -> 56780 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/TotalBalanceClicked.png (renamed from Resources/TotalBalanceClicked.png) | bin | 49267 -> 49267 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/TotalBalanceUnclicked.png (renamed from Resources/TotalBalanceUnclicked.png) | bin | 52325 -> 52325 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/anycolourshade.png (renamed from Resources/anycolourshade.png) | bin | 49435 -> 49435 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/anycolourshade2.png (renamed from Resources/anycolourshade2.png) | bin | 49667 -> 49667 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/anycolourshade3.png (renamed from Resources/anycolourshade3.png) | bin | 49532 -> 49532 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/anycolourshade4.png (renamed from Resources/anycolourshade4.png) | bin | 49546 -> 49546 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeaudioplayerbox.png (renamed from Resources/appscapeaudioplayerbox.png) | bin | 69822 -> 69822 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeaudioplayerprice.png (renamed from Resources/appscapeaudioplayerprice.png) | bin | 50818 -> 50818 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeaudioplayerpricepressed.png (renamed from Resources/appscapeaudioplayerpricepressed.png) | bin | 51031 -> 51031 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapecalculator.png (renamed from Resources/appscapecalculator.png) | bin | 67917 -> 67917 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapecalculatorprice.png (renamed from Resources/appscapecalculatorprice.png) | bin | 51323 -> 51323 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapecalculatorpricepressed.png (renamed from Resources/appscapecalculatorpricepressed.png) | bin | 52200 -> 52200 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png | bin | 0 -> 12680 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapedepositinfo.png | bin | 0 -> 10834 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapedepositnowbutton.png (renamed from Resources/appscapedepositnowbutton.png) | bin | 54337 -> 54337 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapedownloadbutton.png (renamed from Resources/appscapedownloadbutton.png) | bin | 51478 -> 51478 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfoaudioplayertext.png (renamed from Resources/appscapeinfoaudioplayertext.png) | bin | 96796 -> 96796 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png (renamed from Resources/appscapeinfoaudioplayervisualpreview.png) | bin | 83698 -> 83698 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfobackbutton.png (renamed from Resources/appscapeinfobackbutton.png) | bin | 64815 -> 64815 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfobutton.png (renamed from Resources/appscapeinfobutton.png) | bin | 50608 -> 50608 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfobuttonpressed.png (renamed from Resources/appscapeinfobuttonpressed.png) | bin | 50328 -> 50328 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfobuybutton.png (renamed from Resources/appscapeinfobuybutton.png) | bin | 51421 -> 51421 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfocalculatortext.png (renamed from Resources/appscapeinfocalculatortext.png) | bin | 98326 -> 98326 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png (renamed from Resources/appscapeinfocalculatorvisualpreview.png) | bin | 79933 -> 79933 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfoorcwritetext.png | bin | 0 -> 108392 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png | bin | 0 -> 168364 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfovideoplayertext.png (renamed from Resources/appscapeinfovideoplayertext.png) | bin | 98633 -> 98633 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png (renamed from Resources/appscapeinfovideoplayervisualpreview.png) | bin | 116190 -> 116190 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfowebbrowsertext.png (renamed from Resources/appscapeinfowebbrowsertext.png) | bin | 106234 -> 106234 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png (renamed from Resources/appscapeinfowebbrowservisualpreview.png) | bin | 87542 -> 87542 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapemoresoftware.png (renamed from Resources/appscapemoresoftware.png) | bin | 69689 -> 69689 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeorcwrite.png | bin | 0 -> 71475 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapetitlebanner.png (renamed from Resources/appscapetitlebanner.png) | bin | 73953 -> 73953 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeundefinedprice.png (renamed from Resources/appscapeundefinedprice.png) | bin | 51432 -> 51432 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapeundefinedpricepressed.png (renamed from Resources/appscapeundefinedpricepressed.png) | bin | 51129 -> 51129 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapevideoplayer.png (renamed from Resources/appscapevideoplayer.png) | bin | 72820 -> 72820 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapevideoplayerprice.png (renamed from Resources/appscapevideoplayerprice.png) | bin | 52030 -> 52030 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapevideoplayerpricepressed.png (renamed from Resources/appscapevideoplayerpricepressed.png) | bin | 51055 -> 51055 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapewebbrowser.png (renamed from Resources/appscapewebbrowser.png) | bin | 70732 -> 70732 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapewebbrowserprice.png (renamed from Resources/appscapewebbrowserprice.png) | bin | 51004 -> 51004 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapewebbrowserpricepressed.png (renamed from Resources/appscapewebbrowserpricepressed.png) | bin | 52666 -> 52666 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/appscapewelcometoappscape.png (renamed from Resources/appscapewelcometoappscape.png) | bin | 102480 -> 102480 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/bitnotediggergradetable.png | bin | 0 -> 19859 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/bitnoteswebsidepnl.png | bin | 0 -> 10066 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/bitnotewalletdownload.png | bin | 0 -> 3148 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/bitnotewalletpreviewscreenshot.png | bin | 0 -> 12130 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/bitnotewebsitetitle.png | bin | 0 -> 10579 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/centrebutton.png (renamed from Resources/centrebutton.png) | bin | 52179 -> 52179 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/centrebuttonpressed.png (renamed from Resources/centrebuttonpressed.png) | bin | 50091 -> 50091 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/christmaseasteregg.png | bin | 0 -> 124129 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/crash-cheat.png | bin | 0 -> 171464 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/crash-force.png | bin | 0 -> 170640 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/crash.png | bin | 0 -> 166165 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/crash_ofm.png | bin | 0 -> 170314 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/deletefile.png (renamed from Resources/deletefile.png) | bin | 49593 -> 49593 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/deletefolder.png (renamed from Resources/deletefolder.png) | bin | 49998 -> 49998 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/dial-up-modem-02.wav (renamed from Resources/dial-up-modem-02.wav) | bin | 1966588 -> 1966588 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/dodge.png | bin | 0 -> 47653 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/downarrow.png (renamed from Resources/downarrow.png) | bin | 47753 -> 47753 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/downloadmanagericon.png | bin | 0 -> 202 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/fileiconsaa.png | bin | 0 -> 288 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/fileskimmericon.fw.png (renamed from Resources/fileskimmericon.fw.png) | bin | 47436 -> 47436 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/floodgateicn.png | bin | 0 -> 278 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconArtpad.png (renamed from Resources/iconArtpad.png) | bin | 47778 -> 47778 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconAudioPlayer.png (renamed from Resources/iconAudioPlayer.png) | bin | 50565 -> 50565 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconBitnoteDigger.png (renamed from Resources/iconBitnoteDigger.png) | bin | 49878 -> 49878 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconBitnoteWallet.png (renamed from Resources/iconBitnoteWallet.png) | bin | 48562 -> 48562 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconCalculator.png (renamed from Resources/iconCalculator.png) | bin | 50783 -> 50783 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconClock.png (renamed from Resources/iconClock.png) | bin | 49533 -> 49533 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconColourPicker.fw.png (renamed from Resources/iconColourPicker.fw.png) | bin | 47246 -> 47246 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconDodge.png | bin | 0 -> 237 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconDownloader.png (renamed from Resources/iconDownloader.png) | bin | 51292 -> 51292 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconFileOpener.fw.png (renamed from Resources/iconFileOpener.fw.png) | bin | 47956 -> 47956 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconFileSaver.fw.png (renamed from Resources/iconFileSaver.fw.png) | bin | 47385 -> 47385 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconFileSkimmer.png (renamed from Resources/iconFileSkimmer.png) | bin | 47436 -> 47436 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconIconManager.png (renamed from Resources/iconIconManager.png) | bin | 77559 -> 77559 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconInfoBox.fw.png (renamed from Resources/iconInfoBox.fw.png) | bin | 47233 -> 47233 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconKnowledgeInput.png (renamed from Resources/iconKnowledgeInput.png) | bin | 47435 -> 47435 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconNameChanger.png (renamed from Resources/iconNameChanger.png) | bin | 48858 -> 48858 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconPong.png (renamed from Resources/iconPong.png) | bin | 47990 -> 47990 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconShifter.png (renamed from Resources/iconShifter.png) | bin | 47443 -> 47443 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconShiftnet.png (renamed from Resources/iconShiftnet.png) | bin | 49354 -> 49354 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconShiftorium.png (renamed from Resources/iconShiftorium.png) | bin | 64263 -> 64263 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconSkinLoader.png (renamed from Resources/iconSkinLoader.png) | bin | 48047 -> 48047 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconSkinShifter.png (renamed from Resources/iconSkinShifter.png) | bin | 51630 -> 51630 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconSnakey.png | bin | 0 -> 249 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconSysinfo.png | bin | 0 -> 318 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconTerminal.png (renamed from Resources/iconTerminal.png) | bin | 48451 -> 48451 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconTextPad.png (renamed from Resources/iconTextPad.png) | bin | 47563 -> 47563 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconVideoPlayer.png (renamed from Resources/iconVideoPlayer.png) | bin | 47879 -> 47879 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconWebBrowser.png (renamed from Resources/iconWebBrowser.png) | bin | 50634 -> 50634 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconfloodgate.png | bin | 0 -> 260 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/icongraphicpicker.png (renamed from Resources/icongraphicpicker.png) | bin | 47862 -> 47862 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconmaze.png | bin | 0 -> 256 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconorcwrite.png | bin | 0 -> 377 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconshutdown.png (renamed from Resources/iconshutdown.png) | bin | 47390 -> 47390 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconunitytoggle.png | bin | 0 -> 259 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/iconvirusscanner.png | bin | 0 -> 292 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/infobox.wav (renamed from Resources/infobox.wav) | bin | 22256 -> 22256 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/installericon.png | bin | 0 -> 221 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/loadbutton.png (renamed from Resources/loadbutton.png) | bin | 48264 -> 48264 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/minimatchdodgepreviewimage.png | bin | 0 -> 6989 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/minimatchlabyrinthpreview.png | bin | 0 -> 4893 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/newfolder.png (renamed from Resources/newfolder.png) | bin | 48488 -> 48488 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/newicon.png (renamed from Resources/newicon.png) | bin | 48254 -> 48254 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/nextbutton.png (renamed from Resources/nextbutton.png) | bin | 48112 -> 48112 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/openicon.png (renamed from Resources/openicon.png) | bin | 51514 -> 51514 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/pausebutton.png (renamed from Resources/pausebutton.png) | bin | 47581 -> 47581 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/pixelsetter.png (renamed from Resources/pixelsetter.png) | bin | 48189 -> 48189 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/playbutton.png (renamed from Resources/playbutton.png) | bin | 62718 -> 62718 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/previousbutton.png (renamed from Resources/previousbutton.png) | bin | 48601 -> 48601 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/rolldown.wav (renamed from Resources/rolldown.wav) | bin | 38064 -> 38064 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/rollup.wav (renamed from Resources/rollup.wav) | bin | 38062 -> 38062 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/saveicon.png (renamed from Resources/saveicon.png) | bin | 50414 -> 50414 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizericonpreview.png | bin | 0 -> 3375 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizerindustrialskinpreview.png | bin | 0 -> 7936 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png | bin | 0 -> 7702 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizernamechangerpreview.png | bin | 0 -> 4637 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizerskinshifterscreenshot.png | bin | 0 -> 5530 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizersliderleftarrow.png | bin | 0 -> 1298 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/shiftomizersliderrightarrow.png | bin | 0 -> 1313 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/skindownarrow.png (renamed from Resources/skindownarrow.png) | bin | 48435 -> 48435 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/skinfile.png (renamed from Resources/skinfile.png) | bin | 50188 -> 50188 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/skinuparrow.png (renamed from Resources/skinuparrow.png) | bin | 47916 -> 47916 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/snakeyback.bmp | bin | 0 -> 954358 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/stopbutton.png (renamed from Resources/stopbutton.png) | bin | 48768 -> 48768 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/stretchbutton.png (renamed from Resources/stretchbutton.png) | bin | 55265 -> 55265 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/stretchbuttonpressed.png (renamed from Resources/stretchbuttonpressed.png) | bin | 53145 -> 53145 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/test.png (renamed from Resources/test.png) | bin | 47417 -> 47417 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/textpad.fw.png (renamed from Resources/textpad.fw.png) | bin | 47563 -> 47563 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/tilebutton.png (renamed from Resources/tilebutton.png) | bin | 53472 -> 53472 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/tilebuttonpressed.png (renamed from Resources/tilebuttonpressed.png) | bin | 51941 -> 51941 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/transactionsClicked.png (renamed from Resources/transactionsClicked.png) | bin | 49766 -> 49766 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/transactionsUnclicked.png (renamed from Resources/transactionsUnclicked.png) | bin | 50936 -> 50936 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/typesound.wav (renamed from Resources/typesound.wav) | bin | 5772 -> 5772 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/uparrow.png (renamed from Resources/uparrow.png) | bin | 47546 -> 47546 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/updatecustomcolourpallets.png (renamed from Resources/updatecustomcolourpallets.png) | bin | 54603 -> 54603 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealartpad.png (renamed from Resources/upgradealartpad.png) | bin | 51715 -> 51715 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealclock.png (renamed from Resources/upgradealclock.png) | bin | 86582 -> 86582 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealfileskimmer.png (renamed from Resources/upgradealfileskimmer.png) | bin | 84177 -> 84177 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealpong.png (renamed from Resources/upgradealpong.png) | bin | 85228 -> 85228 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealshifter.png (renamed from Resources/upgradealshifter.png) | bin | 123522 -> 123522 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealshiftorium.png (renamed from Resources/upgradealshiftorium.png) | bin | 86052 -> 86052 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealtextpad.png (renamed from Resources/upgradealtextpad.png) | bin | 84682 -> 84682 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradealunitymode.png | bin | 0 -> 2764 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeamandpm.png (renamed from Resources/upgradeamandpm.png) | bin | 51384 -> 51384 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeapplaunchermenu.png (renamed from Resources/upgradeapplaunchermenu.png) | bin | 85267 -> 85267 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeapplaunchershutdown.png (renamed from Resources/upgradeapplaunchershutdown.png) | bin | 227791 -> 227791 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad.png (renamed from Resources/upgradeartpad.png) | bin | 54252 -> 54252 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad128colorpallets.png (renamed from Resources/upgradeartpad128colorpallets.png) | bin | 54445 -> 54445 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad16colorpallets.png (renamed from Resources/upgradeartpad16colorpallets.png) | bin | 51976 -> 51976 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad32colorpallets.png (renamed from Resources/upgradeartpad32colorpallets.png) | bin | 50859 -> 50859 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad4colorpallets.png (renamed from Resources/upgradeartpad4colorpallets.png) | bin | 49160 -> 49160 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad64colorpallets.png (renamed from Resources/upgradeartpad64colorpallets.png) | bin | 53260 -> 53260 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpad8colorpallets.png (renamed from Resources/upgradeartpad8colorpallets.png) | bin | 49197 -> 49197 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpaderaser.png (renamed from Resources/upgradeartpaderaser.png) | bin | 67398 -> 67398 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadfilltool.png (renamed from Resources/upgradeartpadfilltool.png) | bin | 55081 -> 55081 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadicon.png (renamed from Resources/upgradeartpadicon.png) | bin | 52712 -> 52712 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadlimitlesspixels.png (renamed from Resources/upgradeartpadlimitlesspixels.png) | bin | 55994 -> 55994 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadlinetool.png (renamed from Resources/upgradeartpadlinetool.png) | bin | 54845 -> 54845 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadload.png (renamed from Resources/upgradeartpadload.png) | bin | 53877 -> 53877 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadnew.png (renamed from Resources/upgradeartpadnew.png) | bin | 54796 -> 54796 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadovaltool.png (renamed from Resources/upgradeartpadovaltool.png) | bin | 54399 -> 54399 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpaintbrushtool.png (renamed from Resources/upgradeartpadpaintbrushtool.png) | bin | 52104 -> 52104 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpenciltool.png (renamed from Resources/upgradeartpadpenciltool.png) | bin | 54103 -> 54103 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit1024.png (renamed from Resources/upgradeartpadpixellimit1024.png) | bin | 54355 -> 54355 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit16.png (renamed from Resources/upgradeartpadpixellimit16.png) | bin | 53574 -> 53574 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit16384.png (renamed from Resources/upgradeartpadpixellimit16384.png) | bin | 58039 -> 58039 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit256.png (renamed from Resources/upgradeartpadpixellimit256.png) | bin | 54724 -> 54724 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit4.png (renamed from Resources/upgradeartpadpixellimit4.png) | bin | 53688 -> 53688 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit4096.png (renamed from Resources/upgradeartpadpixellimit4096.png) | bin | 54628 -> 54628 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit64.png (renamed from Resources/upgradeartpadpixellimit64.png) | bin | 53967 -> 53967 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit65536.png (renamed from Resources/upgradeartpadpixellimit65536.png) | bin | 61266 -> 61266 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixellimit8.png (renamed from Resources/upgradeartpadpixellimit8.png) | bin | 53654 -> 53654 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixelplacer.png (renamed from Resources/upgradeartpadpixelplacer.png) | bin | 53439 -> 53439 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png (renamed from Resources/upgradeartpadpixelplacermovementmode.png) | bin | 53515 -> 53515 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadrectangletool.png (renamed from Resources/upgradeartpadrectangletool.png) | bin | 50047 -> 50047 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadredo.png (renamed from Resources/upgradeartpadredo.png) | bin | 68961 -> 68961 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadsave.png (renamed from Resources/upgradeartpadsave.png) | bin | 54842 -> 54842 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadtexttool.png (renamed from Resources/upgradeartpadtexttool.png) | bin | 56918 -> 56918 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeartpadundo.png (renamed from Resources/upgradeartpadundo.png) | bin | 68984 -> 68984 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeautoscrollterminal.png (renamed from Resources/upgradeautoscrollterminal.png) | bin | 441545 -> 441545 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeblue.png (renamed from Resources/upgradeblue.png) | bin | 53930 -> 53930 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradebluecustom.png (renamed from Resources/upgradebluecustom.png) | bin | 49605 -> 49605 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeblueshades.png (renamed from Resources/upgradeblueshades.png) | bin | 65740 -> 65740 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeblueshadeset.png (renamed from Resources/upgradeblueshadeset.png) | bin | 78850 -> 78850 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradebrown.png (renamed from Resources/upgradebrown.png) | bin | 56409 -> 56409 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradebrowncustom.png (renamed from Resources/upgradebrowncustom.png) | bin | 50181 -> 50181 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradebrownshades.png (renamed from Resources/upgradebrownshades.png) | bin | 72263 -> 72263 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradebrownshadeset.png (renamed from Resources/upgradebrownshadeset.png) | bin | 80184 -> 80184 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeclock.png (renamed from Resources/upgradeclock.png) | bin | 127045 -> 127045 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeclockicon.png (renamed from Resources/upgradeclockicon.png) | bin | 188420 -> 188420 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeclosebutton.gif (renamed from Resources/upgradeclosebutton.gif) | bin | 135306 -> 135306 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradecolourpickericon.png (renamed from Resources/upgradecolourpickericon.png) | bin | 190486 -> 190486 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradecustomusername.png (renamed from Resources/upgradecustomusername.png) | bin | 56962 -> 56962 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradedesktoppanel.png (renamed from Resources/upgradedesktoppanel.png) | bin | 125276 -> 125276 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradedesktoppanelclock.png (renamed from Resources/upgradedesktoppanelclock.png) | bin | 85362 -> 85362 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradedraggablewindows.gif (renamed from Resources/upgradedraggablewindows.gif) | bin | 1086559 -> 1086559 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradefileskimmer.png (renamed from Resources/upgradefileskimmer.png) | bin | 75511 -> 75511 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradefileskimmerdelete.png (renamed from Resources/upgradefileskimmerdelete.png) | bin | 64762 -> 64762 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradefileskimmericon.png (renamed from Resources/upgradefileskimmericon.png) | bin | 188753 -> 188753 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradefileskimmernew.png (renamed from Resources/upgradefileskimmernew.png) | bin | 64656 -> 64656 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegray.png (renamed from Resources/upgradegray.png) | bin | 56399 -> 56399 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegraycustom.png (renamed from Resources/upgradegraycustom.png) | bin | 49217 -> 49217 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegrayshades.png (renamed from Resources/upgradegrayshades.png) | bin | 64411 -> 64411 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegrayshadeset.png (renamed from Resources/upgradegrayshadeset.png) | bin | 61391 -> 61391 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegreen.png (renamed from Resources/upgradegreen.png) | bin | 53877 -> 53877 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegreencustom.png (renamed from Resources/upgradegreencustom.png) | bin | 49879 -> 49879 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegreenshades.png (renamed from Resources/upgradegreenshades.png) | bin | 67199 -> 67199 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradegreenshadeset.png (renamed from Resources/upgradegreenshadeset.png) | bin | 80219 -> 80219 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradehoursssincemidnight.png (renamed from Resources/upgradehoursssincemidnight.png) | bin | 52768 -> 52768 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeiconunitymode.png | bin | 0 -> 2544 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeinfoboxicon.png (renamed from Resources/upgradeinfoboxicon.png) | bin | 195229 -> 195229 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradekiaddons.png (renamed from Resources/upgradekiaddons.png) | bin | 86926 -> 86926 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradekielements.png (renamed from Resources/upgradekielements.png) | bin | 258474 -> 258474 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeknowledgeinput.png (renamed from Resources/upgradeknowledgeinput.png) | bin | 87652 -> 87652 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeknowledgeinputicon.png (renamed from Resources/upgradeknowledgeinputicon.png) | bin | 190378 -> 190378 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademinimizebutton.png (renamed from Resources/upgrademinimizebutton.png) | bin | 49676 -> 49676 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademinimizecommand.png (renamed from Resources/upgrademinimizecommand.png) | bin | 52223 -> 52223 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademinuteaccuracytime.png (renamed from Resources/upgrademinuteaccuracytime.png) | bin | 52897 -> 52897 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademinutesssincemidnight.png (renamed from Resources/upgrademinutesssincemidnight.png) | bin | 53821 -> 53821 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademoveablewindows.gif (renamed from Resources/upgrademoveablewindows.gif) | bin | 57767 -> 57767 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgrademultitasking.png (renamed from Resources/upgrademultitasking.png) | bin | 109037 -> 109037 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeorange.png (renamed from Resources/upgradeorange.png) | bin | 55758 -> 55758 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeorangecustom.png (renamed from Resources/upgradeorangecustom.png) | bin | 49366 -> 49366 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeorangeshades.png (renamed from Resources/upgradeorangeshades.png) | bin | 67905 -> 67905 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeorangeshadeset.png (renamed from Resources/upgradeorangeshadeset.png) | bin | 61106 -> 61106 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeosname.png | bin | 0 -> 3245 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepanelbuttons.png (renamed from Resources/upgradepanelbuttons.png) | bin | 52047 -> 52047 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepink.png (renamed from Resources/upgradepink.png) | bin | 56056 -> 56056 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepinkcustom.png (renamed from Resources/upgradepinkcustom.png) | bin | 49826 -> 49826 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepinkshades.png (renamed from Resources/upgradepinkshades.png) | bin | 66892 -> 66892 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepinkshadeset.png (renamed from Resources/upgradepinkshadeset.png) | bin | 64034 -> 64034 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepong.png (renamed from Resources/upgradepong.png) | bin | 71700 -> 71700 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepongicon.png (renamed from Resources/upgradepongicon.png) | bin | 188776 -> 188776 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepurple.png (renamed from Resources/upgradepurple.png) | bin | 53894 -> 53894 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepurplecustom.png (renamed from Resources/upgradepurplecustom.png) | bin | 50213 -> 50213 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepurpleshades.png (renamed from Resources/upgradepurpleshades.png) | bin | 66323 -> 66323 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradepurpleshadeset.png (renamed from Resources/upgradepurpleshadeset.png) | bin | 77205 -> 77205 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradered.png (renamed from Resources/upgradered.png) | bin | 52290 -> 52290 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderedcustom.png (renamed from Resources/upgraderedcustom.png) | bin | 49761 -> 49761 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderedshades.png (renamed from Resources/upgraderedshades.png) | bin | 65692 -> 65692 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderedshadeset.png (renamed from Resources/upgraderedshadeset.png) | bin | 63907 -> 63907 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderemoveth1.png | bin | 0 -> 2740 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderemoveth2.png | bin | 0 -> 2866 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderemoveth3.png | bin | 0 -> 2846 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderemoveth4.png | bin | 0 -> 2821 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderesize.png | bin | 0 -> 1729 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderollupbutton.gif (renamed from Resources/upgraderollupbutton.gif) | bin | 60717 -> 60717 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgraderollupcommand.png (renamed from Resources/upgraderollupcommand.png) | bin | 148802 -> 148802 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradesecondssincemidnight.png (renamed from Resources/upgradesecondssincemidnight.png) | bin | 54646 -> 54646 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradesgameconsoles.png (renamed from Resources/upgradesgameconsoles.png) | bin | 138952 -> 138952 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftapplauncher.png (renamed from Resources/upgradeshiftapplauncher.png) | bin | 60404 -> 60404 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftborders.png (renamed from Resources/upgradeshiftborders.png) | bin | 51851 -> 51851 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftbuttons.png (renamed from Resources/upgradeshiftbuttons.png) | bin | 58031 -> 58031 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftdesktop.png (renamed from Resources/upgradeshiftdesktop.png) | bin | 50693 -> 50693 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftdesktoppanel.png (renamed from Resources/upgradeshiftdesktoppanel.png) | bin | 60974 -> 60974 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshifter.png (renamed from Resources/upgradeshifter.png) | bin | 80411 -> 80411 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftericon.png (renamed from Resources/upgradeshiftericon.png) | bin | 190277 -> 190277 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftitems.png | bin | 0 -> 2919 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftoriumicon.png (renamed from Resources/upgradeshiftoriumicon.png) | bin | 190248 -> 190248 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftpanelbuttons.png (renamed from Resources/upgradeshiftpanelbuttons.png) | bin | 61949 -> 61949 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshiftpanelclock.png (renamed from Resources/upgradeshiftpanelclock.png) | bin | 57359 -> 57359 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshifttitlebar.png (renamed from Resources/upgradeshifttitlebar.png) | bin | 53717 -> 53717 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshifttitletext.png (renamed from Resources/upgradeshifttitletext.png) | bin | 55937 -> 55937 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeshutdownicon.png (renamed from Resources/upgradeshutdownicon.png) | bin | 78734 -> 78734 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeskicarbrands.png (renamed from Resources/upgradeskicarbrands.png) | bin | 114994 -> 114994 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeskinning.png (renamed from Resources/upgradeskinning.png) | bin | 52232 -> 52232 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradesplitsecondaccuracy.png (renamed from Resources/upgradesplitsecondaccuracy.png) | bin | 51911 -> 51911 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradesysinfo.png | bin | 0 -> 3062 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeterminalicon.png (renamed from Resources/upgradeterminalicon.png) | bin | 190937 -> 190937 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeterminalscrollbar.png (renamed from Resources/upgradeterminalscrollbar.png) | bin | 295096 -> 295096 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetextpad.png (renamed from Resources/upgradetextpad.png) | bin | 74291 -> 74291 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetextpadicon.png (renamed from Resources/upgradetextpadicon.png) | bin | 187820 -> 187820 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetextpadnew.png (renamed from Resources/upgradetextpadnew.png) | bin | 64659 -> 64659 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetextpadopen.png (renamed from Resources/upgradetextpadopen.png) | bin | 65224 -> 65224 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetextpadsave.png (renamed from Resources/upgradetextpadsave.png) | bin | 64882 -> 64882 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetitlebar.png (renamed from Resources/upgradetitlebar.png) | bin | 269579 -> 269579 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetitletext.png (renamed from Resources/upgradetitletext.png) | bin | 80833 -> 80833 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradetrm.png | bin | 0 -> 1668 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeunitymode.png (renamed from Resources/upgradeunitymode.png) | bin | 107114 -> 107114 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeusefulpanelbuttons.png (renamed from Resources/upgradeusefulpanelbuttons.png) | bin | 55982 -> 55982 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradevirusscanner.png | bin | 0 -> 18640 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradewindowborders.png (renamed from Resources/upgradewindowborders.png) | bin | 78004 -> 78004 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradewindowedterminal.png (renamed from Resources/upgradewindowedterminal.png) | bin | 140960 -> 140960 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradewindowsanywhere.png (renamed from Resources/upgradewindowsanywhere.png) | bin | 172737 -> 172737 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeyellow.png (renamed from Resources/upgradeyellow.png) | bin | 53096 -> 53096 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeyellowcustom.png (renamed from Resources/upgradeyellowcustom.png) | bin | 49969 -> 49969 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeyellowshades.png (renamed from Resources/upgradeyellowshades.png) | bin | 69580 -> 69580 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/upgradeyellowshadeset.png (renamed from Resources/upgradeyellowshadeset.png) | bin | 69142 -> 69142 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/webback.png (renamed from Resources/webback.png) | bin | 64781 -> 64781 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/webforward.png (renamed from Resources/webforward.png) | bin | 62383 -> 62383 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/webhome.png (renamed from Resources/webhome.png) | bin | 63071 -> 63071 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/writesound.wav (renamed from Resources/writesound.wav) | bin | 6220 -> 6220 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/zoombutton.png (renamed from Resources/zoombutton.png) | bin | 52515 -> 52515 bytes | |||
| -rw-r--r-- | ShiftOS/Resources/zoombuttonpressed.png (renamed from Resources/zoombuttonpressed.png) | bin | 50234 -> 50234 bytes | |||
| -rw-r--r-- | ShiftOS/STML Test.Designer.vb | 38 | ||||
| -rw-r--r-- | ShiftOS/STML Test.resx | 120 | ||||
| -rw-r--r-- | ShiftOS/STML Test.vb | 54 | ||||
| -rw-r--r-- | ShiftOS/ShiftDock.Designer.vb | 206 | ||||
| -rw-r--r-- | ShiftOS/ShiftDock.resx | 126 | ||||
| -rw-r--r-- | ShiftOS/ShiftDock.vb | 73 | ||||
| -rw-r--r-- | ShiftOS/ShiftOS Save File Converter.Designer.vb (renamed from ShiftOS Save File Converter.Designer.vb) | 2 | ||||
| -rw-r--r-- | ShiftOS/ShiftOS Save File Converter.resx (renamed from ShiftOS Save File Converter.resx) | 4 | ||||
| -rw-r--r-- | ShiftOS/ShiftOS Save File Converter.vb | 595 | ||||
| -rw-r--r-- | ShiftOS/ShiftOS.vbproj (renamed from ShiftOS.vbproj) | 243 | ||||
| -rw-r--r-- | ShiftOS/ShiftOSDesktop.Designer.vb (renamed from ShiftOSDesktop.Designer.vb) | 1426 | ||||
| -rw-r--r-- | ShiftOS/ShiftOSDesktop.resx (renamed from ShiftOSDesktop.resx) | 12 | ||||
| -rw-r--r-- | ShiftOS/ShiftOSDesktop.vb (renamed from ShiftOSDesktop.vb) | 4120 | ||||
| -rw-r--r-- | ShiftOS/ShiftOSLogo.ico (renamed from ShiftOSLogo.ico) | bin | 38078 -> 38078 bytes | |||
| -rw-r--r-- | ShiftOS/Shifter.Designer.vb (renamed from Shifter.Designer.vb) | 1156 | ||||
| -rw-r--r-- | ShiftOS/Shifter.resx (renamed from Shifter.resx) | 12 | ||||
| -rw-r--r-- | ShiftOS/Shifter.vb (renamed from Shifter.vb) | 1487 | ||||
| -rw-r--r-- | ShiftOS/Shiftnet.Designer.vb | 4842 | ||||
| -rw-r--r-- | ShiftOS/Shiftnet.resx | 209 | ||||
| -rw-r--r-- | ShiftOS/Shiftnet.vb | 1518 | ||||
| -rw-r--r-- | ShiftOS/Shiftorium.Designer.vb (renamed from Shiftorium.Designer.vb) | 8 | ||||
| -rw-r--r-- | ShiftOS/Shiftorium.resx (renamed from Shiftorium.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Shiftorium.vb (renamed from Shiftorium.vb) | 680 | ||||
| -rw-r--r-- | ShiftOS/Skin Loader.Designer.vb (renamed from Skin Loader.Designer.vb) | 12 | ||||
| -rw-r--r-- | ShiftOS/Skin Loader.resx (renamed from Skin Loader.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Skin Loader.vb | 1565 | ||||
| -rw-r--r-- | ShiftOS/Skinshifter.Designer.vb (renamed from Skinshifter.Designer.vb) | 92 | ||||
| -rw-r--r-- | ShiftOS/Skinshifter.resx (renamed from Skinshifter.resx) | 11 | ||||
| -rw-r--r-- | ShiftOS/Skinshifter.vb (renamed from Skinshifter.vb) | 274 | ||||
| -rw-r--r-- | ShiftOS/Snakey.Designer.vb | 294 | ||||
| -rw-r--r-- | ShiftOS/Snakey.resx | 132 | ||||
| -rw-r--r-- | ShiftOS/Snakey.vb | 707 | ||||
| -rw-r--r-- | ShiftOS/SystemInfo.Designer.vb | 394 | ||||
| -rw-r--r-- | ShiftOS/SystemInfo.resx (renamed from Web Browser.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/SystemInfo.vb | 446 | ||||
| -rw-r--r-- | ShiftOS/TanColorScheme.vb (renamed from TanColorScheme.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Terminal.Designer.vb (renamed from Terminal.Designer.vb) | 10 | ||||
| -rw-r--r-- | ShiftOS/Terminal.resx (renamed from Terminal.resx) | 3 | ||||
| -rw-r--r-- | ShiftOS/Terminal.vb (renamed from Terminal.vb) | 646 | ||||
| -rw-r--r-- | ShiftOS/TextPad.Designer.vb (renamed from TextPad.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/TextPad.resx (renamed from TextPad.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/TextPad.vb (renamed from TextPad.vb) | 249 | ||||
| -rw-r--r-- | ShiftOS/Video Player.Designer.vb (renamed from Video Player.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/Video Player.resx (renamed from Video Player.resx) | 0 | ||||
| -rw-r--r-- | ShiftOS/Video Player.vb (renamed from Video Player.vb) | 236 | ||||
| -rw-r--r-- | ShiftOS/VirusScanner.Designer.vb | 370 | ||||
| -rw-r--r-- | ShiftOS/VirusScanner.resx | 139 | ||||
| -rw-r--r-- | ShiftOS/VirusScanner.vb | 566 | ||||
| -rw-r--r-- | ShiftOS/Viruses.vb (renamed from Viruses.vb) | 220 | ||||
| -rw-r--r-- | ShiftOS/Web Browser.Designer.vb | 540 | ||||
| -rw-r--r-- | ShiftOS/Web Browser.resx | 129 | ||||
| -rw-r--r-- | ShiftOS/Web Browser.vb | 657 | ||||
| -rw-r--r-- | ShiftOS/Window.vb (renamed from Window.vb) | 6 | ||||
| -rw-r--r-- | ShiftOS/app.manifest (renamed from app.manifest) | 0 | ||||
| -rw-r--r-- | ShiftOS/coherencemode.vb | 39 | ||||
| -rw-r--r-- | ShiftOS/coherencemodeform.Designer.vb | 242 | ||||
| -rw-r--r-- | ShiftOS/coherencemodeform.resx (renamed from Shiftnet.resx) | 12 | ||||
| -rw-r--r-- | ShiftOS/coherencemodeform.vb | 447 | ||||
| -rw-r--r-- | ShiftOS/crash.vb | 205 | ||||
| -rw-r--r-- | ShiftOS/crash_pic.Designer.vb | 79 | ||||
| -rw-r--r-- | ShiftOS/crash_pic.resx | 123 | ||||
| -rw-r--r-- | ShiftOS/crash_pic.vb | 11 | ||||
| -rw-r--r-- | ShiftOS/defaultdropdownmenu.vb (renamed from defaultdropdownmenu.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/infobox.Designer.vb (renamed from infobox.Designer.vb) | 125 | ||||
| -rw-r--r-- | ShiftOS/infobox.resx | 120 | ||||
| -rw-r--r-- | ShiftOS/infobox.vb | 592 | ||||
| -rw-r--r-- | ShiftOS/modform.Designer.vb | 242 | ||||
| -rw-r--r-- | ShiftOS/modform.resx | 132 | ||||
| -rw-r--r-- | ShiftOS/modform.vb | 466 | ||||
| -rw-r--r-- | ShiftOS/skins.vb | 688 | ||||
| -rw-r--r-- | ShiftOS/template.Designer.vb (renamed from template.Designer.vb) | 0 | ||||
| -rw-r--r-- | ShiftOS/template.resx | 129 | ||||
| -rw-r--r-- | ShiftOS/template.vb (renamed from Bitnote Digger.vb) | 297 | ||||
| -rw-r--r-- | ShiftOS/undo.vb (renamed from undo.vb) | 0 | ||||
| -rw-r--r-- | Shiftnet.Designer.vb | 1102 | ||||
| -rw-r--r-- | Shiftnet.vb | 579 | ||||
| -rw-r--r-- | Skin Loader.vb | 1019 | ||||
| -rw-r--r-- | Web Browser.vb | 464 | ||||
| -rw-r--r-- | coherencemode.vb | 19 | ||||
| -rw-r--r-- | development-save-file/README.md | 3 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Desktop/FixedSysReport.txt | 6 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Desktop/Simplinton.zip | bin | 0 -> 4567 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Documents/ShiftOSInfo.txt | 1 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/128535-simple-red-square-icon-business-clock1.png | bin | 0 -> 59511 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/80px-HLSColorSpace.png | bin | 0 -> 5868 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/Gimp-3.png | bin | 0 -> 98340 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/Notepad.png | bin | 0 -> 62872 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/VLC_media_player_icon2.png | bin | 0 -> 196145 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/Windows-Update.png | bin | 0 -> 60464 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/Windows_Explorer_Icon-1.png | bin | 0 -> 37750 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/calculator.png | bin | 0 -> 29028 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/firefox-512-noshadow.png | bin | 0 -> 187028 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/firefox-64-noshadow.png | bin | 0 -> 9233 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/firefox.png | bin | 0 -> 3629 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/graphicpickericon.png | bin | 0 -> 27136 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/iconchanger.png | bin | 0 -> 12497 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/itunes.png | bin | 0 -> 426238 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/knowledge input.png | bin | 0 -> 36063 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/namechangericon.png | bin | 0 -> 18810 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/pong.png | bin | 0 -> 1609 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/skinloader.png | bin | 0 -> 39574 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/system_config_services.png | bin | 0 -> 14143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/terminal_icon.png | bin | 0 -> 117012 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Icons/test.zip | bin | 0 -> 1323590 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Music/royalty free/Exhilarate.mp3 | bin | 0 -> 5821253 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Music/royalty free/Iron Bacon.mp3 | bin | 0 -> 2204931 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Music/royalty free/Ouroboros.mp3 | bin | 0 -> 6464926 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Music/royalty free/RetroFuture Clean.mp3 | bin | 0 -> 8252416 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Music/royalty free/Wah Game Loop.mp3 | bin | 0 -> 3214234 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Dim Light.skn | bin | 0 -> 7430945 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Hacker.skn | bin | 0 -> 1927 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Industrial.skn | bin | 0 -> 1018138 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Linux Mint 7.skn | bin | 0 -> 3590437 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Mac OS 9.skn | bin | 0 -> 9577 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Skin.skn | bin | 0 -> 5967 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Steam.skn | bin | 0 -> 1531979 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Ubuntu 504.skn | bin | 0 -> 2651538 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Whistler Watercolor.skn | bin | 0 -> 632174 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Windows 95.skn | bin | 0 -> 564724 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Home/Skins/Windows XP.skn | bin | 0 -> 1610240 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Drivers/HDD.dri | 2001 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Drivers/Keyboard.dri | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Drivers/Monitor.dri | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Drivers/Mouse.dri | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Drivers/Printer.dri | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/HDAccess.sft | 1 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/icondata.dat | 51 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherartpadicon.pic | bin | 0 -> 110650 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcheraudioplayericon.pic | bin | 0 -> 179 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchercalculatoricon.pic | bin | 0 -> 175 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherclockicon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchercolourpickericon.pic | bin | 0 -> 168 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherfileopenericon.pic | bin | 0 -> 201 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherfilesavericon.pic | bin | 0 -> 193 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherfileskimmericon.pic | bin | 0 -> 184 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchergraphicpickericon.pic | bin | 0 -> 261 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchericonmanagericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherinfoboxicon.pic | bin | 0 -> 170 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherknowledgeinputicon.pic | bin | 0 -> 219 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchernamechangericon.pic | bin | 0 -> 214 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherpongicon.pic | bin | 0 -> 163 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchershiftericon.pic | bin | 0 -> 212 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchershiftoriumicon.pic | bin | 0 -> 222 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchershutdownicon.pic | bin | 0 -> 177 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherskinloadericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherterminalicon.pic | bin | 0 -> 203 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchertextpadicon.pic | bin | 0 -> 197 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launchervideoplayericon.pic | bin | 0 -> 242412 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/launcherwebbrowsericon.pic | bin | 0 -> 937 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonartpadicon.pic | bin | 0 -> 110650 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonaudioplayericon.pic | bin | 0 -> 179 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncalculatoricon.pic | bin | 0 -> 175 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonclockicon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncolourpickericon.pic | bin | 0 -> 168 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileopenericon.pic | bin | 0 -> 201 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfilesavericon.pic | bin | 0 -> 193 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileskimmericon.pic | bin | 0 -> 184 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttongraphicpickericon.pic | bin | 0 -> 261 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoniconmanagericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoninfoboxicon.pic | bin | 0 -> 170 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonknowledgeinputicon.pic | bin | 0 -> 219 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonnamechangericon.pic | bin | 0 -> 214 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonpongicon.pic | bin | 0 -> 163 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftericon.pic | bin | 0 -> 212 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftoriumicon.pic | bin | 0 -> 222 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonskinloadericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonterminalicon.pic | bin | 0 -> 203 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttontextpadicon.pic | bin | 0 -> 197 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonvideoplayericon.pic | bin | 0 -> 242412 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonwebbrowsericon.pic | bin | 0 -> 937 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarartpadicon.pic | bin | 0 -> 110650 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebaraudioplayericon.pic | bin | 0 -> 179 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarcalculatoricon.pic | bin | 0 -> 175 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarclockicon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarcolourpickericon.pic | bin | 0 -> 168 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileopenericon.pic | bin | 0 -> 201 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarfilesavericon.pic | bin | 0 -> 193 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileskimmericon.pic | bin | 0 -> 184 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebargraphicpickericon.pic | bin | 0 -> 261 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebariconmanagericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarinfoboxicon.pic | bin | 0 -> 170 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarknowledgeinputicon.pic | bin | 0 -> 219 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarnamechangericon.pic | bin | 0 -> 214 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarpongicon.pic | bin | 0 -> 163 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftericon.pic | bin | 0 -> 212 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftoriumicon.pic | bin | 0 -> 222 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarskinloadericon.pic | bin | 0 -> 211 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarterminalicon.pic | bin | 0 -> 203 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebartextpadicon.pic | bin | 0 -> 197 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarvideoplayericon.pic | bin | 0 -> 242412 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Icons/titlebarwebbrowsericon.pic | bin | 0 -> 937 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Languages/English.lang | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/SKernal.sft | bin | 0 -> 6632 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/SRead.sft | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/SWrite.sft | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/ShiftGUI.sft | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/background.jpg | bin | 0 -> 133021 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/borderbottom.png | bin | 0 -> 47941 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/borderleft.png | bin | 0 -> 48574 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/borderright.png | bin | 0 -> 48269 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomleftcorner.png | bin | 0 -> 48965 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomrightcorner.png | bin | 0 -> 48703 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/clock.png | bin | 0 -> 48144 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/closebutton.png | bin | 0 -> 52490 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/maximizebutton.png | bin | 0 -> 48887 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/minimizebutton.png | bin | 0 -> 48662 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/skindata.dat | 201 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/startbutton.png | bin | 0 -> 51238 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar button.png | bin | 0 -> 49016 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar.png | bin | 0 -> 47234 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebar.png | bin | 0 -> 47259 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarleft.png | bin | 0 -> 47858 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarright.png | bin | 0 -> 49675 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/SKN-version | 3 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtn | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnclick | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnhover | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/data.dat | 201 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/desktoppanel | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtn | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnclick | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnhover | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelbutton | bin | 0 -> 141 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelclock | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtn | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnclick | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnhover | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Loaded/titlebar | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/SKN-version | bin | 0 -> 170 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/background.jpg | bin | 0 -> 133021 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderbottom.png | bin | 0 -> 47941 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderleft.png | bin | 0 -> 48574 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderright.png | bin | 0 -> 48269 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomleftcorner.png | bin | 0 -> 48965 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomrightcorner.png | bin | 0 -> 48703 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/clock.png | bin | 0 -> 48144 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtn | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnclick | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnhover | bin | 0 -> 281 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebutton.png | bin | 0 -> 52490 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/data.dat | 201 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/desktoppanel | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/maximizebutton.png | bin | 0 -> 48887 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtn | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnclick | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnhover | bin | 0 -> 198 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/minimizebutton.png | bin | 0 -> 48662 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelbutton | bin | 0 -> 141 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelclock | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtn | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnclick | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnhover | bin | 0 -> 255 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/skindata.dat | 201 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/startbutton.png | bin | 0 -> 51238 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar button.png | bin | 0 -> 49016 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar.png | bin | 0 -> 47234 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar | bin | 0 -> 143 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar.png | bin | 0 -> 47259 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarleft.png | bin | 0 -> 47858 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarright.png | bin | 0 -> 49675 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/128535-simple-red-square-icon-business-clock1.png | bin | 0 -> 59511 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/Wallpaper.bmp | bin | 0 -> 169222 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/background.png | bin | 0 -> 49026 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/close actual.pic | bin | 0 -> 1078 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/close button.pic | bin | 0 -> 1078 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/panelbutton.png | bin | 0 -> 48098 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/rightborder.png | bin | 0 -> 48558 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.pic | bin | 0 -> 9654 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.png | bin | 0 -> 50310 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/taskbar.png | bin | 0 -> 49141 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/titlebar.png | bin | 0 -> 49936 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/toprightcorner.png | bin | 0 -> 47601 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/Shiftum42/Skins/Temp/ttbutton.pic | bin | 0 -> 13254 bytes | |||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Animals.lst | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Countries.lst | 0 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst | 11 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Fruits.lst | 10 | ||||
| -rw-r--r-- | development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst | 0 | ||||
| -rw-r--r-- | infobox.vb | 380 | ||||
| -rw-r--r-- | integer.vb | 1 |
742 files changed, 48327 insertions, 12933 deletions
diff --git a/.gitattributes b/.gitattributes deleted file mode 100644 index bdb0cab..0000000 --- a/.gitattributes +++ /dev/null @@ -1,17 +0,0 @@ -# Auto detect text files and perform LF normalization -* text=auto - -# Custom for Visual Studio -*.cs diff=csharp - -# Standard to msysgit -*.doc diff=astextplain -*.DOC diff=astextplain -*.docx diff=astextplain -*.DOCX diff=astextplain -*.dot diff=astextplain -*.DOT diff=astextplain -*.pdf diff=astextplain -*.PDF diff=astextplain -*.rtf diff=astextplain -*.RTF diff=astextplain @@ -1,10 +1,12 @@ +# 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 -*.userosscache *.sln.docstates # Build results @@ -183,34 +185,8 @@ UpgradeLog*.htm # Microsoft Fakes FakesAssemblies/ -# ========================= -# Operating System Files -# ========================= - -# OSX -# ========================= - -.DS_Store -.AppleDouble -.LSOverride - -# Thumbnails -._* - -# Files that might appear on external disk -.Spotlight-V100 -.Trashes - -# Directories potentially created on remote AFP share -.AppleDB -.AppleDesktop -Network Trash Folder -Temporary Items -.apdisk - -# Windows -# ========================= +### Windows ### # Windows image file caches Thumbs.db ehthumbs.db @@ -229,3 +205,13 @@ $RECYCLE.BIN/ # Windows shortcuts *.lnk + + +### Linux ### +*~ + +# KDE directory preferences +.directory + +# Vim swp files +*.swp diff --git a/Bitnote Address generator.exe b/Bitnote Address generator.exe Binary files differnew file mode 100644 index 0000000..ad7f5dd --- /dev/null +++ b/Bitnote Address generator.exe diff --git a/CustomColorTable.vb b/CustomColorTable.vb deleted file mode 100644 index 2818bbd..0000000 --- a/CustomColorTable.vb +++ /dev/null @@ -1,330 +0,0 @@ -' <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 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(ShiftOSDesktop.applauncherbackgroundcolour.ToArgb) - End Get - End Property - Public Overrides ReadOnly Property ImageMarginGradientMiddle() As Color - Get - Return Color.FromArgb(ShiftOSDesktop.applauncherbackgroundcolour.ToArgb) - End Get - End Property - Public Overrides ReadOnly Property ImageMarginGradientEnd() As Color - Get - Return Color.FromArgb(ShiftOSDesktop.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 ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttoncolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuStripGradientEnd() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttoncolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuItemSelected() As Color - Get - Return Color.FromArgb(ShiftOSDesktop.applaunchermouseovercolour.ToArgb) - End Get - End Property - Public Overrides ReadOnly Property MenuItemBorder() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttoncolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuBorder() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttoncolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttoncolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.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 ShiftOSDesktop.skinapplauncherbutton(2) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttonclickedcolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuItemPressedGradientMiddle() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(2) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.applauncherbuttonclickedcolour.ToArgb) - Else - Return Color.Transparent - End If - End Get - End Property - Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As Color - Get - If ShiftOSDesktop.skinapplauncherbutton(2) Is Nothing Then - Return Color.FromArgb(ShiftOSDesktop.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(ShiftOSDesktop.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/File Opener.resx b/File Opener.resx deleted file mode 100644 index 97375e8..0000000 --- a/File Opener.resx +++ /dev/null @@ -1,322 +0,0 @@ -<?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="scaninput.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>348, 12</value> - </metadata> - <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>1638, 18</value> - </metadata> - <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> - <value> - AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w - LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 - ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAU - KgAAAk1TRnQBSQFMAgEBDQEAASgBAQEoAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo - AwABqAMAAagDAAEBAQABCAUAAUABbhgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc - 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/AKQAKP+AACj/ - gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAC/wvsA/8BAATs - AQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAD/wvsA/8BAALs - AQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP+AAAP/C+wE/wIABv8CAAb/ - AgAE/4AAEf8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AAAL/C+wD/wEABOwBAAL/AQAE7AEAAv8BAATs - AQAC/4AAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALs - AQAD/4AAEv8CAAb/AgAG/wIABP+AACj/gAAo/4AAA/8L7AT/AgAG/wIABv8CAAT/gAAR/wEAAuwBAAT/ - AQAC7AEABP8BAALsAQAD/4AAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAQ/wEABOwBAAL/ - AQAE7AEAAv8BAATsAQAC/4AAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAS/wIABv8CAAb/ - AgAE/4AAKP+AACj/gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/ - gAAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/ - gAAD/wvsA/8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP//AP8A - /wDPACH/CQAh/zMAIf8JAAX/CuwS/wkAIf8zACH/CQAE/wzsEf8JACH/MwAh/wkAA/8D7AgAA+wQ/wkA - A/8bAAP/MwAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8BAAPsD/8JAAP/AQAZ7AEAA/8zAA//AewN/wHs - A/8JAAH/A+wBAAH/CAAB/wEAA+wO/wkAA/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAH/AuwBAAH/ - AgAB/wQAAf8CAAH/AQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAKP8GAA//D+wD/wkAAf8C7AMAAf8GAAH/ - AwAC7A7/CQAD/wEAGewBAAP/BQAo/wYAIf8JAAH/AuwFAAH/AgAB/wUAAuwO/wkAA/8BAALsFf8C7AEA - A/8FAAL/JAAC/wYABP8H7AT/D+wD/wkAAf8C7AYAAv8GAAvsBf8JAAP/AQAZ7AEAA/8FAAL/JAAC/wYA - D/8B7A3/AewD/wkAAf8C7AUAAf8CAAH/BQAM7AT/CQAD/wEAAuwV/wLsAQAD/wUAAv8OAAb/AQAG/wEA - Bv8CAAL/BgAD/wfsBf8B7A3/AewD/wkAAf8C7AMAAf8GAAH/AgAD7AgAA+wD/wkAA/8BABnsAQAD/wUA - Av8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/w/sA/8JAAH/AuwBAAH/AgAB/wQAAf8CAAPs - AQAB/wYAAf8BAAPsAv8JAAP/AQAE7BH/BOwBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA - Av8GACH/CQAB/wPsAQAB/wgAA+wBAAH/CAAB/wEAA+wB/wkAA/8BABnsAQAD/wUAAv8OAAH/BAAB/wEA - Af8EAAH/AQAB/wQAAf8CAAL/BgAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8C7AEAAf8CAAH/BAAB/wIA - Af8BAALsAf8JAAP/AQAZ7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAD/8B7A3/ - AewD/wkAA/8D7AgAAuwDAAH/BgAB/wMAAuwB/wkAA/8bAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/ - B+wF/wHsDf8B7AP/CQAE/wzsBQAB/wIAAf8FAALsAf8JAA7/BQAO/wUAAv8kAAL/BgAP/w/sA/8JAAX/ - C+wGAAL/BgAC7AH/CQAP/wPsD/8FAAL/JAAC/wYAIf8JAA7/AuwFAAH/AgAB/wUAAuwB/wkAIf8FACj/ - BgAE/wfsBP8P7AP/CQAO/wLsAwAB/wYAAf8DAALsAf8JAAP/CwAF/wsAA/8FACj/BgAP/wHsDf8B7AP/ - CQAO/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BAAvsA/8L7AEAA/8FACj/BgAD/wfsBf8B7A3/ - AewD/wkADv8D7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAo/wYAD/8P7AP/CQAJ/wnsAQAB/wYA - Af8BAAPsAv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAIf8JAAj/C+wIAAPsA/8JAAP/AQAE7BH/BOwBAAP/ - BQAC/yTsAv8GAAT/B+wE/w/sA/8JAAf/A+wHAAzsBP8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHsBgAB7AYA - AuwC/wYAD/8B7A3/AewD/wkABv8D7AEAAf8GAAH/CuwF/wkAA/8BAALsFf8C7AEAA/8FAAL/DuwGAAHs - BgAB7AYAAuwC/wYAA/8H7AX/AewN/wHsA/8JAAX/A+wBAAH/CAAB/wEAA+wK/wkAA/8BABnsAQAD/wUA - Av8O7AYAAewGAAHsBgAC7AL/BgAP/w/sA/8JAAX/AuwBAAH/AgAB/wQAAf8CAAH/AQAC7Ar/CQAD/wEA - AuwVAALsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAh/wkABf8C7AMAAf8GAAH/AwAC7Ar/CQAD/wEA - GewBAAP/BQAC/w7sBgAB7AYAAewGAALsAv8GAAT/B+wE/w/sA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/DuwGAAHsBgAB7AYAAuwC/wYAD/8B7A3/AewD/wkABf8C7AYAAv8GAALs - Cv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAA/8H7AX/AewN/wHsA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/JOwC/wYAD/8P7AP/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEA - A/8FACj/BgAh/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAo/wYA - BP8H7AT/D+wD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/MwAP/wHsDf8B7AP/CQAG/wPs - AQAB/wYAAf8BAAPsC/8JAAP/AQAZ7AEAA/8zAAP/B+wF/wHsDf8B7AP/CQAH/wPsCAAD7Az/CQAD/xsA - A/8zAA//D+wD/wkACP8M7A3/CQAh/zMAIf8JAAn/CuwO/wkAIf8zACH/CQAh/wkAIf8zACH//wCsAAH0 - Ie8BBwHyAf8FAAH0Ie8BBwHyAf9ZAAHyAQABQx4VARABEQG8AfQFAAHyFQAGDgYAAREBvAH0WQAB8gEO - AfcevAHsARUBvAH0BQAB8hQAAQ4BFQEUAhMBFAERAQ4EAAEOARUBvAH0LQAo7AQAAfIBDgH3HrwB7AEV - AbwB9AUAAfIUAAFDAfcBBwLvAfcBbQEQBAABDgEVAbwB9C0AD+wKAA/sBAAB8gEOAfcevAHsARUBvAH0 - BQAB8hQAAUMBBwHvAewBEgETAUMBDgQAAQ4BFQG8AfQtAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AfcU7AHv - BLwB7AEVAbwB9AUAAfIDAAEODEMBEAMAAUMBBwHtARUIAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQA - AfIBDgH3BLwBExEOAwAB7AS8AewBFQG8AfQFAAHyAwABEQzsAW0DAAFDAQcBkgETAQ8BDgYAAQ4BFQG8 - AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETARQP7wETAwAB7AS8AewBFQG8AfQFAAHyBAABDgEQ - CREBEAEOAwABQwEHAvIB8QEHARAFAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8 - AeoDAAHsBLwB7AEVAbwB9AUAAfIEAAEOAesJ7AEVBAABQwEHAe8B7AFtAeoBDgUAAQ4BFQG8AfQDACj/ - AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITDrwB7AFDAwABEwGSA7wB7AEVAbwB9AUAAfIEAAEOAe8CvAEH - BewB9wHqBAABQwEHAZIBEwIPAQ4FAAEOARUBvAH0AwAP/wEAGP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8 - AhMNvAEHARUBDgMAAQ4B6gO8AewBFQG8AfQFAAHyBAABDgHvArwB7wIOAg8BAAHsAeoEAAFDAQcB7wHr - ARIBEwEQAQ4EAAEOARUBvAH0AwAP/wIAF/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMOvAEHARIDAAHr - AQcDvAHsARUBvAH0BQAB8gQAAQ4B7wK8Ae8BDgHsAQcB7QEOAewB6gQAAREBkgHvAQcC7wEUAQ4EAAEO - ARUBvAH0AwAP/wMAFv8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMPvAH3AeoBDgHrAe8EvAHsARUBvAH0 - BQAB8gQAAQ4B7wHsARQBFQEAAREBFAFDAQAB7AHqBAABDgFDARUCFAEVAQ8FAAEOARUBvAH0AwAP/wQA - Ff8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAHsAesB7Ae8AfcBbQEHBbwB7AEVAbwB9AUAAfIEAAEO - Ae8BEwEQAuoBDwEQAuoBkgHqEAABDgEVAbwB9AMAD/8FABT/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAIT - BrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B7wETARUC9wEVARICvAEHAeoCAAEODA8BDgEAAUMBvAH0 - AwAP/wYAE/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8AfQFAAHyBAABDgHv - ARMBAAIOAQABEgK8AQcB6gIAAesM7QFDAQABEQG8AfQDAA//BwAS/wIAD+wBAAj/AQAP7AQAAfIBDgH3 - BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAu8E7QHvArwBBwHqAgABEAFDChUBEQEOAQABEQG8 - AfQDAA//CAAR/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEO - AeoJbQFDAwABFQltARIBDgIAAREBvAH0AwAP/wkAEP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMBBwH3 - BJIBEQEAARAFkgH3AQcIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAA/s - AQAI/wEAD+wEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAER - AbwB9AMAD/8KAA//AgAK7AYACP8HAAnsBAAB8gEOAfcEvAITAe8BDgwAAREB7Ai8AewBFQG8AfQFAAHy - EwABbQH3BkMB7QEHAZIBDgIAAREBvAH0AwAP/wkAEP8CAArsAQAT/wEACewEAAHyAQ4B9wS8AhMB7wEO - DAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAe8GbQH3AQcBkgEOAgABEQG8AfQDAA//CAAR/wIAC+wBABH/ - AQAK7AQAAfIBDgH3AbwBBwLtAkMB7AEODAABDwFtBO0B9wO8AewBFQG8AfQFAAHyEwABbQi8AQcBkgEO - AgABEQG8AfQDAA//BwAS/wIADOwBAA//AQAL7AQAAfIBDgH3AbwB7BgAARMDvAHsARUBvAH0BQAB8gQA - DA4DAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8GABP/AgAN7AEADf8BAAzsBAAB8gEOAfcBvAHsGAABEwO8 - AewBFQG8AfQFAAHyAwABEQzsAeoCAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8FABT/AgAO7AEAC/8BAA3s - BAAB8gEOAfcBvAHvBOsBbQEODAABDwETBOsB7QO8AewBFQG8AfQFAAHyAwABDgEUCxMBQwIAAW0IvAEH - AZIBDgIAAUMBvAH0AwAP/wQAFf8CAA/sAQAJ/wEADuwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8 - AfQFAAHyBAABDgEUCBIBEwERAwABFAnsAW0BDgEAAQ4BFQG8AfQDAA//AwAW/wIAEOwBAAf/AQAP7AQA - AfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOAe8CBwW8AQcB7wHqEAABDgEVAbwB9AMA - D/8CABf/AgAR7AEABf8BABDsBAAB8gEOAfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wFt - AeoEvAHvARAB7AHqBgABEAFDAxUBEQEOAwABDgEVAbwB9AMAD/8BABj/AgAS7AEAA/8BABHsBAAB8gEO - AfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wGSAW0B6gEHAbwB7QESAewB9wHqBgAB6wKS - Au0BbQERAwABDgEVAbwB9AMAKP8CABPsAQAB/wEAEuwEAAHyAQ4B9wa8AQcB6gQTAQ4DAAEVAxMBbQH3 - CLwB7AEVAbwB9AUAAfIEAAEOAe8BvAGSARIC7AJtAgcB6gUAAQ4BkgEHAfcC6wESARADAAEOARUBvAH0 - AwAo/wIAFOwBABPsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwBBwGSAREBDwHq - Ae8BvAEHAeoFAAEOApIB6gcAAQ4BFQG8AfQDACj/AgAo7AQAAfIBDgH3DLwBFQMAAZINvAHsARUBvAH0 - BQAB8gQAAQ4B7wG8AewBEQHvAQcB6wFDAgcB6gUAAQ4CkgHqBwABDgEVAbwB9AMAKP8CACjsBAAB8gEO - AfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAewB6gHtAQcBvAHvAewBFAHtAeoFAAEOAZICvALv - ARQEAAEOARUBvAH0WQAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAuwEvAHvAeoBkgHq - BQABDgGSAgcC7QEVBAABDgEVAbwB9C0AD+wdAAHyAQ4B9wy8ARIDEAH3DbwB7AEVAbwB9AUAAfIEAAEO - AewI9wHtARMFAAEOAZIB9wFtAg4FAAEOARUBvAH0LQAO7B4AAfIBDgH3DLwEBw68AewBFQG8AfQFAAHy - BQAKDgYAAQ4BkgHvAewCFQEQAQ4DAAEOARUBvAH0WQAB8gEOAfcevAHsARUBvAH0BQAB8hUAAQ4B7ALv - ApIBEgEPBAABEQG8AfRZAAHyAQABEh5tARQBQwG8AfQFAAHyFgABFQHqA20BQwEOBAABEQG8AfRZAAHz - IW0B7AHxAfQFAAHzIW0B7AHxAfT/AIIAIf8JACH/XQAh/wkAIf9dACH/CQAh/y8AKOwGACH/CQAE/xrs - A/8FACjsAgAo7AYAIf8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYADv8E7A//CQAD/xrs - BP8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JACH/BQAo7AIAKOwGACH/CQAE/xrs - A/8FACTsBP8CACjsBgAh/wkAIf8FACHsB/8CACjsBgAh/wkAIf8FAAX/GuwJ/wIAKOwGAA7/AZID7A// - CQAD/xrsBP8FAAj/FuwF/wHsBP8CACjsBgAO/wGSA+wP/wkAIf8FAA//C+wJ/wLsA/8CACjsBgAO/wGS - A+wB8g7/CQAh/wUAHv8B7AX/AewD/wIAKOwGAA7/AQcD7AG8Dv8JAAT/GuwD/wUAHv8C7AT/AuwC/wIA - KOwGAA7/AfEE7A7/CQAh/wUAF/8D7AX/AuwE/wHsAv8CACjsBgAP/wTsAe8N/wkAIf8FABn/AuwF/wHs - BP8B7AL/AgAo7AYAD/8B8QTsAe8M/wkAA/8a7AT/BQAa/wHsBf8B7AT/AewC/wIAKOwGABD/AbwE7AHv - AfQK/wkAIf8FABr/AuwE/wHsBP8C7AH/AgAo7AYAEf8BvATsAe0B9An/CQAh/wUAE/8E7AT/AuwJ/wHs - Af8CACjsBgAS/wHwBOwBkgn/CQAE/xrsA/8FABb/AuwF/wHsCv8CACjsBgAT/wHyBOwB7wj/CQAh/wUA - F/8B7An/BuwB/wIAKOwGABT/AfIE7AHyB/8JACH/BQAX/wLsBv8J7AIAKOwGABX/AbwD7AHvB/8JAAP/ - GuwE/wUAEP8B7Af/AuwE/wrsAgAo7AYAFv8E7Af/CQAh/wUAEP8D7Ab/AuwC/wvsAgAo7AYABv8B8wHv - AZIB7AHvC/8BkgPsB/8JACH/BQAS/wPsB/8M7AIAKOwGAAb/AfQD7AHtC/8B7QPsB/8JAAT/GuwD/wUA - FP8C7Ab/DOwCACjsBgAH/wTsAfIJ/wHzA+wB7Qf/CQAh/wUAFf8C7AT/DewCACjsBgAH/wEHA+wB9wn/ - AfcD7AHvB/8JACH/BQAN/wTsBf8D7AL/DewCACjsBgAH/wH0BOwB7wf/Ae8E7AHzB/8JAAP/GuwE/wUA - EP8C7An/DewCACjsBgAI/wEHBOwBkgHwAfQB/wH0AfABkgTsAQcI/wkAIf8FABH/AewJ/w3sAgAo7AYA - Cf8B7w3sAe8J/wkAIf8FABH/COwC/w3sAgAo7AYACv8B8AvsAfAK/wkABP8a7AP/BQAb/w3sMAAL/wH0 - AbwB9wTsAe0B7wG8DP8JACH/BQAc/wzsAgAP7B8AIf8JACH/BQAc/wzsAgAO7CAAIf8JAAP/GuwE/10A - If8JACH/XQAh/wkAIf9dACH/CQAh/9YAAUIBTQE+BwABPgMAASgDAAGoAwABqAMAAQEBAAEBBQABwAEP - FgAD/wEABf8BwBIABf8BwBIABf8BwP8A/wD/AHUABf8BwBIABf8BwBIABf8BwBIAAfADAAEBAfwEAAF/ - Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEB - AfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHA - AwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQA - AX8F/wHAAwABBwMAFf8DAAr/Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMABf8BwAQAAQ4EAAEP - AYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED - DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO - BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP - AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA - AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A - AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA - AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA - AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAwMABf8BwAEAAR8C/wH+ - BAABDwGAAwABAwMABf8BwAEAAT8C/wH+BAABDwGAAwABAwMABf8BwAEAAX8C/wH+BAABDwGAAwABAwMA - Cv8B/gQAAQ8BgAMAAQMDAAr/Af4EAAEPAYADAAEDAwAV/wMABf8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/ - BAABHwX/AwAF/wH8BAABfwQAAR8F/wgAATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHAoA - AX8C/wH8BAABfwQAARwKAAP/AfwEAAF/BAABHAkAAQED/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEf - Bf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQAAR8F/wMACw== -</value> - </data> - <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/File Saver.resx b/File Saver.resx deleted file mode 100644 index 97375e8..0000000 --- a/File Saver.resx +++ /dev/null @@ -1,322 +0,0 @@ -<?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="scaninput.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>348, 12</value> - </metadata> - <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>1638, 18</value> - </metadata> - <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> - <value> - AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w - LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 - ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAU - KgAAAk1TRnQBSQFMAgEBDQEAASgBAQEoAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo - AwABqAMAAagDAAEBAQABCAUAAUABbhgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc - 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/AKQAKP+AACj/ - gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAC/wvsA/8BAATs - AQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAD/wvsA/8BAALs - AQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP+AAAP/C+wE/wIABv8CAAb/ - AgAE/4AAEf8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AAAL/C+wD/wEABOwBAAL/AQAE7AEAAv8BAATs - AQAC/4AAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALs - AQAD/4AAEv8CAAb/AgAG/wIABP+AACj/gAAo/4AAA/8L7AT/AgAG/wIABv8CAAT/gAAR/wEAAuwBAAT/ - AQAC7AEABP8BAALsAQAD/4AAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAQ/wEABOwBAAL/ - AQAE7AEAAv8BAATsAQAC/4AAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAS/wIABv8CAAb/ - AgAE/4AAKP+AACj/gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/ - gAAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/ - gAAD/wvsA/8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP//AP8A - /wDPACH/CQAh/zMAIf8JAAX/CuwS/wkAIf8zACH/CQAE/wzsEf8JACH/MwAh/wkAA/8D7AgAA+wQ/wkA - A/8bAAP/MwAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8BAAPsD/8JAAP/AQAZ7AEAA/8zAA//AewN/wHs - A/8JAAH/A+wBAAH/CAAB/wEAA+wO/wkAA/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAH/AuwBAAH/ - AgAB/wQAAf8CAAH/AQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAKP8GAA//D+wD/wkAAf8C7AMAAf8GAAH/ - AwAC7A7/CQAD/wEAGewBAAP/BQAo/wYAIf8JAAH/AuwFAAH/AgAB/wUAAuwO/wkAA/8BAALsFf8C7AEA - A/8FAAL/JAAC/wYABP8H7AT/D+wD/wkAAf8C7AYAAv8GAAvsBf8JAAP/AQAZ7AEAA/8FAAL/JAAC/wYA - D/8B7A3/AewD/wkAAf8C7AUAAf8CAAH/BQAM7AT/CQAD/wEAAuwV/wLsAQAD/wUAAv8OAAb/AQAG/wEA - Bv8CAAL/BgAD/wfsBf8B7A3/AewD/wkAAf8C7AMAAf8GAAH/AgAD7AgAA+wD/wkAA/8BABnsAQAD/wUA - Av8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/w/sA/8JAAH/AuwBAAH/AgAB/wQAAf8CAAPs - AQAB/wYAAf8BAAPsAv8JAAP/AQAE7BH/BOwBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA - Av8GACH/CQAB/wPsAQAB/wgAA+wBAAH/CAAB/wEAA+wB/wkAA/8BABnsAQAD/wUAAv8OAAH/BAAB/wEA - Af8EAAH/AQAB/wQAAf8CAAL/BgAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8C7AEAAf8CAAH/BAAB/wIA - Af8BAALsAf8JAAP/AQAZ7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAD/8B7A3/ - AewD/wkAA/8D7AgAAuwDAAH/BgAB/wMAAuwB/wkAA/8bAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/ - B+wF/wHsDf8B7AP/CQAE/wzsBQAB/wIAAf8FAALsAf8JAA7/BQAO/wUAAv8kAAL/BgAP/w/sA/8JAAX/ - C+wGAAL/BgAC7AH/CQAP/wPsD/8FAAL/JAAC/wYAIf8JAA7/AuwFAAH/AgAB/wUAAuwB/wkAIf8FACj/ - BgAE/wfsBP8P7AP/CQAO/wLsAwAB/wYAAf8DAALsAf8JAAP/CwAF/wsAA/8FACj/BgAP/wHsDf8B7AP/ - CQAO/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BAAvsA/8L7AEAA/8FACj/BgAD/wfsBf8B7A3/ - AewD/wkADv8D7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAo/wYAD/8P7AP/CQAJ/wnsAQAB/wYA - Af8BAAPsAv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAIf8JAAj/C+wIAAPsA/8JAAP/AQAE7BH/BOwBAAP/ - BQAC/yTsAv8GAAT/B+wE/w/sA/8JAAf/A+wHAAzsBP8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHsBgAB7AYA - AuwC/wYAD/8B7A3/AewD/wkABv8D7AEAAf8GAAH/CuwF/wkAA/8BAALsFf8C7AEAA/8FAAL/DuwGAAHs - BgAB7AYAAuwC/wYAA/8H7AX/AewN/wHsA/8JAAX/A+wBAAH/CAAB/wEAA+wK/wkAA/8BABnsAQAD/wUA - Av8O7AYAAewGAAHsBgAC7AL/BgAP/w/sA/8JAAX/AuwBAAH/AgAB/wQAAf8CAAH/AQAC7Ar/CQAD/wEA - AuwVAALsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAh/wkABf8C7AMAAf8GAAH/AwAC7Ar/CQAD/wEA - GewBAAP/BQAC/w7sBgAB7AYAAewGAALsAv8GAAT/B+wE/w/sA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/DuwGAAHsBgAB7AYAAuwC/wYAD/8B7A3/AewD/wkABf8C7AYAAv8GAALs - Cv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAA/8H7AX/AewN/wHsA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/JOwC/wYAD/8P7AP/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEA - A/8FACj/BgAh/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAo/wYA - BP8H7AT/D+wD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/MwAP/wHsDf8B7AP/CQAG/wPs - AQAB/wYAAf8BAAPsC/8JAAP/AQAZ7AEAA/8zAAP/B+wF/wHsDf8B7AP/CQAH/wPsCAAD7Az/CQAD/xsA - A/8zAA//D+wD/wkACP8M7A3/CQAh/zMAIf8JAAn/CuwO/wkAIf8zACH/CQAh/wkAIf8zACH//wCsAAH0 - Ie8BBwHyAf8FAAH0Ie8BBwHyAf9ZAAHyAQABQx4VARABEQG8AfQFAAHyFQAGDgYAAREBvAH0WQAB8gEO - AfcevAHsARUBvAH0BQAB8hQAAQ4BFQEUAhMBFAERAQ4EAAEOARUBvAH0LQAo7AQAAfIBDgH3HrwB7AEV - AbwB9AUAAfIUAAFDAfcBBwLvAfcBbQEQBAABDgEVAbwB9C0AD+wKAA/sBAAB8gEOAfcevAHsARUBvAH0 - BQAB8hQAAUMBBwHvAewBEgETAUMBDgQAAQ4BFQG8AfQtAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AfcU7AHv - BLwB7AEVAbwB9AUAAfIDAAEODEMBEAMAAUMBBwHtARUIAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQA - AfIBDgH3BLwBExEOAwAB7AS8AewBFQG8AfQFAAHyAwABEQzsAW0DAAFDAQcBkgETAQ8BDgYAAQ4BFQG8 - AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETARQP7wETAwAB7AS8AewBFQG8AfQFAAHyBAABDgEQ - CREBEAEOAwABQwEHAvIB8QEHARAFAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8 - AeoDAAHsBLwB7AEVAbwB9AUAAfIEAAEOAesJ7AEVBAABQwEHAe8B7AFtAeoBDgUAAQ4BFQG8AfQDACj/ - AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITDrwB7AFDAwABEwGSA7wB7AEVAbwB9AUAAfIEAAEOAe8CvAEH - BewB9wHqBAABQwEHAZIBEwIPAQ4FAAEOARUBvAH0AwAP/wEAGP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8 - AhMNvAEHARUBDgMAAQ4B6gO8AewBFQG8AfQFAAHyBAABDgHvArwB7wIOAg8BAAHsAeoEAAFDAQcB7wHr - ARIBEwEQAQ4EAAEOARUBvAH0AwAP/wIAF/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMOvAEHARIDAAHr - AQcDvAHsARUBvAH0BQAB8gQAAQ4B7wK8Ae8BDgHsAQcB7QEOAewB6gQAAREBkgHvAQcC7wEUAQ4EAAEO - ARUBvAH0AwAP/wMAFv8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMPvAH3AeoBDgHrAe8EvAHsARUBvAH0 - BQAB8gQAAQ4B7wHsARQBFQEAAREBFAFDAQAB7AHqBAABDgFDARUCFAEVAQ8FAAEOARUBvAH0AwAP/wQA - Ff8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAHsAesB7Ae8AfcBbQEHBbwB7AEVAbwB9AUAAfIEAAEO - Ae8BEwEQAuoBDwEQAuoBkgHqEAABDgEVAbwB9AMAD/8FABT/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAIT - BrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B7wETARUC9wEVARICvAEHAeoCAAEODA8BDgEAAUMBvAH0 - AwAP/wYAE/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8AfQFAAHyBAABDgHv - ARMBAAIOAQABEgK8AQcB6gIAAesM7QFDAQABEQG8AfQDAA//BwAS/wIAD+wBAAj/AQAP7AQAAfIBDgH3 - BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAu8E7QHvArwBBwHqAgABEAFDChUBEQEOAQABEQG8 - AfQDAA//CAAR/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEO - AeoJbQFDAwABFQltARIBDgIAAREBvAH0AwAP/wkAEP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMBBwH3 - BJIBEQEAARAFkgH3AQcIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAA/s - AQAI/wEAD+wEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAER - AbwB9AMAD/8KAA//AgAK7AYACP8HAAnsBAAB8gEOAfcEvAITAe8BDgwAAREB7Ai8AewBFQG8AfQFAAHy - EwABbQH3BkMB7QEHAZIBDgIAAREBvAH0AwAP/wkAEP8CAArsAQAT/wEACewEAAHyAQ4B9wS8AhMB7wEO - DAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAe8GbQH3AQcBkgEOAgABEQG8AfQDAA//CAAR/wIAC+wBABH/ - AQAK7AQAAfIBDgH3AbwBBwLtAkMB7AEODAABDwFtBO0B9wO8AewBFQG8AfQFAAHyEwABbQi8AQcBkgEO - AgABEQG8AfQDAA//BwAS/wIADOwBAA//AQAL7AQAAfIBDgH3AbwB7BgAARMDvAHsARUBvAH0BQAB8gQA - DA4DAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8GABP/AgAN7AEADf8BAAzsBAAB8gEOAfcBvAHsGAABEwO8 - AewBFQG8AfQFAAHyAwABEQzsAeoCAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8FABT/AgAO7AEAC/8BAA3s - BAAB8gEOAfcBvAHvBOsBbQEODAABDwETBOsB7QO8AewBFQG8AfQFAAHyAwABDgEUCxMBQwIAAW0IvAEH - AZIBDgIAAUMBvAH0AwAP/wQAFf8CAA/sAQAJ/wEADuwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8 - AfQFAAHyBAABDgEUCBIBEwERAwABFAnsAW0BDgEAAQ4BFQG8AfQDAA//AwAW/wIAEOwBAAf/AQAP7AQA - AfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOAe8CBwW8AQcB7wHqEAABDgEVAbwB9AMA - D/8CABf/AgAR7AEABf8BABDsBAAB8gEOAfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wFt - AeoEvAHvARAB7AHqBgABEAFDAxUBEQEOAwABDgEVAbwB9AMAD/8BABj/AgAS7AEAA/8BABHsBAAB8gEO - AfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wGSAW0B6gEHAbwB7QESAewB9wHqBgAB6wKS - Au0BbQERAwABDgEVAbwB9AMAKP8CABPsAQAB/wEAEuwEAAHyAQ4B9wa8AQcB6gQTAQ4DAAEVAxMBbQH3 - CLwB7AEVAbwB9AUAAfIEAAEOAe8BvAGSARIC7AJtAgcB6gUAAQ4BkgEHAfcC6wESARADAAEOARUBvAH0 - AwAo/wIAFOwBABPsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwBBwGSAREBDwHq - Ae8BvAEHAeoFAAEOApIB6gcAAQ4BFQG8AfQDACj/AgAo7AQAAfIBDgH3DLwBFQMAAZINvAHsARUBvAH0 - BQAB8gQAAQ4B7wG8AewBEQHvAQcB6wFDAgcB6gUAAQ4CkgHqBwABDgEVAbwB9AMAKP8CACjsBAAB8gEO - AfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAewB6gHtAQcBvAHvAewBFAHtAeoFAAEOAZICvALv - ARQEAAEOARUBvAH0WQAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAuwEvAHvAeoBkgHq - BQABDgGSAgcC7QEVBAABDgEVAbwB9C0AD+wdAAHyAQ4B9wy8ARIDEAH3DbwB7AEVAbwB9AUAAfIEAAEO - AewI9wHtARMFAAEOAZIB9wFtAg4FAAEOARUBvAH0LQAO7B4AAfIBDgH3DLwEBw68AewBFQG8AfQFAAHy - BQAKDgYAAQ4BkgHvAewCFQEQAQ4DAAEOARUBvAH0WQAB8gEOAfcevAHsARUBvAH0BQAB8hUAAQ4B7ALv - ApIBEgEPBAABEQG8AfRZAAHyAQABEh5tARQBQwG8AfQFAAHyFgABFQHqA20BQwEOBAABEQG8AfRZAAHz - IW0B7AHxAfQFAAHzIW0B7AHxAfT/AIIAIf8JACH/XQAh/wkAIf9dACH/CQAh/y8AKOwGACH/CQAE/xrs - A/8FACjsAgAo7AYAIf8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYADv8E7A//CQAD/xrs - BP8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JACH/BQAo7AIAKOwGACH/CQAE/xrs - A/8FACTsBP8CACjsBgAh/wkAIf8FACHsB/8CACjsBgAh/wkAIf8FAAX/GuwJ/wIAKOwGAA7/AZID7A// - CQAD/xrsBP8FAAj/FuwF/wHsBP8CACjsBgAO/wGSA+wP/wkAIf8FAA//C+wJ/wLsA/8CACjsBgAO/wGS - A+wB8g7/CQAh/wUAHv8B7AX/AewD/wIAKOwGAA7/AQcD7AG8Dv8JAAT/GuwD/wUAHv8C7AT/AuwC/wIA - KOwGAA7/AfEE7A7/CQAh/wUAF/8D7AX/AuwE/wHsAv8CACjsBgAP/wTsAe8N/wkAIf8FABn/AuwF/wHs - BP8B7AL/AgAo7AYAD/8B8QTsAe8M/wkAA/8a7AT/BQAa/wHsBf8B7AT/AewC/wIAKOwGABD/AbwE7AHv - AfQK/wkAIf8FABr/AuwE/wHsBP8C7AH/AgAo7AYAEf8BvATsAe0B9An/CQAh/wUAE/8E7AT/AuwJ/wHs - Af8CACjsBgAS/wHwBOwBkgn/CQAE/xrsA/8FABb/AuwF/wHsCv8CACjsBgAT/wHyBOwB7wj/CQAh/wUA - F/8B7An/BuwB/wIAKOwGABT/AfIE7AHyB/8JACH/BQAX/wLsBv8J7AIAKOwGABX/AbwD7AHvB/8JAAP/ - GuwE/wUAEP8B7Af/AuwE/wrsAgAo7AYAFv8E7Af/CQAh/wUAEP8D7Ab/AuwC/wvsAgAo7AYABv8B8wHv - AZIB7AHvC/8BkgPsB/8JACH/BQAS/wPsB/8M7AIAKOwGAAb/AfQD7AHtC/8B7QPsB/8JAAT/GuwD/wUA - FP8C7Ab/DOwCACjsBgAH/wTsAfIJ/wHzA+wB7Qf/CQAh/wUAFf8C7AT/DewCACjsBgAH/wEHA+wB9wn/ - AfcD7AHvB/8JACH/BQAN/wTsBf8D7AL/DewCACjsBgAH/wH0BOwB7wf/Ae8E7AHzB/8JAAP/GuwE/wUA - EP8C7An/DewCACjsBgAI/wEHBOwBkgHwAfQB/wH0AfABkgTsAQcI/wkAIf8FABH/AewJ/w3sAgAo7AYA - Cf8B7w3sAe8J/wkAIf8FABH/COwC/w3sAgAo7AYACv8B8AvsAfAK/wkABP8a7AP/BQAb/w3sMAAL/wH0 - AbwB9wTsAe0B7wG8DP8JACH/BQAc/wzsAgAP7B8AIf8JACH/BQAc/wzsAgAO7CAAIf8JAAP/GuwE/10A - If8JACH/XQAh/wkAIf9dACH/CQAh/9YAAUIBTQE+BwABPgMAASgDAAGoAwABqAMAAQEBAAEBBQABwAEP - FgAD/wEABf8BwBIABf8BwBIABf8BwP8A/wD/AHUABf8BwBIABf8BwBIABf8BwBIAAfADAAEBAfwEAAF/ - Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEB - AfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHA - AwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQA - AX8F/wHAAwABBwMAFf8DAAr/Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMABf8BwAQAAQ4EAAEP - AYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED - DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO - BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP - AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA - AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A - AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA - AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA - AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAwMABf8BwAEAAR8C/wH+ - BAABDwGAAwABAwMABf8BwAEAAT8C/wH+BAABDwGAAwABAwMABf8BwAEAAX8C/wH+BAABDwGAAwABAwMA - Cv8B/gQAAQ8BgAMAAQMDAAr/Af4EAAEPAYADAAEDAwAV/wMABf8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/ - BAABHwX/AwAF/wH8BAABfwQAAR8F/wgAATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHAoA - AX8C/wH8BAABfwQAARwKAAP/AfwEAAF/BAABHAkAAQED/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEf - Bf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQAAR8F/wMACw== -</value> - </data> - <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/File Skimmer.resx b/File Skimmer.resx deleted file mode 100644 index 42527f8..0000000 --- a/File Skimmer.resx +++ /dev/null @@ -1,322 +0,0 @@ -<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>28, 12</value> - </metadata> - <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> - <value> - AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w - LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 - ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAAU - KgAAAk1TRnQBSQFMAgEBDQEAASABAQEgAQEBKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo - AwABqAMAAagDAAEBAQABCAUAAUABbhgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc - 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/AKQAKP+AACj/ - gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAC/wvsA/8BAATs - AQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAD/wvsA/8BAALs - AQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP+AAAP/C+wE/wIABv8CAAb/ - AgAE/4AAEf8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AAAL/C+wD/wEABOwBAAL/AQAE7AEAAv8BAATs - AQAC/4AAEP8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AAAP/C+wD/wEAAuwBAAT/AQAC7AEABP8BAALs - AQAD/4AAEv8CAAb/AgAG/wIABP+AACj/gAAo/4AAA/8L7AT/AgAG/wIABv8CAAT/gAAR/wEAAuwBAAT/ - AQAC7AEABP8BAALsAQAD/4AAAv8L7AP/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/gAAQ/wEABOwBAAL/ - AQAE7AEAAv8BAATsAQAC/4AAA/8L7AP/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/gAAS/wIABv8CAAb/ - AgAE/4AAKP+AACj/gAAD/wvsBP8CAAb/AgAG/wIABP+AABH/AQAC7AEABP8BAALsAQAE/wEAAuwBAAP/ - gAAC/wvsA/8BAATsAQAC/wEABOwBAAL/AQAE7AEAAv+AABD/AQAE7AEAAv8BAATsAQAC/wEABOwBAAL/ - gAAD/wvsA/8BAALsAQAE/wEAAuwBAAT/AQAC7AEAA/+AABL/AgAG/wIABv8CAAT/gAAo/4AAKP//AP8A - /wDPACH/CQAh/zMAIf8JAAX/CuwS/wkAIf8zACH/CQAE/wzsEf8JACH/MwAh/wkAA/8D7AgAA+wQ/wkA - A/8bAAP/MwAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8BAAPsD/8JAAP/AQAZ7AEAA/8zAA//AewN/wHs - A/8JAAH/A+wBAAH/CAAB/wEAA+wO/wkAA/8BABnsAQAD/zMAA/8H7AX/AewN/wHsA/8JAAH/AuwBAAH/ - AgAB/wQAAf8CAAH/AQAC7A7/CQAD/wEAAuwV/wLsAQAD/wUAKP8GAA//D+wD/wkAAf8C7AMAAf8GAAH/ - AwAC7A7/CQAD/wEAGewBAAP/BQAo/wYAIf8JAAH/AuwFAAH/AgAB/wUAAuwO/wkAA/8BAALsFf8C7AEA - A/8FAAL/JAAC/wYABP8H7AT/D+wD/wkAAf8C7AYAAv8GAAvsBf8JAAP/AQAZ7AEAA/8FAAL/JAAC/wYA - D/8B7A3/AewD/wkAAf8C7AUAAf8CAAH/BQAM7AT/CQAD/wEAAuwV/wLsAQAD/wUAAv8OAAb/AQAG/wEA - Bv8CAAL/BgAD/wfsBf8B7A3/AewD/wkAAf8C7AMAAf8GAAH/AgAD7AgAA+wD/wkAA/8BABnsAQAD/wUA - Av8OAAH/BAAB/wEAAf8EAAH/AQAB/wQAAf8CAAL/BgAP/w/sA/8JAAH/AuwBAAH/AgAB/wQAAf8CAAPs - AQAB/wYAAf8BAAPsAv8JAAP/AQAE7BH/BOwBAAP/BQAC/w4AAf8EAAH/AQAB/wQAAf8BAAH/BAAB/wIA - Av8GACH/CQAB/wPsAQAB/wgAA+wBAAH/CAAB/wEAA+wB/wkAA/8BABnsAQAD/wUAAv8OAAH/BAAB/wEA - Af8EAAH/AQAB/wQAAf8CAAL/BgAE/wfsBP8P7AP/CQAC/wPsAQAB/wYAAf8C7AEAAf8CAAH/BAAB/wIA - Af8BAALsAf8JAAP/AQAZ7AEAA/8FAAL/DgAB/wQAAf8BAAH/BAAB/wEAAf8EAAH/AgAC/wYAD/8B7A3/ - AewD/wkAA/8D7AgAAuwDAAH/BgAB/wMAAuwB/wkAA/8bAAP/BQAC/w4ABv8BAAb/AQAG/wIAAv8GAAP/ - B+wF/wHsDf8B7AP/CQAE/wzsBQAB/wIAAf8FAALsAf8JAA7/BQAO/wUAAv8kAAL/BgAP/w/sA/8JAAX/ - C+wGAAL/BgAC7AH/CQAP/wPsD/8FAAL/JAAC/wYAIf8JAA7/AuwFAAH/AgAB/wUAAuwB/wkAIf8FACj/ - BgAE/wfsBP8P7AP/CQAO/wLsAwAB/wYAAf8DAALsAf8JAAP/CwAF/wsAA/8FACj/BgAP/wHsDf8B7AP/ - CQAO/wLsAQAB/wIAAf8EAAH/AgAB/wEAAuwB/wkAA/8BAAvsA/8L7AEAA/8FACj/BgAD/wfsBf8B7A3/ - AewD/wkADv8D7AEAAf8IAAH/AQAD7AH/CQAD/wEAGewBAAP/BQAo/wYAD/8P7AP/CQAJ/wnsAQAB/wYA - Af8BAAPsAv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAIf8JAAj/C+wIAAPsA/8JAAP/AQAE7BH/BOwBAAP/ - BQAC/yTsAv8GAAT/B+wE/w/sA/8JAAf/A+wHAAzsBP8JAAP/AQAZ7AEAA/8FAAL/DuwGAAHsBgAB7AYA - AuwC/wYAD/8B7A3/AewD/wkABv8D7AEAAf8GAAH/CuwF/wkAA/8BAALsFf8C7AEAA/8FAAL/DuwGAAHs - BgAB7AYAAuwC/wYAA/8H7AX/AewN/wHsA/8JAAX/A+wBAAH/CAAB/wEAA+wK/wkAA/8BABnsAQAD/wUA - Av8O7AYAAewGAAHsBgAC7AL/BgAP/w/sA/8JAAX/AuwBAAH/AgAB/wQAAf8CAAH/AQAC7Ar/CQAD/wEA - AuwVAALsAQAD/wUAAv8O7AYAAewGAAHsBgAC7AL/BgAh/wkABf8C7AMAAf8GAAH/AwAC7Ar/CQAD/wEA - GewBAAP/BQAC/w7sBgAB7AYAAewGAALsAv8GAAT/B+wE/w/sA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/DuwGAAHsBgAB7AYAAuwC/wYAD/8B7A3/AewD/wkABf8C7AYAAv8GAALs - Cv8JAAP/AQAZ7AEAA/8FAAL/JOwC/wYAA/8H7AX/AewN/wHsA/8JAAX/AuwFAAH/AgAB/wUAAuwK/wkA - A/8BAALsFQAC7AEAA/8FAAL/JOwC/wYAD/8P7AP/CQAF/wLsAwAB/wYAAf8DAALsCv8JAAP/AQAZ7AEA - A/8FACj/BgAh/wkABf8C7AEAAf8CAAH/BAAB/wIAAf8BAALsCv8JAAP/AQAC7BUAAuwBAAP/BQAo/wYA - BP8H7AT/D+wD/wkABf8D7AEAAf8IAAH/AQAD7Ar/CQAD/wEAGewBAAP/MwAP/wHsDf8B7AP/CQAG/wPs - AQAB/wYAAf8BAAPsC/8JAAP/AQAZ7AEAA/8zAAP/B+wF/wHsDf8B7AP/CQAH/wPsCAAD7Az/CQAD/xsA - A/8zAA//D+wD/wkACP8M7A3/CQAh/zMAIf8JAAn/CuwO/wkAIf8zACH/CQAh/wkAIf8zACH//wCsAAH0 - Ie8BBwHyAf8FAAH0Ie8BBwHyAf9ZAAHyAQABQx4VARABEQG8AfQFAAHyFQAGDgYAAREBvAH0WQAB8gEO - AfcevAHsARUBvAH0BQAB8hQAAQ4BFQEUAhMBFAERAQ4EAAEOARUBvAH0LQAo7AQAAfIBDgH3HrwB7AEV - AbwB9AUAAfIUAAFDAfcBBwLvAfcBbQEQBAABDgEVAbwB9C0AD+wKAA/sBAAB8gEOAfcevAHsARUBvAH0 - BQAB8hQAAUMBBwHvAewBEgETAUMBDgQAAQ4BFQG8AfQtAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AfcU7AHv - BLwB7AEVAbwB9AUAAfIDAAEODEMBEAMAAUMBBwHtARUIAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQA - AfIBDgH3BLwBExEOAwAB7AS8AewBFQG8AfQFAAHyAwABEQzsAW0DAAFDAQcBkgETAQ8BDgYAAQ4BFQG8 - AfQDACj/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAETARQP7wETAwAB7AS8AewBFQG8AfQFAAHyBAABDgEQ - CREBEAEOAwABQwEHAvIB8QEHARAFAAEOARUBvAH0AwAo/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEw+8 - AeoDAAHsBLwB7AEVAbwB9AUAAfIEAAEOAesJ7AEVBAABQwEHAe8B7AFtAeoBDgUAAQ4BFQG8AfQDACj/ - AgAP7AEACP8BAA/sBAAB8gEOAfcEvAITDrwB7AFDAwABEwGSA7wB7AEVAbwB9AUAAfIEAAEOAe8CvAEH - BewB9wHqBAABQwEHAZIBEwIPAQ4FAAEOARUBvAH0AwAP/wEAGP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8 - AhMNvAEHARUBDgMAAQ4B6gO8AewBFQG8AfQFAAHyBAABDgHvArwB7wIOAg8BAAHsAeoEAAFDAQcB7wHr - ARIBEwEQAQ4EAAEOARUBvAH0AwAP/wIAF/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMOvAEHARIDAAHr - AQcDvAHsARUBvAH0BQAB8gQAAQ4B7wK8Ae8BDgHsAQcB7QEOAewB6gQAAREBkgHvAQcC7wEUAQ4EAAEO - ARUBvAH0AwAP/wMAFv8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMPvAH3AeoBDgHrAe8EvAHsARUBvAH0 - BQAB8gQAAQ4B7wHsARQBFQEAAREBFAFDAQAB7AHqBAABDgFDARUCFAEVAQ8FAAEOARUBvAH0AwAP/wQA - Ff8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAHsAesB7Ae8AfcBbQEHBbwB7AEVAbwB9AUAAfIEAAEO - Ae8BEwEQAuoBDwEQAuoBkgHqEAABDgEVAbwB9AMAD/8FABT/AgAP7AEACP8BAA/sBAAB8gEOAfcEvAIT - BrwBFQEAAUMPvAHsARUBvAH0BQAB8gQAAQ4B7wETARUC9wEVARICvAEHAeoCAAEODA8BDgEAAUMBvAH0 - AwAP/wYAE/8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMGvAEVAQABQw+8AewBFQG8AfQFAAHyBAABDgHv - ARMBAAIOAQABEgK8AQcB6gIAAesM7QFDAQABEQG8AfQDAA//BwAS/wIAD+wBAAj/AQAP7AQAAfIBDgH3 - BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEOAu8E7QHvArwBBwHqAgABEAFDChUBEQEOAQABEQG8 - AfQDAA//CAAR/wIAD+wBAAj/AQAP7AQAAfIBDgH3BLwCEwa8ARUBAAFDD7wB7AEVAbwB9AUAAfIEAAEO - AeoJbQFDAwABFQltARIBDgIAAREBvAH0AwAP/wkAEP8CAA/sAQAI/wEAD+wEAAHyAQ4B9wS8AhMBBwH3 - BJIBEQEAARAFkgH3AQcIvAHsARUBvAH0BQAB8hMAAW0IvAEHAZIBDgIAAREBvAH0AwAP/woAD/8CAA/s - AQAI/wEAD+wEAAHyAQ4B9wS8AhMB7wEODAABEQHsCLwB7AEVAbwB9AUAAfITAAFtCLwBBwGSAQ4CAAER - AbwB9AMAD/8KAA//AgAK7AYACP8HAAnsBAAB8gEOAfcEvAITAe8BDgwAAREB7Ai8AewBFQG8AfQFAAHy - EwABbQH3BkMB7QEHAZIBDgIAAREBvAH0AwAP/wkAEP8CAArsAQAT/wEACewEAAHyAQ4B9wS8AhMB7wEO - DAABEQHsCLwB7AEVAbwB9AUAAfITAAFtAe8GbQH3AQcBkgEOAgABEQG8AfQDAA//CAAR/wIAC+wBABH/ - AQAK7AQAAfIBDgH3AbwBBwLtAkMB7AEODAABDwFtBO0B9wO8AewBFQG8AfQFAAHyEwABbQi8AQcBkgEO - AgABEQG8AfQDAA//BwAS/wIADOwBAA//AQAL7AQAAfIBDgH3AbwB7BgAARMDvAHsARUBvAH0BQAB8gQA - DA4DAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8GABP/AgAN7AEADf8BAAzsBAAB8gEOAfcBvAHsGAABEwO8 - AewBFQG8AfQFAAHyAwABEQzsAeoCAAFtCLwBBwGSAQ4CAAERAbwB9AMAD/8FABT/AgAO7AEAC/8BAA3s - BAAB8gEOAfcBvAHvBOsBbQEODAABDwETBOsB7QO8AewBFQG8AfQFAAHyAwABDgEUCxMBQwIAAW0IvAEH - AZIBDgIAAUMBvAH0AwAP/wQAFf8CAA/sAQAJ/wEADuwEAAHyAQ4B9wa8Ae8BDgwAAREB7Ai8AewBFQG8 - AfQFAAHyBAABDgEUCBIBEwERAwABFAnsAW0BDgEAAQ4BFQG8AfQDAA//AwAW/wIAEOwBAAf/AQAP7AQA - AfIBDgH3BrwB7wEODAABEQHsCLwB7AEVAbwB9AUAAfIEAAEOAe8CBwW8AQcB7wHqEAABDgEVAbwB9AMA - D/8CABf/AgAR7AEABf8BABDsBAAB8gEOAfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wFt - AeoEvAHvARAB7AHqBgABEAFDAxUBEQEOAwABDgEVAbwB9AMAD/8BABj/AgAS7AEAA/8BABHsBAAB8gEO - AfcGvAHvAQ4MAAERAewIvAHsARUBvAH0BQAB8gQAAQ4B7wGSAW0B6gEHAbwB7QESAewB9wHqBgAB6wKS - Au0BbQERAwABDgEVAbwB9AMAKP8CABPsAQAB/wEAEuwEAAHyAQ4B9wa8AQcB6gQTAQ4DAAEVAxMBbQH3 - CLwB7AEVAbwB9AUAAfIEAAEOAe8BvAGSARIC7AJtAgcB6gUAAQ4BkgEHAfcC6wESARADAAEOARUBvAH0 - AwAo/wIAFOwBABPsBAAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAbwBBwGSAREBDwHq - Ae8BvAEHAeoFAAEOApIB6gcAAQ4BFQG8AfQDACj/AgAo7AQAAfIBDgH3DLwBFQMAAZINvAHsARUBvAH0 - BQAB8gQAAQ4B7wG8AewBEQHvAQcB6wFDAgcB6gUAAQ4CkgHqBwABDgEVAbwB9AMAKP8CACjsBAAB8gEO - AfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAewB6gHtAQcBvAHvAewBFAHtAeoFAAEOAZICvALv - ARQEAAEOARUBvAH0WQAB8gEOAfcMvAEVAwABkg28AewBFQG8AfQFAAHyBAABDgHvAuwEvAHvAeoBkgHq - BQABDgGSAgcC7QEVBAABDgEVAbwB9C0AD+wdAAHyAQ4B9wy8ARIDEAH3DbwB7AEVAbwB9AUAAfIEAAEO - AewI9wHtARMFAAEOAZIB9wFtAg4FAAEOARUBvAH0LQAO7B4AAfIBDgH3DLwEBw68AewBFQG8AfQFAAHy - BQAKDgYAAQ4BkgHvAewCFQEQAQ4DAAEOARUBvAH0WQAB8gEOAfcevAHsARUBvAH0BQAB8hUAAQ4B7ALv - ApIBEgEPBAABEQG8AfRZAAHyAQABEh5tARQBQwG8AfQFAAHyFgABFQHqA20BQwEOBAABEQG8AfRZAAHz - IW0B7AHxAfQFAAHzIW0B7AHxAfT/AIIAIf8JACH/XQAh/wkAIf9dACH/CQAh/y8AKOwGACH/CQAE/xrs - A/8FACjsAgAo7AYAIf8JACH/BQAo7AIAKOwGAA7/BOwP/wkAIf8FACjsAgAo7AYADv8E7A//CQAD/xrs - BP8FACjsAgAo7AYADv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JACH/BQAo7AIAKOwGACH/CQAE/xrs - A/8FACTsBP8CACjsBgAh/wkAIf8FACHsB/8CACjsBgAh/wkAIf8FAAX/GuwJ/wIAKOwGAA7/AZID7A// - CQAD/xrsBP8FAAj/FuwF/wHsBP8CACjsBgAO/wGSA+wP/wkAIf8FAA//C+wJ/wLsA/8CACjsBgAO/wGS - A+wB8g7/CQAh/wUAHv8B7AX/AewD/wIAKOwGAA7/AQcD7AG8Dv8JAAT/GuwD/wUAHv8C7AT/AuwC/wIA - KOwGAA7/AfEE7A7/CQAh/wUAF/8D7AX/AuwE/wHsAv8CACjsBgAP/wTsAe8N/wkAIf8FABn/AuwF/wHs - BP8B7AL/AgAo7AYAD/8B8QTsAe8M/wkAA/8a7AT/BQAa/wHsBf8B7AT/AewC/wIAKOwGABD/AbwE7AHv - AfQK/wkAIf8FABr/AuwE/wHsBP8C7AH/AgAo7AYAEf8BvATsAe0B9An/CQAh/wUAE/8E7AT/AuwJ/wHs - Af8CACjsBgAS/wHwBOwBkgn/CQAE/xrsA/8FABb/AuwF/wHsCv8CACjsBgAT/wHyBOwB7wj/CQAh/wUA - F/8B7An/BuwB/wIAKOwGABT/AfIE7AHyB/8JACH/BQAX/wLsBv8J7AIAKOwGABX/AbwD7AHvB/8JAAP/ - GuwE/wUAEP8B7Af/AuwE/wrsAgAo7AYAFv8E7Af/CQAh/wUAEP8D7Ab/AuwC/wvsAgAo7AYABv8B8wHv - AZIB7AHvC/8BkgPsB/8JACH/BQAS/wPsB/8M7AIAKOwGAAb/AfQD7AHtC/8B7QPsB/8JAAT/GuwD/wUA - FP8C7Ab/DOwCACjsBgAH/wTsAfIJ/wHzA+wB7Qf/CQAh/wUAFf8C7AT/DewCACjsBgAH/wEHA+wB9wn/ - AfcD7AHvB/8JACH/BQAN/wTsBf8D7AL/DewCACjsBgAH/wH0BOwB7wf/Ae8E7AHzB/8JAAP/GuwE/wUA - EP8C7An/DewCACjsBgAI/wEHBOwBkgHwAfQB/wH0AfABkgTsAQcI/wkAIf8FABH/AewJ/w3sAgAo7AYA - Cf8B7w3sAe8J/wkAIf8FABH/COwC/w3sAgAo7AYACv8B8AvsAfAK/wkABP8a7AP/BQAb/w3sMAAL/wH0 - AbwB9wTsAe0B7wG8DP8JACH/BQAc/wzsAgAP7B8AIf8JACH/BQAc/wzsAgAO7CAAIf8JAAP/GuwE/10A - If8JACH/XQAh/wkAIf9dACH/CQAh/9YAAUIBTQE+BwABPgMAASgDAAGoAwABqAMAAQEBAAEBBQABwAEP - FgAD/wEABf8BwBIABf8BwBIABf8BwP8A/wD/AHUABf8BwBIABf8BwBIABf8BwBIAAfADAAEBAfwEAAF/ - Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMAAfADAAEB - AfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFw - BAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMAAfADAAEBAfwEAAFwBAABAwHAAwABBwMA - AfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQAAX8F/wHA - AwABBwMAAfADAAEBAfwEAAF/Bf8BwAMAAQcDAAHwAwABAQH8BAABfwX/AcADAAEHAwAB8AMAAQEB/AQA - AX8F/wHAAwABBwMAFf8DAAr/Af4EAAEPAYADAAEDAwAK/wH+BAABDwGAAwABAwMABf8BwAQAAQ4EAAEP - AYADAAEDAwAF/wHABAABDgQAAQ8BgAMAAQMDAAX/AcAEAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAED - DQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEO - BAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEP - AYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMA - AQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0A - AQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQA - AQ8BgAMAAQMNAAEOBAABDwGAAwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGA - AwABAw0AAQ4EAAEPAYADAAEDDQABDgQAAQ8BgAMAAQMNAAEOBAABDwGAAwABAwMABf8BwAEAAR8C/wH+ - BAABDwGAAwABAwMABf8BwAEAAT8C/wH+BAABDwGAAwABAwMABf8BwAEAAX8C/wH+BAABDwGAAwABAwMA - Cv8B/gQAAQ8BgAMAAQMDAAr/Af4EAAEPAYADAAEDAwAV/wMABf8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/ - BAABHwX/AwAF/wH8BAABfwQAAR8F/wgAATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0A - ATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHA0AATwEAAF/BAABHAoA - AX8C/wH8BAABfwQAARwKAAP/AfwEAAF/BAABHAkAAQED/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEf - Bf8DAAX/AfwEAAF/BAABHwX/AwAF/wH8BAABfwQAAR8F/wMACw== -</value> - </data> - <metadata name="fileactions.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>138, 12</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/File Skimmer.vb b/File Skimmer.vb deleted file mode 100644 index 317cf54..0000000 --- a/File Skimmer.vb +++ /dev/null @@ -1,661 +0,0 @@ -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 - - Dim itemsdeleted As Integer - Dim filetype As Integer - - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load - justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 - Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - - ShiftOSDesktop.pnlpanelbuttonfileskimmer.SendToBack() - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfileskimmer, ShiftOSDesktop.tbfileskimmericon, ShiftOSDesktop.tbfileskimmertext, True) - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 - - setupoptions() - End Sub - - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.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 = ShiftOSDesktop.skinclosebutton(1) - End Sub - - Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) - End Sub - - Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) - End Sub - - Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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 = ShiftOSDesktop.skinrollupbutton(1) - End Sub - - Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) - End Sub - - Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) - 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If - End If - - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.fileskimmername - lbtitletext.Show() - End If - - If ShiftOSDesktop.boughtclosebutton = False Then - closebutton.Hide() - Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.Show() - End If - - If ShiftOSDesktop.boughtrollupbutton = False Then - rollupbutton.Hide() - Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.Show() - End If - - If ShiftOSDesktop.boughtminimizebutton = False Then - minimizebutton.Hide() - Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - - If ShiftOSDesktop.boughtfileskimmericon = True Then - pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) - pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) - pnlicon.Image = ShiftOSDesktop.fileskimmericontitlebar '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 - - Private Sub Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 - Me.Hide() - ShiftOSDesktop.setuppanelbuttons() - End Sub - - Private Sub resettitlebar() - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.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 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - - 'end of general setup - - 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 ".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 Else - filetype = 1 - End Select - 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/" 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 - If TextPad.needtosave = False Then - TextPad.Show() - TextPad.txtuserinput.Text = My.Computer.FileSystem.ReadAllText(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) - 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 lvfiles.SelectedItems(0).Text Like "*.pic" Then - If ArtPad.needtosave = False Then - ArtPad.Show() - ArtPad.savelocation = (lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text) - 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 lvfiles.SelectedItems(0).Text 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 lvfiles.SelectedItems(0).Text 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 lvfiles.SelectedItems(0).Text 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 lvfiles.SelectedItems(0).Text 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 lvfiles.SelectedItems(0).Text Like "*.skn" Then - Skin_Loader.Show() - ShiftOSDesktop.disposeoldskindata("skinloaderemovepreview") - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) - System.IO.Compression.ZipFile.ExtractToDirectory(lbllocation.Text & "\" & lvfiles.SelectedItems(0).Text, "C:\ShiftOS\Shiftum42\Skins\Preview\") - My.Computer.FileSystem.WriteAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) - Skin_Loader.loadlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat") - Skin_Loader.loadskintopreview() - Skin_Loader.skinloaded = True - 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 - 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(sender As Object, e As EventArgs) 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() - 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 - My.Computer.FileSystem.DeleteDirectory(lbllocation.Text & "/" & lvfiles.SelectedItems(0).Text, FileIO.DeleteDirectoryOption.DeleteAllContents) - My.Computer.Audio.Play(My.Resources.writesound, AudioPlayMode.Background) - showcontents() - 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 -End Class
\ No newline at end of file @@ -1,21 +1,33 @@ -The MIT License (MIT) - -Copyright (c) 2015 ShiftOS/Philip Adams - -Permission is hereby granted, free of charge, to any person obtaining a copy -of this software and associated documentation files (the "Software"), to deal -in the Software without restriction, including without limitation the rights -to use, copy, modify, merge, publish, distribute, sublicense, and/or sell -copies of the Software, and to permit persons to whom the Software is -furnished to do so, subject to the following conditions: - -The above copyright notice and this permission notice shall be included in all -copies or substantial portions of the Software. - -THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR -IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, -FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE -AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER -LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, -OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE -SOFTWARE. +*(change this to a more standard open or closed source license in the future)*
+
+ShiftOS temporary license as of 1st December 2014
+
+This document is auto-extracted from the ShiftOS executable if version is beta 5.2 or greater
+
+These terms apply to everyone
+
+## Definitions
+
+- The program, the executable or ShiftOS refers to the distributed ShiftOS binary executable program. (ie: ShiftOS.exe)
+- Source code refers to the decompiled code of ShiftOS (ie: ShiftOSDesktop.vb)
+
+## You can:
+
+- Redistribute the executable if this license is also provided and link to orginal forum/website is given (shiftos.net)
+- Use for any non-commercial purpose that does not restrict users
+
+## You must:
+
+- Include the original copyright notice when redistributing binary copies of this program
+
+## You cannot:
+
+- Use this program commercially
+- Use this program to restrict users (e.g. using this software to implement DRM standards)
+- Redistribute copies of this source code to non-maintainers
+- Decompile the executable or attempt to view/access the source code in any other way without the prior permission of a lead developer.
+- Sublicense
+
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.
diff --git a/ShiftOS Launcher/ShiftOS Launcher.sln b/ShiftOS Launcher/ShiftOS Launcher.sln new file mode 100644 index 0000000..989ca71 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher.sln @@ -0,0 +1,20 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio Express 2012 for Windows Desktop +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ShiftOS Launcher", "ShiftOS Launcher\ShiftOS Launcher.vbproj", "{E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}.Debug|Any CPU.Build.0 = Debug|Any CPU + {E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}.Release|Any CPU.ActiveCfg = Release|Any CPU + {E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/App.config b/ShiftOS Launcher/ShiftOS Launcher/App.config index bc3672d..bc3672d 100644 --- a/App.config +++ b/ShiftOS Launcher/ShiftOS Launcher/App.config diff --git a/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.Designer.vb b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.Designer.vb new file mode 100644 index 0000000..f26f248 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.Designer.vb @@ -0,0 +1,108 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class FirstBootSetup + 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(FirstBootSetup)) + Me.RadioButton1 = New System.Windows.Forms.RadioButton() + Me.RadioButton2 = New System.Windows.Forms.RadioButton() + Me.TextBox1 = New System.Windows.Forms.TextBox() + Me.Button1 = New System.Windows.Forms.Button() + Me.TextBox2 = New System.Windows.Forms.TextBox() + Me.SuspendLayout() + ' + 'RadioButton1 + ' + Me.RadioButton1.AutoSize = True + Me.RadioButton1.Checked = True + Me.RadioButton1.Location = New System.Drawing.Point(12, 12) + Me.RadioButton1.Name = "RadioButton1" + Me.RadioButton1.Size = New System.Drawing.Size(124, 17) + Me.RadioButton1.TabIndex = 0 + Me.RadioButton1.TabStop = True + Me.RadioButton1.Text = "Use Stable Releases" + Me.RadioButton1.UseVisualStyleBackColor = True + ' + 'RadioButton2 + ' + Me.RadioButton2.AutoSize = True + Me.RadioButton2.Location = New System.Drawing.Point(12, 35) + Me.RadioButton2.Name = "RadioButton2" + Me.RadioButton2.Size = New System.Drawing.Size(131, 17) + Me.RadioButton2.TabIndex = 1 + Me.RadioButton2.Text = "Use Unstable releases" + Me.RadioButton2.UseVisualStyleBackColor = True + ' + 'TextBox1 + ' + Me.TextBox1.Location = New System.Drawing.Point(12, 73) + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.Size = New System.Drawing.Size(515, 20) + Me.TextBox1.TabIndex = 2 + Me.TextBox1.Text = "Where do you want your ShiftOS executables to be save to? Nothing = C:\ShiftOS\La" & _ + "uncher\ShiftOSEXE\" + ' + 'Button1 + ' + Me.Button1.Location = New System.Drawing.Point(164, 146) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(205, 103) + Me.Button1.TabIndex = 3 + Me.Button1.Text = "Finish First Boot Setup!" + Me.Button1.UseVisualStyleBackColor = True + ' + 'TextBox2 + ' + Me.TextBox2.Location = New System.Drawing.Point(12, 100) + Me.TextBox2.Name = "TextBox2" + Me.TextBox2.Size = New System.Drawing.Size(212, 20) + Me.TextBox2.TabIndex = 4 + Me.TextBox2.Text = "Type in a nickname here" + ' + 'FirstBootSetup + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(536, 261) + Me.Controls.Add(Me.TextBox2) + Me.Controls.Add(Me.Button1) + Me.Controls.Add(Me.TextBox1) + Me.Controls.Add(Me.RadioButton2) + Me.Controls.Add(Me.RadioButton1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "FirstBootSetup" + Me.ShowInTaskbar = False + Me.Text = "First Boot Setup" + Me.TopMost = True + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents RadioButton1 As System.Windows.Forms.RadioButton + Friend WithEvents RadioButton2 As System.Windows.Forms.RadioButton + Friend WithEvents TextBox1 As System.Windows.Forms.TextBox + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents TextBox2 As System.Windows.Forms.TextBox +End Class diff --git a/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.resx b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.resx new file mode 100644 index 0000000..b620454 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.resx @@ -0,0 +1,760 @@ +<?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="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + AAABAAEAYGAAAAAAIAColAAAFgAAACgAAABgAAAAwAAAAAEAIAAAAAAAACABAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABQAAAAwODg4SDAwMFgsLCxcLCwsXCwsLFwsL + CxcLCwsXCwsLFwsLCxcLCwsXCwsLFwwMDBYAAAASAAAADAAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAMDg4OEgwMDBYLCwsXEhISHBUV + FSQZGRkpHBwcLRwcHC4cHBwuFhYWLhYWFi4WFhYuFhYWLhYWFi4WFhYuFhYWLhcXFy0TExMpDg4OJAkJ + CRwLCwsXDAwMFgAAABIAAAAMAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAMDg4OEhIS + EhwVFRUkGRkZKRwcHC0cHBwuIyMjMyMjIzsoKChAJSUlRCUlJUUlJSVFISEhRSEhIUUhISFFISEhRSEh + IUUhISFFISEhRSIiIkQgICBAGhoaOxkZGTMREREuFxcXLRMTEykODg4kCQkJHAAAABIAAAAMAAAABQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAFAAAAEBISEhwcHBwkGRkZKSMjIzMnJyc7KCgoQCUlJUQlJSVFLS0tSi8vL1IuLi5YMDAwWy8v + L1wsLCxcLCwsXCwsLFwsLCxcLCwsXCwsLFwqKipcKioqXCcnJ1smJiZYIiIiUiIiIkoeHh5FHh4eRBwc + HEAaGho7GRkZMxMTEykODg4kCQkJHAAAABAAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAABQAAABASEhIcGhoaJygoKDMrKys7LCwsQDQ0NEoyMjJSMTExWDAw + MFssLCxcMTExYjMzM2k1NTVvNjY2cjMzM3MxMTFzMTExczExMXMxMTFzMTExczExMXMvLy9zLy8vcy0t + LXIsLCxvJycnaScnJ2IhISFcJCQkWyYmJlgiIiJSIiIiShwcHEAaGho7FBQUMw0NDScJCQkcAAAAEAAA + AAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUQEBAQGxsbHBoaGicoKCgzKSkpPjQ0 + NEo1NTVSNDQ0WDw8PGI9PT1pOTk5bzY2NnIxMTFzNzc3eTg4OIA3NzeGODg4iTc3N4s1NTWLMzMzizMz + M4sxMTGLMTExizExMYsxMTGLMDAwiy4uLokuLi6GLCwsgCoqKnkmJiZzKCgocikpKW8pKSlpJycnYiAg + IFgfHx9SHx8fShkZGT4UFBQzDQ0NJwkJCRwAAAAQAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEEBAQEBsb + GxwaGhonKCgoMykpKT40NDRKNjY2VT4+PmI/Pz9pPDw8b0FBQXlAQECAPT09hjo6Ook1NTWLOjo6kDs7 + O5g6OjqdOzs7oTo6OqI5OTmiNzc3ojU1NaI1NTWiNTU1ojU1NaI1NTWiNDQ0ojExMaExMTGdLS0tmCws + LJAoKCiLLS0tiSwsLIYsLCyAKioqeSUlJW8kJCRpJCQkYh4eHlUcHBxKFRUVPhQUFDMNDQ0nCQkJHAAA + ABAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAgcHBwbISEhJygoKDMtLS0+Nzc3SjY2NlU+Pj5iPz8/bUVFRXlERESAQUFBhkVF + RZBDQ0OYPz8/nT4+PqE6OjqiPj4+p0BAQK9BQUG0QkJCuEFBQbk/Pz+5Pj4+uTw8PLk8PDy5PDw8uTw8 + PLk8PDy5Ozs7uTc3N7g0NDS0MjIyry8vL6cuLi6iLy8voS8vL50tLS2YLCwskCgoKIYoKCiAKCgoeSMj + I20iIiJiGxsbVRwcHEoVFRU+FBQUMw0NDScJCQkbAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACBkZGR8pKSkyLS0tPjc3N0o5OTlVPj4+Yj09 + PW1FRUV5REREhElJSZBISEiYREREnUlJSadHR0evRUVFtEVFRbhDQ0O5SkpKvk1NTcZPT0/MUVFRz09P + T9BPT0/QTU1N0ExMTNBMTEzQTExM0ExMTNBLS0vQSUlJ0EdHR89DQ0PMPj4+xjw8PL42Nja5NjY2uDQ0 + NLQyMjKvLy8vpyoqKp0qKiqYKioqkCUlJYQkJCR5ISEhbSIiImIbGxtVHBwcShUVFT4PDw8yCAgIHwAA + AAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQQEBAQGRkZHy8v + LzY7OztJPDw8VURERGJBQUFtRUVFeUJCQoRJSUmQRUVFm0xMTKdMTEyvSkpKtFJSUr5RUVHGUlJSzFRU + VM9UVFTQZmZm229vb+p0dHT1eHh4/Hh4eP92dnb/dXV1/3Nzc/9zc3P/c3Nz/3Nzc/9ycnL/cXFx/2xs + bPxnZ2f1XV1d6lZWVttHR0fQREREz0BAQMw8PDzGODg4vi8vL7QtLS2vLCwspyYmJpslJSWQIyMjhCQk + JHkhISFtHx8fYhsbG1UYGBhJExMTNggICB8AAAAQAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAACBwcHBshISEnLy8vNj4+Pk5ISEhgRkZGbUpKSnlFRUWESUlJkEVFRZtLS0unSkpKslNT + U75VVVXGVVVVzGpqattwcHDqdHR09Xt7e/x8fHz/eXl5/3Fxcf9xcXH/bW1t/2tra/9paWn/aGho/2dn + Z/9nZ2f/Z2dn/2dnZ/9mZmb/ZGRk/2JiYv9kZGT/Y2Nj/2pqav9sbGz/aWlp/GBgYPVWVlbqTU1N2zs7 + O8w2NjbGMjIyvikpKbIoKCinJCQkmyUlJZAjIyOEIiIieR4eHm0dHR1gGhoaThMTEzYNDQ0nCQkJGwAA + AAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIISEhHy4uLjIxMTE+Ozs7TklJSWVPT094S0tLhE5O + TpBISEibTExMp0lJSbJQUFC+UlJSyWpqattycnLqdnZ29Xx8fP97e3v/d3d3/3Nzc/9ubm7/bW1t/2Zm + Zv9lZWX/YWFh/19fX/9eXl7/XV1d/1xcXP9cXFz/XFxc/1xcXP9bW1v/Wlpa/1lZWf9cXFz/W1tb/2Fh + Yf9gYGD/Y2Nj/2VlZf9lZWX/YmJi/1lZWfVPT0/qRUVF2zMzM8kuLi6+JycnsiYmJqcjIyObIyMjkCEh + IYQgICB4Hh4eZRcXF04VFRU+Dw8PMggICB8AAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAghISEfNDQ0Nj8/ + P0k/Pz9VR0dHZVBQUHxVVVWPUVFRm1FRUadMTEyyUFBQvlBQUMloaGjbcXFx8Xh4eP97e3v/fn5+/3R0 + dP9wcHD/bGxs/2dnZ/9jY2P/YmJi/1tbW/9bW1v/V1dX/1VVVf9VVVX/VFRU/1NTU/9UVFT/U1NT/1NT + U/9TU1P/UlJS/1FRUf9UVFT/VFRU/1paWv9ZWVn/W1tb/15eXv9eXl7/X19f/2VlZf9dXV3/VlZW/0tL + S/E/Pz/bLi4uySoqKr4lJSWyJSUlpyMjI5skJCSPISEhfBwcHGUYGBhVFRUVSRMTEzYICAgfAAAACAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAACCEhIR80NDQ2RUVFTk1NTWBLS0ttUFBQfFVVVZNYWFimUVFRslRUVL5SUlLJZWVl221t + bfFzc3P/eHh4/3x8fP90dHT/cnJy/2hoaP9lZWX/YmJi/11dXf9aWlr/WVlZ/1JSUv9PT0//SUlJ/0ZG + Rv9DQ0P/QkJC/0BAQP9CQkL/QkJC/0VFRf9JSUn/SkpK/0pKSv9NTU3/TU1N/1NTU/9SUlL/VFRU/1dX + V/9XV1f/WFhY/19fX/9cXFz/YGBg/1lZWf9QUFD/RUVF8To6OtsqKirJJycnviQkJLIjIyOmIyMjkx8f + H3wcHBxtGxsbYBcXF04TExM2CAgIHwAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIISEhHzQ0NDZFRUVOU1NTZVlZWXhRUVGEU1NTk1hY + WKpaWlq9VlZWyWhoaNttbW3xbm5u/3Fxcf93d3f/cXFx/3BwcP9paWn/aGho/19fX/9cXFz/WVlZ/1JS + Uv9JSUn/RUVF/z4+Pv87Ozv/NTU1/zExMf8sLCz/IyMj/x4eHv8oKCj/MjIy/zs7O/9AQED/Q0ND/0VF + Rf9JSUn/SkpK/09PT/9NTU3/Tk5O/1BQUP9RUVH/UlJS/1lZWf9XV1f/W1tb/1paWv9cXFz/UlJS/0hI + SP8+Pj7xMjIy2yYmJskmJia9JCQkqiMjI5MfHx+EICAgeBwcHGUXFxdOExMTNggICB8AAAAIAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQhISEfOTk5NkVF + RU5TU1NlX19ffGBgYI9XV1ebV1dXqltbW8JpaWnZb29v8W1tbf9ubm7/cHBw/29vb/9ra2v/Z2dn/2Zm + Zv9gYGD/YGBg/1ZWVv9MTEz/RUVF/z4+Pv80NDT/JSUl/x0dHf8bGxv/FRUV/w4ODv8KCgr/DAwM/w8P + D/8UFBT/Ghoa/yEhIf8pKSn/MDAw/zY2Nv87Ozv/SUlJ/1BQUP9MTEz/TExM/01NTf9MTEz/TU1N/1NT + U/9RUVH/VVVV/1VVVf9XV1f/Wlpa/1RUVP9HR0f/PT09/zc3N/EuLi7ZJiYmwiIiIqohISGbJCQkjyEh + IXwcHBxlFxcXThMTEzYICAgfAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAABkZGRQ5OTk2SEhITlZWVmVfX198ZmZmk2VlZaZZWVmyWVlZwm9vb+Fubm7/a2tr/2xs + bP9wcHD/ZWVl/2BgYP9dXV3/XFxc/19fX/9ZWVn/V1dX/0ZGRv87Ozv/NTU1/ywsLP8mJib/Hx8f/xYW + Fv8PDw//CQkJ/wMDA/8AAAD/AQEB/wEBAf8CAgL/BgYG/wwMDP8TExP/Gxsb/yUlJf8wMDD/OTk5/0hI + SP9KSkr/TExM/05OTv9MTEz/S0tL/1FRUf9NTU3/UVFR/1FRUf9TU1P/VlZW/1RUVP9VVVX/RkZG/zw8 + PP82Njb/MTEx4SUlJcIiIiKyIyMjpiQkJJMhISF8HBwcZRcXF04TExM2AAAAFAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACDU1NStLS0tOWFhYZWNjY3xoaGiTampqqmho + aL1cXFzJbW1t4Wtra/9oaGj/ampq/29vb/9jY2P/U1NT/1NTU/9TU1P/V1dX/1lZWf9QUFD/S0tL/0BA + QP85OTn/MjIy/ysrK/8jIyP/Gxsb/xEREf8ICAj/AwMD/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wEB + Af8BAQH/BAQE/wwMDP8WFhb/JSUl/zU1Nf8/Pz//SEhI/1FRUf9PT0//TU1N/1JSUv9NTU3/UFBQ/05O + Tv9QUFD/U1NT/1FRUf9RUVH/VVVV/0dHR/87Ozv/NDQ0/y4uLuEjIyPJJiYmvSUlJaokJCSTISEhfB4e + HmUaGhpOEhISKwAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEISEhH01N + TUJdXV1lZ2dnfG1tbZNtbW2qbm5uwnZ2dtlycnLxampq/2NjY/9lZWX/ampq/19fX/9OTk7/SUlJ/0xM + TP9QUFD/UlJS/09PT/9HR0f/RUVF/z09Pf84ODj/MzMz/yoqKv8gICD/FxcX/wwMDP8DAwP/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8CAgL/CAgI/xQUFP8nJyf/ODg4/0lJ + Sf9SUlL/UlJS/1ZWVv9QUFD/UVFR/09PT/9PT0//UVFR/05OTv9OTk7/UlJS/1RUVP9HR0f/ODg4/zIy + Mv8vLy/xKysr2SYmJsIlJSWqJCQkkyMjI3whISFlGxsbQggICB8AAAAEAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAZGRkUOTk5Nl1dXVptbW18cnJyk3Nzc6pycnLCgYGB4Xd3d/9qamr/YWFh/2Ji + Yv9mZmb/Wlpa/0tLS/9DQ0P/RERE/0tLS/9PT0//T09P/0pKSv9CQkL/Pj4+/zQ0NP8wMDD/Kioq/yEh + If8YGBj/DQ0N/wMDA/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8FBQX/FBQU/yoqKv9AQED/Tk5O/1xcXP9WVlb/VlZW/1JSUv9RUVH/UVFR/01N + Tf9MTEz/UFBQ/1JSUv9UVFT/RUVF/zY2Nv8vLy//Li4u/y4uLuEnJyfCKCgoqioqKpMnJyd8IiIiWhMT + EzYNDQ0UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAg1NTUrTk5OTm5ubnF5eXmTe3t7qnd3 + d8KGhobheXl5/2tra/9gYGD/X19f/2JiYv9XV1f/RkZG/z4+Pv8/Pz//Q0ND/0tLS/9MTEz/SUlJ/0RE + RP85OTn/MTEx/ygoKP8hISH/FxcX/w8PD/8JCQn/BAQE/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8YGBj/ODg4/1RU + VP9ZWVn/W1tb/1hYWP9VVVX/VVVV/09PT/9NTU3/T09P/1BQUP9SUlL/UlJS/0NDQ/80NDT/LS0t/yws + LP8uLi7hKSkpwisrK6orKyuTKSkpcR0dHU4SEhIrAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCEh + IR9NTU1CYGBgZX5+foiCgoKqgYGBwouLi+F9fX3/bW1t/2FhYf9dXV3/YGBg/1VVVf9GRkb/OTk5/zs7 + O/8+Pj7/RERE/0pKSv9ISEj/QUFB/zY2Nv8sLCz/ISEh/xISEv8MDAz/BQUF/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8BAQH/CAgI/yoqKv9LS0v/W1tb/1paWv9bW1v/Wlpa/1NTU/9PT0//UFBQ/1BQ + UP9SUlL/UVFR/1RUVP9AQED/MTEx/ykpKf8sLCz/MTEx4S0tLcIuLi6qLS0tiCMjI2UbGxtCCAgIHwAA + AAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAJiYmFD09PTZgYGBab29vfIqKip+KiorClpaW4YODg/9vb2//YWFh/1xc + XP9fX1//VlZW/0hISP85OTn/NTU1/zo6Ov8+Pj7/QEBA/0VFRf8/Pz//NDQ0/yYmJv8UFBT/DQ0N/wQE + BP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wEBAf8CAgL/AQEB/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wUFBf8XFxf/Q0ND/1dX + V/9aWlr/XFxc/1hYWP9UVFT/U1NT/1JSUv9TU1P/UVFR/1RUVP9RUVH/Ojo6/ysrK/8nJyf/Li4u/zU1 + NeEyMjLCMjIynykpKXwlJSVaGBgYNg0NDRQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFOzs7K1JSUk5zc3Nxf39/k5OT + k7ahoaHhjIyM/3R0dP9iYmL/WVlZ/1xcXP9YWFj/S0tL/zo6Ov8zMzP/NTU1/zk5Of85OTn/PT09/0BA + QP8xMTH/ICAg/xISEv8ICAj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AgIC/wwMDP8XFxf/Hx8f/yEh + If8bGxv/EBAQ/wcHB/8EBAT/AgIC/wEBAf8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8EBAT/EhIS/zIyMv9RUVH/Wlpa/1lZWf9YWFj/WVlZ/1ZWVv9VVVX/UlJS/1VV + Vf9WVlb/S0tL/zIyMv8oKCj/KCgo/zIyMv86OjrhNTU1ti8vL5MrKytxHR0dThISEisAAAAFAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAkJCQVUVFRQmVlZWWFhYWIioqKqqurq9KXl5f/fHx8/2RkZP9ZWVn/V1dX/1tbW/9OTk7/QEBA/zU1 + Nf8yMjL/Ly8v/zAwMP8zMzP/MzMz/y8vL/8cHBz/ERER/wMDA/8AAAD/AAAA/wAAAP8AAAD/AQEB/wgI + CP8eHh7/Ojo6/0pKSv9UVFT/UVFR/1FRUf9PT0//SkpK/0JCQv8uLi7/FxcX/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BAQE/xMTE/8oKCj/R0dH/1RU + VP9YWFj/XV1d/1xcXP9ZWVn/VVVV/1ZWVv9XV1f/W1tb/0BAQP8tLS3/Jycn/ywsLP84ODj/PT090jQ0 + NKoxMTGIJiYmZR8fH0IMDAwVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAVAQEAsZmZmWnl5eXySkpKfk5OTwqKiovGGhob/a2tr/1lZ + Wf9TU1P/WFhY/1VVVf9ERET/ODg4/zQ0NP8wMDD/Jycn/ygoKP8nJyf/IiIi/xwcHP8PDw//AgIC/wAA + AP8AAAD/AAAA/wAAAP8HBwf/JSUl/0RERP9kZGT/hISE/5ycnP+SkpL/hISE/3V1df9sbGz/bW1t/3R0 + dP9NTU3/LS0t/xkZGf8NDQ3/BQUF/wEBAf8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AgIC/wgICP8WFhb/KSkp/zQ0NP9PT0//W1tb/1xcXP9eXl7/Wlpa/1lZWf9ZWVn/XFxc/1JS + Uv84ODj/KSkp/ygoKP8xMTH/Pj4+8Tc3N8I2NjafLy8vfCgoKFoXFxcsAAAABQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACoqKhJUVFRDfHx8cYmJ + iZOfn5+2rq6u4ZSUlP90dHT/XV1d/1BQUP9TU1P/VVVV/01NTf89PT3/Nzc3/zIyMv8jIyP/HR0d/xsb + G/8XFxf/GBgY/xAQEP8CAgL/AAAA/wAAAP8AAAD/AwMD/xcXF/8+Pj7/ZWVl/4WFhf+bm5v/rq6u/7a2 + tv+4uLj/uLi4/7Gxsf+ysrL/tLS0/6Wlpf+SkpL/e3t7/1tbW/86Ojr/JiYm/xUVFf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wcHB/8ODg7/Ghoa/ysrK/8rKyv/T09P/1lZ + Wf9eXl7/Xl5e/15eXv9cXFz/X19f/19fX/9HR0f/MDAw/ygoKP8sLCz/OTk5/0JCQuE8PDy2NjY2kzIy + MnEiIiJDDg4OEgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAEBAQCRqampbkJCQiJmZmaq8vLzSpKSk/4SEhP9kZGT/UlJS/0xMTP9WVlb/UVFR/0VF + Rf87Ozv/ODg4/ysrK/8ZGRn/EBAQ/wwMDP8VFRX/FBQU/wkJCf8FBQX/AwMD/wAAAP8EBAT/Jycn/0dH + R/9lZWX/fX19/5SUlP+urq7/vb29/7+/v//BwcH/wsLC/8LCwv/CwsL/wsLC/8LCwv+9vb3/vLy8/6ys + rP+Pj4//Z2dn/z4+Pv8ODg7/AQEB/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wUF + Bf8NDQ3/FBQU/yAgIP8rKyv/Kioq/0lJSf9aWlr/X19f/2JiYv9hYWH/YmJi/2FhYf9bW1v/Ozs7/ysr + K/8oKCj/MTEx/z8/P/9FRUXSPT09qjg4OIgqKipbFRUVJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABVZWVjuCgoJyo6Ojn6ioqMK1tbXxlJSU/3Fx + cf9XV1f/S0tL/05OTv9VVVX/TExM/0FBQf86Ojr/MTEx/x0dHf8SEhL/BAQE/wwMDP8TExP/FxcX/xQU + FP8QEBD/CwsL/wcHB/8bGxv/PDw8/1ZWVv9vb2//iIiI/6Kiov+8vLz/xMTE/8TExP/FxcX/xsbG/8jI + yP/IyMj/yMjI/8nJyf/IyMj/x8fH/8fHx//FxcX/uLi4/5ycnP9mZmb/ISEh/wUFBf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8NDQ3/FBQU/xsbG/8mJib/Kioq/ykpKf9JSUn/W1tb/2Nj + Y/9lZWX/Z2dn/2VlZf9oaGj/S0tL/zIyMv8oKCj/Kysr/zg4OP9ISEjxQ0NDwkBAQJ82NjZyIyMjOwAA + AAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKioqEm9v + b1OXl5eJtLS0tsnJyeGqqqr/g4OD/2JiYv9MTEz/R0dH/1FRUf9WVlb/SkpK/0JCQv87Ozv/Kioq/yAg + IP8LCwv/BgYG/xEREf8aGhr/IiIi/yEhIf8dHR3/GRkZ/x8fH/85OTn/S0tL/2BgYP9zc3P/kZGR/6qq + qv/FxcX/x8fH/8nJyf/FxcX/tra2/6qqqv+tra3/tLS0/7e3t/+9vb3/ycnJ/8rKyv/Jycn/yMjI/8bG + xv/BwcH/mpqa/0tLS/8ICAj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wUFBf8ODg7/FhYW/xsb + G/8iIiL/Kioq/ykpKf8oKCj/SkpK/15eXv9lZWX/a2tr/2lpaf9ra2v/X19f/zw8PP8qKir/Jycn/zIy + Mv9ERET/T09P4UlJSbY/Pz+JLi4uUw4ODhIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAQEBAJISEhGqsrKyg2NjY0sLCwv+bm5v/c3Nz/1VVVf9GRkb/SUlJ/1dX + V/9XV1f/TU1N/0xMTP9AQED/Li4u/yEhIf8JCQn/EhIS/xUVFf8qKir/LS0t/y8vL/8sLCz/Kysr/zo6 + Ov9QUFD/Z2dn/3V1df+Hh4f/oaGh/7a2tv/Gxsb/vLy8/4+Pj/9gYGD/VVVV/1paWv9gYGD/WVlZ/0RE + RP+JiYn/wcHB/8rKyv/Ly8v/y8vL/8rKyv/Jycn/x8fH/7m5uf9ycnL/Dg4O/wEBAf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wUFBf8ODg7/GBgY/x4eHv8iIiL/KSkp/ysrK/8oKCj/KSkp/1FRUf9hYWH/a2tr/21t + bf9vb2//cXFx/0xMTP8wMDD/JiYm/y0tLf89PT3/UFBQ/1VVVdJISEigOjo6ahwcHCQAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWFhYOpycnIG/v7+31tbW8bW1 + tf+Kior/ZWVl/0xMTP9ERET/UVFR/2FhYf9eXl7/V1dX/1ZWVv9CQkL/MjIy/x4eHv8cHBz/EhIS/yMj + I/8wMDD/Pj4+/z4+Pv88PDz/PT09/09PT/9kZGT/eXl5/42Njf+lpaX/t7e3/8DAwP+YmJj/UlJS/x0d + Hf8AAAD/AAAA/wUFBf8RERH/BwcH/w4ODv8rKyv/VFRU/4WFhf+qqqr/vb29/8vLy//Ly8v/ysrK/8nJ + yf/ExMT/lJSU/x4eHv8BAQH/AAAA/wAAAP8AAAD/AAAA/wAAAP8TExP/Gxsb/yIiIv8mJib/KCgo/y0t + Lf8pKSn/KCgo/ywsLP9WVlb/aGho/29vb/90dHT/eXl5/2BgYP86Ojr/Jycn/ykpKf83Nzf/SkpK/1tb + W/FRUVG3Q0NDgSgoKDoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAcXFxUbKyspjl5eXU0NDQ/6ioqP96enr/WFhY/0VFRf9FRUX/W1tb/2tra/9kZGT/ZGRk/1tb + W/9ERET/Nzc3/x8fH/8lJSX/ICAg/y0tLf83Nzf/SEhI/09PT/9OTk7/Tk5O/2NjY/96enr/jY2N/6en + p/+9vb3/vb29/4KCgv89PT3/ExMT/wICAv8AAAD/AAAA/wYGBv8NDQ3/FBQU/xMTE/8RERH/FRUV/zIy + Mv9mZmb/lJSU/8LCwv/Ly8v/y8vL/8vLy//Kysr/ycnJ/6Ghof8iIiL/AQEB/wAAAP8AAAD/AAAA/wIC + Av8VFRX/ICAg/ycnJ/8sLCz/LCws/y0tLf8sLCz/KCgo/ygoKP82Njb/YWFh/25ubv94eHj/fX19/3Z2 + dv9HR0f/Kysr/yYmJv8yMjL/RUVF/1paWv9fX1/UTU1NmDU1NVEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFiIiIacbGxq/i4uLxxcXF/5aWlv9sbGz/Tk5O/0ND + Q/9LS0v/ZmZm/3Z2dv9ycnL/cHBw/1tbW/9NTU3/NjY2/zMzM/8lJSX/Li4u/zExMf9FRUX/TU1N/1RU + VP9ZWVn/X19f/3V1df+MjIz/qKio/76+vv+9vb3/j4+P/1RUVP8nJyf/AgIC/wICAv8RERH/FxcX/x4e + Hv8uLi7/UVFR/35+fv8yMjL/BAQE/woKCv8iIiL/Wlpa/5mZmf/Gxsb/y8vL/8vLy//Ly8v/ysrK/8rK + yv+ZmZn/FhYW/wAAAP8AAAD/AAAA/wYGBv8RERH/KCgo/y4uLv8zMzP/MzMz/zIyMv8wMDD/Kioq/ycn + J/8pKSn/TExM/2lpaf94eHj/goKC/4uLi/9YWFj/MjIy/yQkJP8tLS3/Pz8//1VVVf9kZGTxV1dXr0FB + QWkAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqKioSoaGhgPDw + 8Mze3t7/uLi4/4aGhv9eXl7/RkZG/0RERP9TU1P/c3Nz/4GBgf+AgID/dnZ2/11dXf9SUlL/OTk5/0BA + QP82Njb/PT09/zk5Of9LS0v/U1NT/1ZWVv9fX1//YWFh/3R0dP+Xl5f/tbW1/8fHx/+rq6v/c3Nz/0FB + Qf8QEBD/AgIC/woKCv8mJib/R0dH/11dXf9gYGD/ZGRk/2tra/+Dg4P/aGho/ywsLP8RERH/Kioq/2Fh + Yf+ioqL/yMjI/8vLy//Ly8v/y8vL/8vLy//ExMT/eXl5/wgICP8AAAD/AAAA/wcHB/8TExP/Li4u/zk5 + Of87Ozv/PDw8/zg4OP81NTX/LS0t/ygoKP8nJyf/Kioq/11dXf90dHT/hYWF/5mZmf9sbGz/PDw8/yMj + I/8oKCj/Ojo6/1BQUP9kZGT/ZmZmzE5OToAODg4SAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABAQEAkuLi4l+3t7eXX19f/qamp/3h4eP9SUlL/QkJC/0hISP9eXl7/gYGB/4uL + i/+Ojo7/d3d3/2RkZP9TU1P/S0tL/z8/P/9JSUn/SkpK/1JSUv9SUlL/UlJS/1paWv9iYmL/Z2dn/3R0 + dP+UlJT/q6ur/7Gxsf+Li4v/XV1d/yoqKv8GBgb/AgIC/wsLC/8ICAj/BAQE/xISEv8rKyv/NDQ0/xAQ + EP9SUlL/dnZ2/2tra/87Ozv/Ghoa/zIyMv99fX3/tLS0/8zMzP/MzMz/y8vL/8vLy//Kysr/tLS0/zw8 + PP8CAgL/AAAA/wEBAf8gICD/Ly8v/0RERP9FRUX/RUVF/0JCQv87Ozv/MTEx/yoqKv8nJyf/KCgo/0JC + Qv9sbGz/hISE/6Kiov+CgoL/R0dH/yUlJf8kJCT/NDQ0/0tLS/9gYGD/bW1t5VlZWZccHBwkAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABYWFg6z8/Prurq6vXQ0ND/m5ub/2lp + af9ISEj/Pz8//01NTf9qamr/kZGR/5qamv+YmJj/fX19/2xsbP9UVFT/WFhY/0xMTP9WVlb/WFhY/2Vl + Zf9iYmL/ZGRk/2VlZf9lZWX/Z2dn/21tbf+Li4v/l5eX/42Njf9nZ2f/LCws/wsLC/8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BgYG/xgYGP8pKSn/IiIi/xEREf9RUVH/nZ2d/8jI + yP/MzMz/zMzM/8vLy//Ly8v/vr6+/3l5ef8NDQ3/AAAA/wgICP8pKSn/NjY2/05OTv9QUFD/UFBQ/01N + Tf9ERET/NjY2/ywsLP8oKCj/Jycn/yoqKv9eXl7/f39//6Wlpf+YmJj/VFRU/ygoKP8hISH/Ly8v/0VF + Rf9eXl7/bm5u9WVlZa4sLCw6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AABxcXFR/Pz8y+np6f/IyMj/jo6O/11dXf9AQED/Pj4+/1JSUv92dnb/paWl/6mpqf+enp7/goKC/3Nz + c/9YWFj/YGBg/11dXf9oaGj/aWlp/2xsbP9zc3P/eXl5/3t7e/99fX3/f39//4KCgv+AgID/f39//3Nz + c/8+Pj7/Dg4O/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/CQkJ/wYGBv80NDT/fn5+/8PDw//MzMz/zMzM/8zMzP/Ly8v/wcHB/5GRkf81NTX/AgIC/xQU + FP8jIyP/RUVF/1RUVP9hYWH/X19f/1tbW/9OTk7/PT09/zAwMP8pKSn/Jycn/ykpKf9DQ0P/d3d3/6Sk + pP+urq7/YmJi/ywsLP8fHx//Kioq/0FBQf9cXFz/bm5u/3d3d8s5OTlRAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKiopp/v7+5OXl5f/AwMD/goKC/1JSUv87Ozv/Pj4+/1dX + V/+BgYH/ubm5/7i4uP+pqan/iYmJ/3l5ef9lZWX/ZGRk/25ubv91dXX/gYGB/4SEhP+IiIj/j4+P/4+P + j/+Li4v/iYmJ/3R0dP9oaGj/ZmZm/1VVVf8ZGRn/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8cHBz/ampq/7i4uP/MzMz/zMzM/8zM + zP/MzMz/xMTE/6SkpP9MTEz/BgYG/wQEBP8qKir/VFRU/1tbW/9wcHD/bm5u/2pqav9ZWVn/RERE/zQ0 + NP8rKyv/Jycn/ygoKP8rKyv/aGho/5+fn//BwcH/b29v/zIyMv8eHh7/JiYm/z09Pf9aWlr/bW1t/39/ + f+RJSUlpAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAChoaGA/f399OHh + 4f+4uLj/dnZ2/0hISP83Nzf/Pz8//1tbW/+Kior/xsbG/7+/v/+qqqr/kZGR/3x8fP90dHT/a2tr/3d3 + d/+BgYH/j4+P/5SUlP+UlJT/lJSU/5OTk/+SkpL/d3d3/1RUVP9OTk7/Tk5O/z09Pf8SEhL/AgIC/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8KCgr/TExM/62trf/MzMz/zMzM/8zMzP/MzMz/zMzM/6Wlpf9UVFT/EhIS/w8PD/88PDz/X19f/2Zm + Zv9/f3//f39//3d3d/9kZGT/TExM/zo6Ov8uLi7/KCgo/ycnJ/8qKir/UVFR/5iYmP/S0tL/fHx8/zc3 + N/8eHh7/IiIi/zg4OP9YWFj/bGxs/4ODg/RaWlqAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAC4uLiX/v7+/Nzc3P+ysrL/bW1t/0FBQf81NTX/QEBA/15eXv+RkZH/09PT/8jI + yP+wsLD/m5ub/4GBgf94eHj/cHBw/3p6ev+BgYH/k5OT/5aWlv+Tk5P/lZWV/5OTk/+IiIj/YmJi/zw8 + PP81NTX/NjY2/y0tLf8ZGRn/FBQU/wkJCf8CAgL/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/PT09/6Wlpf/MzMz/zMzM/8zMzP/MzMz/zMzM/5qa + mv9WVlb/EhIS/yEhIf9OTk7/ZGRk/3V1df+Pj4//kpKS/4aGhv9ubm7/VFRU/0BAQP8xMTH/Kioq/ycn + J/8oKCj/Nzc3/42Njf/g4OD/iYmJ/z09Pf8fHx//Hx8f/zQ0NP9XV1f/bGxs/4WFhfxnZ2eXAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADPz8+u/////9fX1/+tra3/ZGRk/zw8 + PP80NDT/QEBA/2BgYP+Xl5f/29vb/8nJyf+0tLT/oaGh/4aGhv99fX3/cnJy/319ff+CgoL/jIyM/5OT + k/+UlJT/k5OT/5CQkP95eXn/SkpK/yIiIv8aGhr/LCws/zQ0NP83Nzf/NTU1/ykpKf8VFRX/BgYG/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/QkJC/6Ki + ov/Ly8v/zMzM/8zMzP/MzMz/y8vL/4mJif9UVFT/FRUV/zMzM/9dXV3/Z2dn/4eHh/+bm5v/o6Oj/5OT + k/95eXn/XV1d/0ZGRv81NTX/LCws/ygoKP8oKCj/LS0t/3t7e//s7Oz/kpKS/0FBQf8gICD/Hh4e/zEx + Mf9VVVX/a2tr/4WFhf93d3euAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAD9/f3L/////9TU1P+oqKj/XV1d/zk5Of8zMzP/QUFB/2JiYv+enp7/4eHh/8TExP+1tbX/qamp/46O + jv+Hh4f/fHx8/4CAgP+FhYX/jIyM/5GRkf+VlZX/k5OT/3t7e/9hYWH/IiIi/w4ODv8NDQ3/NDQ0/0xM + TP9VVVX/VlZW/0xMTP8+Pj7/Jycn/xISEv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8CAgL/VFRU/6SkpP/MzMz/zMzM/8zMzP/MzMz/w8PD/3t7e/9PT0//EBAQ/z09 + Pf9lZWX/cXFx/5mZmf+qqqr/r6+v/52dnf+CgoL/ZmZm/0xMTP85OTn/Li4u/ygoKP8nJyf/LCws/2ho + aP/19fX/mpqa/0VFRf8hISH/HBwc/y8vL/9VVVX/a2tr/4ODg/+Ojo7LAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v7k/////9LS0v+mpqb/WVlZ/zc3N/8zMzP/QEBA/2Fh + Yf+hoaH/6enp/8DAwP+0tLT/qqqq/5eXl/+RkZH/iIiI/4SEhP+Li4v/jo6O/5OTk/+Wlpb/kpKS/1xc + XP9CQkL/BgYG/yAgIP81NTX/UlJS/3Fxcf92dnb/cnJy/2lpaf9mZmb/V1dX/0NDQ/8iIiL/CwsL/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8ODg7/YGBg/6Ojo//MzMz/zMzM/8zM + zP/MzMz/ysrK/4CAgP9GRkb/AgIC/z4+Pv9nZ2f/g4OD/6urq/+7u7v/ubm5/6Wlpf+Li4v/bW1t/1NT + U/89PT3/MDAw/ykpKf8nJyf/Kysr/09PT//7+/v/np6e/0hISP8iIiL/HBwc/y4uLv9VVVX/bGxs/4SE + hP+amprkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD9/f30/////9HR + 0f+lpaX/V1dX/zc3N/8zMzP/Pz8//15eXv+jo6P/8PDw/76+vv+0tLT/qamp/6CgoP+bm5v/k5OT/4+P + j/+NjY3/kZGR/5SUlP+ampr/lpaW/1BQUP8mJib/AwMD/zY2Nv9oaGj/gYGB/46Ojv+Wlpb/lZWV/4+P + j/+Dg4P/eXl5/2NjY/9MTEz/JCQk/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8ODg7/RERE/6+vr//MzMz/zMzM/8zMzP/MzMz/vr6+/46Ojv8+Pj7/DAwM/zg4OP9ra2v/lJSU/729 + vf/Gxsb/vb29/6urq/+SkpL/dHR0/1hYWP9BQUH/MzMz/yoqKv8nJyf/Kioq/0FBQf/+/v7/oqKi/0xM + TP8jIyP/HR0d/y0tLf9WVlb/bm5u/4aGhv+hoaH0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAD+/v77/////9DQ0P+kpKT/VlZW/zY2Nv8yMjL/PT09/1tbW/+hoaH/8/Pz/76+ + vv+0tLT/qamp/6Ojo/+hoaH/n5+f/52dnf+bm5v/nZ2d/6Wlpf+qqqr/oqKi/1hYWP9FRUX/BgYG/01N + Tf9mZmb/hYWF/6qqqv+2trb/tra2/7a2tv++vr7/urq6/7CwsP+lpaX/m5ub/3l5ef9AQED/JiYm/wAA + AP8NDQ3/AAAA/wAAAP8ICAj/GBgY/yYmJv9OTk7/tra2/8XFxf/MzMz/zMzM/8zMzP/FxcX/pKSk/1JS + Uv8mJib/FRUV/19fX/+IiIj/pqam/8bGxv/Jycn/wcHB/7CwsP+Xl5f/enp6/15eXv9FRUX/NTU1/yws + LP8nJyf/KSkp/zw8PP//////pKSk/05OTv8lJSX/HR0d/y4uLv9YWFj/cHBw/4mJif+lpaX7AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v75/////9HR0f+lpaX/V1dX/zc3 + N/8yMjL/PT09/1paWv+enp7/8vLy/76+vv+0tLT/qamp/6Ojo/+hoaH/pKSk/6mpqf+qqqr/q6ur/7Ky + sv+5ubn/paWl/2JiYv9ZWVn/JCQk/1tbW/9vb2//nJyc/7u7u//Jycn/zMzM/8zMzP/MzMz/ysrK/8zM + zP/Kysr/xcXF/8zMzP/Gxsb/pqam/zIyMv9mZmb/YGBg/01NTf9OTk7/VFRU/21tbf+goKD/ysrK/8zM + zP/MzMz/zMzM/8rKyv+xsbH/goKC/yIiIv8KCgr/GBgY/3R0dP+ioqL/tbW1/8rKyv/Jycn/w8PD/7Oz + s/+cnJz/f39//2NjY/9ISEj/ODg4/y0tLf8oKCj/KSkp/z09Pf/+/v7/o6Oj/05OTv8lJSX/Hh4e/y8v + L/9aWlr/c3Nz/4yMjP+np6f5AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAD+/v7u/////9HR0f+lpaX/WFhY/zc3N/8zMzP/Pj4+/1lZWf+ZmZn/7e3t/7+/v/+0tLT/qqqq/6Oj + o/+hoaH/paWl/6ysrP+0tLT/urq6/8PDw//IyMj/oqKi/2ZmZv9GRkb/LS0t/2RkZP9/f3//tra2/8vL + y//Kysr/zMzM/8jIyP/Hx8f/zMzM/8zMzP/MzMz/zMzM/8zMzP/MzMz/zMzM/8zMzP/Gxsb/srKy/7Ky + sv+jo6P/oaGh/6qqqv/ExMT/zMzM/8zMzP/MzMz/y8vL/7q6uv+VlZX/VFRU/w4ODv8AAAD/ISEh/4GB + gf+pqan/u7u7/8rKyv/Jycn/w8PD/7S0tP+enp7/goKC/2ZmZv9LS0v/Ojo6/y4uLv8oKCj/Kioq/0ZG + Rv/9/f3/oaGh/0xMTP8lJSX/Hx8f/zExMf9dXV3/dXV1/4+Pj/+mpqbuAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v7d/////9LS0v+np6f/W1tb/zg4OP8zMzP/Pz8//1lZ + Wf+SkpL/5OTk/8LCwv+1tbX/qqqq/6Ojo/+hoaH/pKSk/6urq/+1tbX/vr6+/8XFxf/IyMj/l5eX/2Zm + Zv8wMDD/Li4u/2ZmZv+VlZX/ysrK/8fHx/+6urr/srKy/7W1tf+zs7P/tLS0/7e3t//AwMD/zMzM/8zM + zP/MzMz/zMzM/8zMzP/MzMz/zMzM/8vLy//Gxsb/x8fH/8zMzP/MzMz/zMzM/8zMzP/Jycn/v7+//5eX + l/9qamr/Ly8v/wUFBf8CAgL/MDAw/4SEhP+hoaH/q6ur/7q6uv/FxcX/wcHB/7W1tf+fn5//hYWF/2lp + af9NTU3/Ozs7/zAwMP8oKCj/Kioq/1dXV//5+fn/nZ2d/0pKSv8lJSX/ICAg/zQ0NP9fX1//eHh4/5GR + kf+goKDdAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADl5eXF/////9XV + 1f+qqqr/X19f/zo6Ov8zMzP/Pz8//1dXV/+Kior/29vb/8bGxv+2trb/q6ur/6SkpP+hoaH/o6Oj/6mp + qf+zs7P/vLy8/8PDw//BwcH/kZGR/2VlZf8hISH/MjIy/2ZmZv+rq6v/zMzM/7Ozs/+mpqb/lpaW/46O + jv+JiYn/gYGB/4aGhv+NjY3/oaGh/66urv+6urr/yMjI/8zMzP/Kysr/zMzM/8zMzP/MzMz/wMDA/8DA + wP/FxcX/xsbG/7i4uP+mpqb/jo6O/2xsbP9AQED/Ghoa/wICAv8MDAz/Ojo6/35+fv+Xl5f/m5ub/6qq + qv+2trb/t7e3/7CwsP+fn5//hYWF/2tra/9PT0//PT09/zExMf8pKSn/Kysr/2lpaf/y8vL/mJiY/0dH + R/8kJCT/IiIi/zc3N/9iYmL/e3t7/5WVlf+RkZHFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAADPz8+u/v7+/dnZ2f+urq7/ZmZm/z4+Pv80NDT/Pj4+/1VVVf+CgoL/0NDQ/8nJ + yf+3t7f/rKys/6SkpP+hoaH/oqKi/6enp/+wsLD/ubm5/8HBwf+9vb3/kJCQ/2BgYP8ZGRn/PT09/2Zm + Zv+wsLD/ubm5/6Ghof+Pj4//eHh4/2lpaf9mZmb/W1tb/0xMTP9GRkb/QkJC/zk5Of8+Pj7/SkpK/76+ + vv9mZmb/dHR0/4aGhv+Tk5P/mZmZ/5mZmf+bm5v/lJSU/4mJif99fX3/Xl5e/zw8PP8QEBD/AgIC/wAA + AP8WFhb/SkpK/3BwcP+Hh4f/k5OT/5iYmP+np6f/rKys/6Wlpf+bm5v/hYWF/2xsbP9QUFD/Pj4+/zIy + Mv8qKir/MTEx/3t7e//p6en/kZGR/0RERP8kJCT/JCQk/zw8PP9mZmb/f39//5iYmP2CgoKuAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC4uLiX/v7++d3d3f+zs7P/bm5u/0ND + Q/82Njb/Pj4+/1NTU/96enr/wsLC/8bGxv+7u7v/rq6u/6Wlpf+hoaH/oaGh/6Wlpf+tra3/tra2/76+ + vv+8vLz/k5OT/1xcXP81NTX/OTk5/2xsbP+ioqL/tLS0/5KSkv94eHj/ZmZm/1VVVf9CQkL/Nzc3/yYm + Jv8WFhb/Dg4O/wcHB/8AAAD/AgIC/w4ODv8gICD/LS0t/0JCQv9SUlL/XV1d/2ZmZv9mZmb/YmJi/15e + Xv9XV1f/MTEx/wsLC/8AAAD/AAAA/wUFBf8vLy//X19f/2ZmZv91dXX/iIiI/4+Pj/+Xl5f/oKCg/5iY + mP+Pj4//gICA/2pqav9RUVH/Pz8//zIyMv8sLCz/QEBA/4mJif/e3t7/h4eH/0BAQP8lJSX/KCgo/0JC + Qv9qamr/g4OD/5ycnPlzc3OXAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAChoaGA/v7+7uHh4f+5ubn/eHh4/0tLS/85OTn/PT09/1BQUP9xcXH/srKy/8HBwf/AwMD/sLCw/6en + p/+hoaH/oKCg/6Ojo/+qqqr/s7Oz/7u7u/+7u7v/lpaW/11dXf86Ojr/NjY2/2lpaf+YmJj/s7Oz/42N + jf9qamr/VlZW/z4+Pv8pKSn/ERER/wQEBP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wsL + C/8bGxv/Kioq/zIyMv8zMzP/Ozs7/1tbW/82Njb/GRkZ/wICAv8AAAD/AAAA/xISEv82Njb/TExM/2Nj + Y/9nZ2f/eXl5/4WFhf+IiIj/kJCQ/46Ojv+CgoL/d3d3/2ZmZv9OTk7/Pz8//zMzM/8sLCz/U1NT/5OT + k//Pz8//fX19/zs7O/8mJib/Li4u/0lJSf9wcHD/iIiI/5ycnO5kZGSAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKiopp/v7+3eXl5f/BwcH/g4OD/1RUVP89PT3/PT09/01N + Tf9nZ2f/oqKi/7i4uP/AwMD/tLS0/6mpqf+ioqL/oKCg/6Ghof+np6f/r6+v/7i4uP+4uLj/l5eX/2ho + aP86Ojr/NDQ0/19fX/+Tk5P/sbGx/4qKiv9mZmb/R0dH/zAwMP8UFBT/BwcH/wEBAf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8XFxf/Tk5O/0dHR/82Njb/ICAg/w4O + Dv8EBAT/AQEB/w8PD/80NDT/Pj4+/1JSUv9lZWX/aGho/3Z2dv9+fn7/gICA/4KCgv93d3f/a2tr/19f + X/9LS0v/PT09/zQ0NP84ODj/Y2Nj/5ubm/+/v7//cXFx/zg4OP8oKCj/NTU1/1JSUv93d3f/jY2N/5qa + mt1VVVVpAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwcHBQ5eXlxefn + 5/rJycn/j4+P/19fX/9DQ0P/Pj4+/0pKSv9cXFz/kZGR/62trf+7u7v/urq6/6ysrP+kpKT/oKCg/6Cg + oP+lpaX/rKys/7S0tP+3t7f/m5ub/3BwcP88PDz/OTk5/1lZWf+IiIj/p6en/46Ojv9mZmb/RERE/yEh + If8NDQ3/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BgYG/yIi + Iv9kZGT/ZmZm/1paWv9GRkb/MTEx/yYmJv8NDQ3/Dw8P/w4ODv8iIiL/PDw8/0NDQ/9WVlb/Y2Nj/2Zm + Zv90dHT/dXV1/3Nzc/9wcHD/YmJi/1hYWP9HR0f/OTk5/zIyMv9ISEj/b29v/6CgoP+srKz/ZWVl/zQ0 + NP8sLCz/PT09/1paWv9+fn7/kZGR+o6OjsVDQ0NQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABYWFg3z8/Pru3t7fDS0tL/np6e/21tbf9MTEz/QUFB/0hISP9UVFT/f39//6Gh + of+zs7P/urq6/7CwsP+mpqb/oaGh/6CgoP+ioqL/qKio/7CwsP+3t7f/oqKi/3d3d/9NTU3/PT09/1NT + U/9+fn7/oqKi/5KSkv9tbW3/RkZG/yAgIP8DAwP/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wcHB/8WFhb/XFxc/4SEhP+Ojo7/enp6/2ZmZv9TU1P/RkZG/y8vL/8nJyf/EhIS/xUV + Ff8cHBz/Kysr/0FBQf9FRUX/Wlpa/19fX/9jY2P/bGxs/2dnZ/9kZGT/Xl5e/1BQUP9BQUH/Nzc3/zg4 + OP9TU1P/cXFx/6Ojo/+YmJj/WFhY/zIyMv8xMTH/RkZG/2VlZf+FhYX/lZWV8H9/f64zMzM3AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCQkIfuLi4l/Dw8N7a2tr/rq6u/3x8 + fP9WVlb/RUVF/0VFRf9MTEz/bW1t/5eXl/+qqqr/tLS0/7e3t/+qqqr/o6Oj/6CgoP+hoaH/paWl/6ys + rP+0tLT/pqam/4CAgP9WVlb/QkJC/0lJSf9zc3P/l5eX/6Ghof93d3f/UVFR/ykpKf8EBAT/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wICAv8LCwv/Hh4e/z4+Pv94eHj/mpqa/7Ozs/+bm5v/hoaG/29v + b/9lZWX/TExM/0RERP8xMTH/JCQk/xkZGf8cHBz/Jycn/zMzM/9CQkL/SUlJ/1hYWP9aWlr/Xl5e/2Bg + YP9ZWVn/VFRU/0tLS/88PDz/NTU1/0RERP9ZWVn/dnZ2/6Ojo/+Dg4P/Tk5O/zIyMv85OTn/UVFR/3Bw + cP+MjIz/lZWV3nFxcZchISEfAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAZGRkKoaGhgN7e3sfh4eH4vb29/4yMjP9jY2P/S0tL/0NDQ/9FRUX/XV1d/42Njf+goKD/q6ur/7S0 + tP+wsLD/pqam/6Ghof+goKD/o6Oj/6ioqP+wsLD/qKio/4uLi/9gYGD/RkZG/0JCQv9mZmb/j4+P/6Sk + pP+IiIj/XFxc/zk5Of8TExP/AAAA/wAAAP8AAAD/AAAA/wAAAP8NDQ3/BAQE/xYWFv8yMjL/Wlpa/4iI + iP+np6f/wMDA/729vf+mpqb/kpKS/35+fv9kZGT/X19f/0xMTP8+Pj7/MzMz/yUlJf8jIyP/KSkp/zMz + M/81NTX/Q0ND/0pKSv9UVFT/U1NT/1VVVf9UVFT/SkpK/0RERP84ODj/PDw8/0tLS/9aWlr/eXl5/6Cg + oP9ubm7/RUVF/zY2Nv9DQ0P/XV1d/3x8fP+SkpL4iYmJx2RkZIAAAAAKAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAioqKacvLy6/p6enmzMzM/5+fn/9ycnL/U1NT/0ND + Q/9BQUH/UlJS/39/f/+Wlpb/oaGh/66urv+0tLT/q6ur/6Ojo/+hoaH/oaGh/6Wlpf+srKz/rKys/5OT + k/9sbGz/T09P/0JCQv9XV1f/fX19/6ioqP+ysrL/iYmJ/0dHR/8lJSX/DAwM/w0NDf8DAwP/Dg4O/yIi + Iv87Ozv/R0dH/0JCQv95eXn/np6e/7a2tv/Gxsb/y8vL/8LCwv+2trb/m5ub/4GBgf9ra2v/UFBQ/1RU + VP9KSkr/PT09/zQ0NP8pKSn/Li4u/zExMf82Njb/Ojo6/0JCQv9HR0f/T09P/0pKSv9LS0v/RUVF/z09 + Pf84ODj/QkJC/01NTf9dXV3/enp6/46Ojv9dXV3/Pz8//zw8PP9OTk7/a2tr/4iIiP+UlJTmfX19r1dX + V2kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcHBwULe3 + t5jZ2dnP19fX+LCwsP+Dg4P/X19f/0lJSf9AQED/SEhI/2tra/+Kior/mJiY/6Wlpf+urq7/sbGx/6en + p/+ioqL/oaGh/6Ojo/+oqKj/ra2t/5+fn/97e3v/V1dX/0hISP9JSUn/aGho/5CQkP+4uLj/wMDA/5mZ + mf9xcXH/PT09/x8fH/8tLS3/Q0ND/1dXV/9kZGT/ZmZm/2xsbP+UlJT/vr6+/8vLy//MzMz/zMzM/8jI + yP+xsbH/np6e/3Z2dv9OTk7/TExM/05OTv9MTEz/SkpK/zs7O/80NDT/MjIy/zY2Nv87Ozv/ODg4/z09 + Pf9AQED/Q0ND/0dHR/9BQUH/Pj4+/zk5Of89PT3/RkZG/0tLS/9iYmL/f39//3p6ev9QUFD/Pj4+/0VF + Rf9bW1v/eXl5/5GRkfiKiorPcHBwmEZGRlAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAWFhYN6CgoIHFxcW34uLi5cDAwP+VlZX/bm5u/1JSUv9ERET/QEBA/1VV + Vf9+fn7/jo6O/52dnf+mpqb/rq6u/66urv+kpKT/oaGh/6Kiov+mpqb/qqqq/6SkpP+Li4v/aWlp/0lJ + Sf9ISEj/UVFR/3x8fP+goKD/v7+//8nJyf+5ubn/l5eX/3t7e/9oaGj/ZmZm/2hoaP9ycnL/hYWF/5qa + mv+vr6//xcXF/8rKyv/Gxsb/xsbG/76+vv+mpqb/dnZ2/2VlZf9OTk7/TExM/0VFRf9MTEz/Q0ND/0hI + SP87Ozv/NTU1/zo6Ov85OTn/Pz8//zk5Of9AQED/Pj4+/z09Pf89PT3/Nzc3/zs7O/8+Pj7/RkZG/0xM + TP9oaGj/g4OD/2RkZP9HR0f/QEBA/09PT/9paWn/hoaG/5WVleWAgIC3Y2NjgTMzMzcAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQkJCH4mJiWq0tLSg0tLSzc/P + z/Cnp6f/fn5+/15eXv9JSUn/Pz8//0pKSv9wcHD/g4OD/5OTk/+cnJz/p6en/6ysrP+qqqr/o6Oj/6Ki + ov+kpKT/p6en/6urq/+Wlpb/eHh4/1dXV/9JSUn/TU1N/2JiYv+Hh4f/p6en/8LCwv/IyMj/ycnJ/8DA + wP+srKz/o6Oj/6Wlpf+ysrL/xMTE/8nJyf/Hx8f/wcHB/7i4uP+wsLD/paWl/5aWlv+Ojo7/ZmZm/1JS + Uv9MTEz/RUVF/0lJSf88PDz/RkZG/z8/P/9AQED/Ojo6/zc3N/8+Pj7/Ozs7/0JCQv88PDz/Pj4+/zg4 + OP83Nzf/OTk5/zs7O/8+Pj7/QkJC/1JSUv9ra2v/d3d3/1RUVP9DQ0P/R0dH/1xcXP94eHj/j4+P8IuL + i810dHSgVFRUaiEhIR8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAGRkZCnJyclOgoKCJwcHBtsPDw9m4uLj4kZGR/21tbf9TU1P/RERE/0JCQv9ZWVn/dnZ2/4iI + iP+Tk5P/np6e/6Wlpf+oqKj/qKio/6SkpP+kpKT/pqam/6qqqv+lpaX/hYWF/2lpaf9MTEz/S0tL/1BQ + UP9sbGz/iIiI/6+vr//Dw8P/x8fH/8jIyP/Jycn/ycnJ/8jIyP/Hx8f/ysrK/8TExP+wsLD/nZ2d/5KS + kv+QkJD/gYGB/319ff9ycnL/Wlpa/0VFRf9JSUn/S0tL/0ZGRv9DQ0P/Ozs7/z8/P/88PDz/PDw8/0FB + Qf89PT3/RERE/z09Pf9BQUH/OTk5/zo6Ov85OTn/Ojo6/zo6Ov86Ojr/Q0ND/1paWv92dnb/ZGRk/0tL + S/9FRUX/UlJS/2pqav+FhYX4iIiI2YGBgbZoaGiJR0dHUwAAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFhYWDeIiIhyr6+vn7a2tsLHx8flpKSk/39/ + f/9hYWH/TU1N/0FBQf9KSkr/aWlp/3t7e/+JiYn/lZWV/5ycnP+hoaH/pqam/6mpqf+mpqb/pqam/6io + qP+qqqr/m5ub/3p6ev9cXFz/R0dH/0dHR/9SUlL/b29v/5GRkf+tra3/wsLC/8XFxf/Gxsb/x8fH/8jI + yP/Jycn/v7+//62trf+cnJz/iIiI/3l5ef9qamr/a2tr/2ZmZv9UVFT/T09P/05OTv9ISEj/V1dX/1hY + WP9JSUn/Pz8//zo6Ov84ODj/Ozs7/zg4OP9BQUH/QEBA/0VFRf87Ozv/Pz8//zo6Ov89PT3/Ozs7/zo6 + Ov82Njb/SEhI/19fX/9ycnL/VFRU/0hISP9LS0v/X19f/3l5ef+MjIzlgYGBwnV1dZ9ZWVlyODg4NwAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEJC + Qh9wcHBbnZ2diKioqKq/v7/Ntra28JOTk/9xcXH/Wlpa/0lJSf9GRkb/U1NT/29vb/98fHz/i4uL/5SU + lP+Xl5f/np6e/6SkpP+srKz/qKio/6ioqP+qqqr/pqam/5CQkP9ubm7/UVFR/z4+Pv9AQED/VlZW/3Fx + cf+Ojo7/rKys/7y8vP/Dw8P/w8PD/7a2tv+5ubn/q6ur/5qamv+JiYn/dnZ2/1lZWf9QUFD/U1NT/1FR + Uf9FRUX/S0tL/1paWv9hYWH/ZGRk/1xcXP9PT0//RERE/zk5Of85OTn/Nzc3/zg4OP83Nzf/RUVF/0BA + QP9CQkL/Pj4+/0JCQv89PT3/Ojo6/zMzM/86Ojr/VFRU/25ubv9hYWH/TExM/0pKSv9WVlb/bm5u/4WF + hfCGhobNdnZ2qmlpaYhJSUlbISEhHwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQpbW1tDiYmJcZeXl5O0tLS2sLCw2aSkpPiEhIT/aWlp/1dX + V/9KSkr/RkZG/2NjY/9wcHD/f39//4qKiv+Pj4//lZWV/5ubm/+kpKT/q6ur/6urq/+pqan/qqqq/6Oj + o/+Hh4f/aGho/0tLS/80NDT/Pj4+/0hISP9nZ2f/fX19/6Kiov+ysrL/rKys/6Ghof+UlJT/kZGR/4OD + g/9zc3P/XFxc/05OTv9ERET/RERE/0hISP9JSUn/YGBg/2lpaf9ubm7/b29v/2FhYf9ZWVn/SEhI/0ND + Q/83Nzf/NjY2/zQ0NP85OTn/OTk5/0NDQ/9ERET/RERE/0BAQP89PT3/Ly8v/zIyMv9HR0f/Wlpa/21t + bf9VVVX/TExM/1JSUv9kZGT/fHx8+IGBgdl/f3+2bGxsk1xcXHE5OTlDAAAACgAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA+Pj4lcXFxWoaG + hnynp6efqKiowrm5ueWYmJj/e3t7/2VlZf9VVVX/SUlJ/0xMTP9mZmb/c3Nz/39/f/+Ghob/jY2N/5SU + lP+cnJz/o6Oj/6ioqP+tra3/q6ur/6qqqv+hoaH/hYWF/2dnZ/9MTEz/Ly8v/xgYGP8ZGRn/QUFB/15e + Xv9tbW3/dXV1/3h4eP9vb2//ampq/3t7e/9fX1//Tk5O/0JCQv84ODj/Pz8//0pKSv9UVFT/a2tr/3t7 + e/97e3v/eXl5/2RkZP9cXFz/VFRU/0hISP9AQED/NTU1/zk5Of80NDT/Ojo6/z09Pf9ERET/QUFB/0FB + Qf8uLi7/KSkp/zs7O/9OTk7/cXFx/19fX/9RUVH/UFBQ/15eXv90dHT/hoaG5Xt7e8J1dXWfX19ffExM + TFopKSklAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAZGRkKWVlZQnJycmWYmJiIn5+fqrOzs82rq6vwjY2N/3R0dP9iYmL/U1NT/01N + Tf9ZWVn/ampq/3Jycv97e3v/hYWF/42Njf+Wlpb/mpqa/6CgoP+np6f/rKys/6ysrP+qqqr/o6Oj/4uL + i/9sbGz/UFBQ/zc3N/8dHR3/CwsL/wUFBf8LCwv/HBwc/y4uLv9BQUH/V1dX/2BgYP9jY2P/UlJS/zg4 + OP8zMzP/RkZG/1JSUv9dXV3/f39//4+Pj/+Dg4P/enp6/3Jycv9fX1//XFxc/1BQUP9JSUn/Pz8//zg4 + OP83Nzf/MzMz/zk5Of87Ozv/Ojo6/ysrK/8gICD/MDAw/0dHR/9eXl7/a2tr/1dXV/9TU1P/W1tb/21t + bf9/f3/wgYGBzXNzc6pra2uIUVFRZTo6OkIAAAAKAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBAJFtbW06FhYVxkJCQk6ys + rLampqbZn5+f8IWFhf9ycnL/Y2Nj/1RUVP9MTEz/YmJi/2lpaf9vb2//eXl5/4SEhP+Pj4//k5OT/5eX + l/+enp7/paWl/6enp/+srKz/ra2t/6qqqv+cnJz/fHx8/1xcXP9AQED/KSkp/xQUFP8ICAj/DQ0N/xER + Ef8TExP/Hh4e/y0tLf86Ojr/QEBA/0lJSf9RUVH/Wlpa/2dnZ/9wcHD/jIyM/46Ojv+Li4v/fHx8/3R0 + dP9paWn/W1tb/1xcXP9PT0//S0tL/0BAQP84ODj/NTU1/zAwMP8xMTH/JSUl/xoaGv8oKCj/Pj4+/1VV + Vf9wcHD/YGBg/1hYWP9cXFz/aWlp/3p6evB9fX3ZfHx8tmxsbJNcXFxxQUFBTioqKiQAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAICAgCEJCQjZxcXFaf39/fKKiop+hoaHCnZ2d2ZiYmPCDg4P/c3Nz/2FhYf9SUlL/UVFR/2Rk + ZP9nZ2f/b29v/3l5ef+FhYX/ioqK/4+Pj/+Wlpb/nJyc/56env+lpaX/p6en/66urv+vr6//rq6u/6am + pv+Pj4//W1tb/05OTv9DQ0P/Ojo6/zw8PP9AQED/Pz8//0BAQP9ZWVn/bm5u/3Fxcf9ubm7/cHBw/319 + ff+JiYn/kJCQ/42Njf+Ojo7/hISE/3p6ev92dnb/Z2dn/1tbW/9YWFj/TU1N/0hISP8/Pz//Nzc3/y8v + L/8eHh7/FRUV/yMjI/84ODj/T09P/3Jycv9nZ2f/X19f/2BgYP9paWn/dnZ28Hh4eNl6enrCdXV1n19f + X3xPT09aLy8vNgAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC0tLRFZWVlCb29vZZSUlIiZmZmqmpqawpWV + ldmUlJTwgoKC/3Fxcf9fX1//VVVV/1VVVf9jY2P/aGho/3BwcP97e3v/gICA/4aGhv+Ojo7/lZWV/5eX + l/+cnJz/n5+f/6enp/+qqqr/q6ur/6+vr/+xsbH/sLCw/6ysrP+mpqb/nJyc/42Njf9/f3//dHR0/2tr + a/99fX3/jY2N/5qamv+fn5//k5OT/46Ojv+Pj4//jY2N/4+Pj/+Pj4//j4+P/4KCgv95eXn/c3Nz/2Nj + Y/9ZWVn/U1NT/0lJSf9DQ0P/MDAw/xwcHP8VFRX/Jycn/zs7O/9RUVH/b29v/2pqav9jY2P/ZGRk/2tr + a/91dXXwdHR02XZ2dsJzc3Oqa2triFFRUWU+Pj5CDw8PEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AABAQEAkW1tbToWFhXGQkJCTlJSUqpOTk8KQkJDZkpKS8IGBgf9xcXH/YGBg/1ZWVv9WVlb/ZmZm/2pq + av9ycnL/d3d3/3x8fP+FhYX/jY2N/4+Pj/+VlZX/l5eX/56env+goKD/o6Oj/6mpqf+srKz/rKys/66u + rv+wsLD/tbW1/7e3t/+4uLj/ubm5/7q6uv+6urr/urq6/7Kysv+mpqb/nJyc/5OTk/+Ojo7/kpKS/5GR + kf+Ojo7/ioqK/4iIiP97e3v/cXFx/2lpaf9cXFz/VVVV/0lJSf82Njb/ISEh/xkZGf8sLCz/QkJC/1ZW + Vv9vb2//bGxs/2VlZf9nZ2f/bm5u/3h4ePB0dHTZcnJywnJycqpsbGyTX19fcUFBQU4qKiokAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgICAIQkJCNnFxcVp/f398i4uLk42NjaqPj4/Cj4+P2ZCQ + kOyAgID4cnJy/2JiYv9YWFj/W1tb/2pqav9vb2//cHBw/3Nzc/97e3v/g4OD/4aGhv+NjY3/j4+P/5aW + lv+YmJj/mpqa/5+fn/+jo6P/o6Oj/6ampv+pqan/rq6u/7Kysv+0tLT/tbW1/7a2tv+2trb/tra2/7S0 + tP+qqqr/n5+f/5OTk/+NjY3/i4uL/46Ojv+Pj4//iIiI/4CAgP98fHz/dHR0/2lpaf9fX1//UFBQ/zk5 + Of8nJyf/ISEh/zY2Nv9HR0f/XV1d/3Jycv9ubm7/Z2dn/2lpaf9vb2/4eHh47HV1ddlycnLCb29vqmpq + apNhYWF8T09PWi8vLzYAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALS0tEVlZ + WUJvb29lfX19fIeHh5OLi4uqjIyMwo6OjtR6enrggoKC8HV1df9nZ2f/Xl5e/1xcXP9vb2//bm5u/25u + bv90dHT/e3t7/35+fv+EhIT/hoaG/42Njf+Pj4//kpKS/5eXl/+ampr/m5ub/56env+hoaH/pKSk/6en + p/+qqqr/q6ur/6ysrP+srKz/rKys/6qqqv+jo6P/mpqa/5KSkv+MjIz/iIiI/4iIiP+JiYn/h4eH/39/ + f/96enr/c3Nz/2VlZf9RUVH/PT09/ywsLP8vLy//QEBA/1JSUv9oaGj/eXl5/3Jycv9sbGz/bGxs/3Bw + cPBpaWngdHR01HNzc8Jvb2+qampqk2FhYXxTU1NlPj4+Qg8PDxEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAQCRbW1tObW1tZXt7e3yGhoaTioqKqoyMjL13d3fJe3t72YWF + hfB6enr/bW1t/2RkZP9gYGD/bW1t/29vb/9ycnL/dnZ2/3h4eP99fX3/fn5+/4WFhf+Ghob/iYmJ/42N + jf+RkZH/kpKS/5WVlf+YmJj/mpqa/5ycnP+enp7/n5+f/6CgoP+goKD/oKCg/6Ghof+bm5v/kpKS/4mJ + if+IiIj/hoaG/4ODg/+CgoL/gICA/3t7e/9ycnL/YGBg/0tLS/89PT3/NTU1/z09Pf9NTU3/YGBg/3Bw + cP99fX3/dnZ2/3Fxcf9ycnL/dHR08GhoaNllZWXJdXV1vXJycqpsbGyTYWFhfFNTU2VFRUVOKioqJAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAgIAhCQkI2W1tbTm1t + bWV7e3t8hoaGk4qKiqZ1dXWyd3d3wn19fdmKiorsf39/+Hd3d/9vb2//ZWVl/2lpaf92dnb/eHh4/3d3 + d/97e3v/enp6/39/f/9/f3//gYGB/4WFhf+IiIj/iYmJ/4yMjP+Ojo7/kJCQ/5GRkf+Tk5P/lJSU/5WV + lf+VlZX/lZWV/5WVlf+VlZX/jo6O/4WFhf+BgYH/f39//319ff94eHj/cHBw/2RkZP9YWFj/TExM/0RE + RP9ERET/TExM/1tbW/9ycnL/enp6/4CAgP98fHz/d3d3/3d3d/h4eHjsbW1t2WZmZsJkZGSyc3Nzpm1t + bZNjY2N8U1NTZUVFRU4vLy82AAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAtLS0RQkJCNltbW05tbW1le3t7fIaGho9zc3ObdnZ2qnp6esKDg4PUeHh44IeH + h+1/f3/4c3Nz/2xsbP9tbW3/eXl5/3x8fP9+fn7/e3t7/39/f/9+fn7/fX19/4CAgP+BgYH/gYGB/4SE + hP+FhYX/hoaG/4eHh/+JiYn/ioqK/4uLi/+Li4v/i4uL/4uLi/+MjIz/ioqK/4ODg/96enr/dHR0/29v + b/9qamr/YGBg/1hYWP9VVVX/UlJS/1RUVP9dXV3/cnJy/3x8fP+EhIT/gICA/319ff99fX34fHx87W1t + beBycnLUampqwmRkZKpkZGSbbm5uj2dnZ3xYWFhlRUVFTjQ0NDYeHh4RAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALS0tEUJCQjZbW1tObW1tZXt7 + e3hubm6EdHR0k3l5eaqAgIC9cnJyyX5+ftV3d3fghISE7Xl5efh1dXX/dHR0/3V1df+CgoL/gYGB/4OD + g/+AgID/f39//4CAgP+AgID/fn5+/39/f/9/f3//gICA/4GBgf+Dg4P/g4OD/4SEhP+EhIT/hISE/4WF + hf+FhYX/hoaG/4ODg/97e3v/c3Nz/2xsbP9nZ2f/ZGRk/2JiYv9iYmL/ZmZm/3t7e/+FhYX/h4eH/4eH + h/+Dg4P/f39/+ICAgO1vb2/gcnJy1WdnZ8lvb2+9aWlpqmNjY5NgYGCEZmZmeFtbW2VISEhONDQ0Nh4e + HhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAC0tLRFCQkI2W1tbTm1tbWBkZGRtb29vfHh4eJN/f3+mcHBwsnd3d75ubm7JfHx81XR0 + dOCFhYXtf39/+H19ff99fX3/e3t7/4mJif+JiYn/hYWF/4SEhP+Dg4P/f39//4CAgP+AgID/gYGB/4KC + gv+Dg4P/hISE/4WFhf+FhYX/hYWF/4WFhf+Ghob/hoaG/4SEhP+AgID/e3t7/3d3d/93d3f/dXV1/3p6 + ev+Ghob/jo6O/42Njf+Ojo7/ioqK/4WFhfiFhYXtcXFx4HR0dNVlZWXJbW1tvmRkZLJtbW2maGhok19f + X3xWVlZtWlpaYEtLS040NDQ2Hh4eEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAtLS0RQkJCNltbW0lUVFRVZWVlZXFx + cXx9fX2Pbm5um3V1dadoaGiydXV1vm1tbcl/f3/VeHh44IyMjO2Hh4f0gYGB+oKCgv+BgYH/g4OD/4uL + i/+Li4v/hoaG/4WFhf+EhIT/hISE/4WFhf+Hh4f/h4eH/4iIiP+IiIj/iIiI/4mJif+JiYn/ioqK/4qK + iv+IiIj/iIiI/4iIiP+Ojo7/kJCQ/4yMjP+RkZH/kpKS/46OjvqNjY30jY2N7Xd3d+B5eXnVZ2dnyW1t + bb5hYWGya2trp2RkZJtra2uPY2NjfFZWVmVISEhVSUlJSTk5OTYeHh4RAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAALS0tEUJCQjJCQkI+VVVVTmdnZ2V3d3d4bGxshHV1dZBoaGibcnJyp2dnZ7J3d3e+cXFxyYWF + hdWAgIDdenp644uLi+2FhYX0hISE+oSEhP2EhIT/g4OD/4iIiP+Kior/jo6O/5CQkP+SkpL/kpKS/5OT + k/+Tk5P/k5OT/5SUlP+UlJT/lZWV/5SUlP+RkZH/j4+P/4yMjP+Ojo7/j4+P/Y+Pj/qRkZH0k5OT7Xx8 + fON/f3/dgICA1WxsbMlvb2++YWFhsmtra6dhYWGbampqkGBgYIRmZmZ4WFhYZUhISE46Ojo+ODg4Mh4e + HhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAgIAgoKCggQkJCNlhYWE5qampgZGRkbXBw + cHlmZmaEcXFxkGRkZJtycnKna2trsnt7e754eHjGcnJyzIWFhdV/f3/denp643V1deZwcHDnhYWF7YWF + hfSGhob6hYWF/YiIiP+Kior/i4uL/4yMjP+NjY3/jY2N/42Njf+Pj4//j4+P/42Njf2Pj4/6jo6O9I6O + ju13d3fne3t75n9/f+OCgoLdhYWF1XBwcMx0dHTGd3d3vmZmZrJsbGynX19fm2pqapBfX1+EZ2dneVtb + W21dXV1gS0tLTjk5OTYgICAgICAgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAALS0tEUJCQjZbW1tJVFRUVWhoaGJgYGBtbW1teWRkZIRxcXGQaGhom3d3d6dycnKvampqtH5+ + fr54eHjGc3NzzG5ubs9paWnQfHx81Xt7e916enrjdXV15nNzc+d0dHTndXV153Z2dud2dnbndnZ253Z2 + dud3d3fnd3d353h4eOZ8fHzjf39/3X9/f9VqamrQb29vz3Nzc8x4eHjGfX19vmlpabRvb2+vdHR0p2Nj + Y5tqamqQXV1dhGdnZ3lZWVltXl5eYk5OTlVNTU1JOTk5Nh4eHhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC0tLRFCQkIyQkJCPlZWVkpUVFRVZWVlYl1d + XW1tbW15ZmZmhHV1dZBwcHCYZmZmnXh4eKdycnKvampqtGZmZrhgYGC5c3NzvnFxccZvb2/MbGxsz2pq + atBqamrQampq0GpqatBqamrQampq0GpqatBqamrQbGxs0GxsbM9vb2/McXFxxnNzc75gYGC5ZmZmuGpq + arRycnKvd3d3p2VlZZ1ra2uYcXFxkGJiYoRpaWl5WVlZbV5eXmJOTk5VT09PSj4+Pj44ODgyHh4eEQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAgICAIKCgoIEFBQTNCQkI+VlZWSlRUVFVlZWViYmJibXR0dHlubm6AZWVlhnV1dZBvb2+YZmZmnWJi + YqFbW1uibGxsp2lpaa9mZma0ZWVluGRkZLlkZGS5ZGRkuWRkZLlkZGS5ZGRkuWRkZLlkZGS5ZGRkuWVl + ZbhmZma0aWlpr2xsbKdbW1uiYmJioWZmZp1vb2+YdXV1kGNjY4ZsbGyAbW1teV1dXW1gYGBiTk5OVU9P + T0o+Pj4+PDw8MygoKCAgICAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQooKCggQUFBM0JCQj5WVlZKVFRUVWho + aGJmZmZpYGBgb3R0dHlubm6AZWVlhl9fX4lYWFiLaGhokGNjY5hhYWGdYWFhoWFhYaJhYWGiYWFhomFh + YaJhYWGiYWFhomFhYaJhYWGiYWFhomFhYaFhYWGdY2NjmGhoaJBYWFiLX19fiWVlZYZubm6AcnJyeWBg + YG9jY2NpZWVlYlFRUVVTU1NKPj4+Pjw8PDMoKCggGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAGRkZCigoKCBBQUEzQkJCPlpaWkpXV1dSVFRUWGhoaGJmZmZpYGBgb1xcXHJWVlZzZWVleWRk + ZIBfX1+GXV1diV9fX4tfX1+LX19fi19fX4tfX1+LX19fi19fX4tfX1+LX19fi11dXYlfX1+GZGRkgGVl + ZXlWVlZzXFxccmBgYG9mZmZpaGhoYlRUVFhUVFRSVlZWSj4+Pj48PDwzKCgoIBkZGQoAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZGRkKKCgoIEFBQTNBQUE7REREQFpa + WkpXV1dSVFRUWFFRUVtOTk5cYGBgYl9fX2leXl5vXl5ecl1dXXNdXV1zXV1dc11dXXNdXV1zXV1dc11d + XXNdXV1zXV1dc15eXnJeXl5vX19faWBgYGJOTk5cUVFRW1RUVFhXV1dSWlpaSkREREBBQUE7QUFBMygo + KCAZGRkKAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAABkZGQopKSkZKSkpJUFBQTNBQUE7REREQENDQ0Q/Pz9FU1NTSlRUVFJRUVFYUVFRW1NT + U1xTU1NcU1NTXFNTU1xTU1NcU1NTXFNTU1xTU1NcU1NTXFFRUVtRUVFYVFRUUlNTU0o/Pz9FQ0NDRERE + REBBQUE7QUFBMykpKSUpKSkZGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQopKSkZKSkpJSkp + KSwsLCwuQUFBM0FBQTtERERAQ0NDRENDQ0VDQ0NFQ0NDRUNDQ0VDQ0NFQ0NDRUNDQ0VDQ0NFQ0NDRUND + Q0RERERAQUFBO0FBQTMsLCwuKSkpLCkpKSUpKSkZGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGRkZCikpKRkpKSklKSkpLCwsLC4sLCwuLCwsLiws + LC4sLCwuLCwsLiwsLC4sLCwuLCwsLikpKSwpKSklKSkpGRkZGQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////////////////////////////////////////// + /////////////////////////////////////////////////////////////////////////4AA//// + ////////8AAAB///////////gAAAAP/////////+AAAAAD/////////4AAAAAA/////////gAAAAAAP/ + //////+AAAAAAAD///////8AAAAAAAB///////4AAAAAAAA///////gAAAAAAAAP//////AAAAAAAAAH + /////+AAAAAAAAAD/////8AAAAAAAAAB/////4AAAAAAAAAA/////wAAAAAAAAAAf////gAAAAAAAAAA + P////AAAAAAAAAAAH////AAAAAAAAAAAH///+AAAAAAAAAAAD///8AAAAAAAAAAAB///8AAAAAAAAAAA + B///4AAAAAAAAAAAA///wAAAAAAAAAAAAf//wAAAAAAAAAAAAf//gAAAAAAAAAAAAP//gAAAAAAAAAAA + AP//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH/+AAAAAAAAAAAAAD/+AAAAAAAAAAAA + AD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAA + AD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH//AAAAAAAAAAAA + AH//gAAAAAAAAAAAAP//gAAAAAAAAAAAAP//wAAAAAAAAAAAAf//wAAAAAAAAAAAAf//4AAAAAAAAAAA + A///8AAAAAAAAAAAB///8AAAAAAAAAAAB///+AAAAAAAAAAAD////AAAAAAAAAAAH////AAAAAAAAAAA + H////gAAAAAAAAAAP////wAAAAAAAAAAf////4AAAAAAAAAA/////8AAAAAAAAAB/////+AAAAAAAAAD + //////AAAAAAAAAH//////gAAAAAAAAP//////4AAAAAAAA///////8AAAAAAAB///////+AAAAAAAD/ + ///////gAAAAAAP////////4AAAAAA/////////+AAAAAD//////////gAAAAP//////////8AAAB/// + /////////4AA//////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////8= +</value> + </data> +</root>
\ No newline at end of file diff --git a/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.vb b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.vb new file mode 100644 index 0000000..cbf2b79 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/FirstBootSetup.vb @@ -0,0 +1,36 @@ +Public Class FirstBootSetup + + Public FinishedFirstBoot As Boolean = False + + Private Sub FirstBootSetup_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing + If FinishedFirstBoot = False Then + e.Cancel = True + MsgBox("You need to finish the first boot setup!") + End If + End Sub + + Private Sub TextBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles TextBox1.MouseDown + If TextBox1.Text = "Where do you want your ShiftOS executables to be save to? Nothing = C:\ShiftOS\SoftwareData\Launcher\ShiftOSEXE\" Then TextBox1.Text = Nothing + End Sub + + Private Sub TextBox2_MouseDown(sender As Object, e As MouseEventArgs) Handles TextBox2.MouseDown + If TextBox2.Text = "Type in a nickname here" Then TextBox2.Text = Nothing + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + If RadioButton1.Checked = True Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\BuildOption.dat", "Stable", False) + If RadioButton2.Checked = True Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\BuildOption.dat", "Unstable", False) + + If TextBox1.Text = Nothing Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\ExecFolder.dat", "C:\ShiftOS\SoftwareData\Launcher\ShiftOSEXE", False) + If Not TextBox1.Text = Nothing Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\ExecFolder.dat", TextBox1.Text, False) + + If TextBox2.Text = Nothing Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\Nickname.dat", "ShiftOS User", False) + If Not TextBox2.Text = Nothing Then My.Computer.FileSystem.WriteAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\Nickname.dat", TextBox2.Text, False) + + MsgBox("Completed!") + FinishedFirstBoot = True + Me.Close() + + Main_Launcher.UpdateOptions() + End Sub +End Class
\ No newline at end of file diff --git a/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.Designer.vb b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.Designer.vb new file mode 100644 index 0000000..22d2635 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.Designer.vb @@ -0,0 +1,114 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Main_Launcher + 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(Main_Launcher)) + Me.Label1 = New System.Windows.Forms.Label() + Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() + Me.ProgressBar1 = New System.Windows.Forms.ProgressBar() + Me.Button1 = New System.Windows.Forms.Button() + Me.Label2 = New System.Windows.Forms.Label() + Me.Button2 = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label1.Location = New System.Drawing.Point(12, 9) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(382, 37) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "Greetings, ShiftOS User" + ' + 'WebBrowser1 + ' + Me.WebBrowser1.Location = New System.Drawing.Point(3, 49) + Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) + Me.WebBrowser1.Name = "WebBrowser1" + Me.WebBrowser1.Size = New System.Drawing.Size(1097, 480) + Me.WebBrowser1.TabIndex = 1 + Me.WebBrowser1.Url = New System.Uri("http://shiftos.net", System.UriKind.Absolute) + ' + 'ProgressBar1 + ' + Me.ProgressBar1.Location = New System.Drawing.Point(3, 535) + Me.ProgressBar1.Name = "ProgressBar1" + Me.ProgressBar1.Size = New System.Drawing.Size(906, 23) + Me.ProgressBar1.TabIndex = 2 + ' + 'Button1 + ' + Me.Button1.Location = New System.Drawing.Point(915, 535) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(185, 42) + Me.Button1.TabIndex = 3 + Me.Button1.Text = "Play" + Me.Button1.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(12, 564) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(79, 13) + Me.Label2.TabIndex = 4 + Me.Label2.Text = "Status: Waiting" + ' + 'Button2 + ' + Me.Button2.Location = New System.Drawing.Point(927, 1) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(173, 45) + Me.Button2.TabIndex = 5 + Me.Button2.Text = "Options" + Me.Button2.UseVisualStyleBackColor = True + ' + 'Main_Launcher + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1104, 580) + Me.Controls.Add(Me.Button2) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.Button1) + Me.Controls.Add(Me.ProgressBar1) + Me.Controls.Add(Me.WebBrowser1) + Me.Controls.Add(Me.Label1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.MaximizeBox = False + Me.Name = "Main_Launcher" + Me.Text = "ShiftOS Launcher [VersionHere]" + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser + Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Button2 As System.Windows.Forms.Button + +End Class diff --git a/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.resx b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.resx new file mode 100644 index 0000000..b620454 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.resx @@ -0,0 +1,760 @@ +<?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="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + AAABAAEAYGAAAAAAIAColAAAFgAAACgAAABgAAAAwAAAAAEAIAAAAAAAACABAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABQAAAAwODg4SDAwMFgsLCxcLCwsXCwsLFwsL + CxcLCwsXCwsLFwsLCxcLCwsXCwsLFwwMDBYAAAASAAAADAAAAAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAMDg4OEgwMDBYLCwsXEhISHBUV + FSQZGRkpHBwcLRwcHC4cHBwuFhYWLhYWFi4WFhYuFhYWLhYWFi4WFhYuFhYWLhcXFy0TExMpDg4OJAkJ + CRwLCwsXDAwMFgAAABIAAAAMAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAAMDg4OEhIS + EhwVFRUkGRkZKRwcHC0cHBwuIyMjMyMjIzsoKChAJSUlRCUlJUUlJSVFISEhRSEhIUUhISFFISEhRSEh + IUUhISFFISEhRSIiIkQgICBAGhoaOxkZGTMREREuFxcXLRMTEykODg4kCQkJHAAAABIAAAAMAAAABQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAFAAAAEBISEhwcHBwkGRkZKSMjIzMnJyc7KCgoQCUlJUQlJSVFLS0tSi8vL1IuLi5YMDAwWy8v + L1wsLCxcLCwsXCwsLFwsLCxcLCwsXCwsLFwqKipcKioqXCcnJ1smJiZYIiIiUiIiIkoeHh5FHh4eRBwc + HEAaGho7GRkZMxMTEykODg4kCQkJHAAAABAAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAABQAAABASEhIcGhoaJygoKDMrKys7LCwsQDQ0NEoyMjJSMTExWDAw + MFssLCxcMTExYjMzM2k1NTVvNjY2cjMzM3MxMTFzMTExczExMXMxMTFzMTExczExMXMvLy9zLy8vcy0t + LXIsLCxvJycnaScnJ2IhISFcJCQkWyYmJlgiIiJSIiIiShwcHEAaGho7FBQUMw0NDScJCQkcAAAAEAAA + AAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUQEBAQGxsbHBoaGicoKCgzKSkpPjQ0 + NEo1NTVSNDQ0WDw8PGI9PT1pOTk5bzY2NnIxMTFzNzc3eTg4OIA3NzeGODg4iTc3N4s1NTWLMzMzizMz + M4sxMTGLMTExizExMYsxMTGLMDAwiy4uLokuLi6GLCwsgCoqKnkmJiZzKCgocikpKW8pKSlpJycnYiAg + IFgfHx9SHx8fShkZGT4UFBQzDQ0NJwkJCRwAAAAQAAAABQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEEBAQEBsb + GxwaGhonKCgoMykpKT40NDRKNjY2VT4+PmI/Pz9pPDw8b0FBQXlAQECAPT09hjo6Ook1NTWLOjo6kDs7 + O5g6OjqdOzs7oTo6OqI5OTmiNzc3ojU1NaI1NTWiNTU1ojU1NaI1NTWiNDQ0ojExMaExMTGdLS0tmCws + LJAoKCiLLS0tiSwsLIYsLCyAKioqeSUlJW8kJCRpJCQkYh4eHlUcHBxKFRUVPhQUFDMNDQ0nCQkJHAAA + ABAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAgcHBwbISEhJygoKDMtLS0+Nzc3SjY2NlU+Pj5iPz8/bUVFRXlERESAQUFBhkVF + RZBDQ0OYPz8/nT4+PqE6OjqiPj4+p0BAQK9BQUG0QkJCuEFBQbk/Pz+5Pj4+uTw8PLk8PDy5PDw8uTw8 + PLk8PDy5Ozs7uTc3N7g0NDS0MjIyry8vL6cuLi6iLy8voS8vL50tLS2YLCwskCgoKIYoKCiAKCgoeSMj + I20iIiJiGxsbVRwcHEoVFRU+FBQUMw0NDScJCQkbAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACBkZGR8pKSkyLS0tPjc3N0o5OTlVPj4+Yj09 + PW1FRUV5REREhElJSZBISEiYREREnUlJSadHR0evRUVFtEVFRbhDQ0O5SkpKvk1NTcZPT0/MUVFRz09P + T9BPT0/QTU1N0ExMTNBMTEzQTExM0ExMTNBLS0vQSUlJ0EdHR89DQ0PMPj4+xjw8PL42Nja5NjY2uDQ0 + NLQyMjKvLy8vpyoqKp0qKiqYKioqkCUlJYQkJCR5ISEhbSIiImIbGxtVHBwcShUVFT4PDw8yCAgIHwAA + AAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQQEBAQGRkZHy8v + LzY7OztJPDw8VURERGJBQUFtRUVFeUJCQoRJSUmQRUVFm0xMTKdMTEyvSkpKtFJSUr5RUVHGUlJSzFRU + VM9UVFTQZmZm229vb+p0dHT1eHh4/Hh4eP92dnb/dXV1/3Nzc/9zc3P/c3Nz/3Nzc/9ycnL/cXFx/2xs + bPxnZ2f1XV1d6lZWVttHR0fQREREz0BAQMw8PDzGODg4vi8vL7QtLS2vLCwspyYmJpslJSWQIyMjhCQk + JHkhISFtHx8fYhsbG1UYGBhJExMTNggICB8AAAAQAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAACBwcHBshISEnLy8vNj4+Pk5ISEhgRkZGbUpKSnlFRUWESUlJkEVFRZtLS0unSkpKslNT + U75VVVXGVVVVzGpqattwcHDqdHR09Xt7e/x8fHz/eXl5/3Fxcf9xcXH/bW1t/2tra/9paWn/aGho/2dn + Z/9nZ2f/Z2dn/2dnZ/9mZmb/ZGRk/2JiYv9kZGT/Y2Nj/2pqav9sbGz/aWlp/GBgYPVWVlbqTU1N2zs7 + O8w2NjbGMjIyvikpKbIoKCinJCQkmyUlJZAjIyOEIiIieR4eHm0dHR1gGhoaThMTEzYNDQ0nCQkJGwAA + AAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIISEhHy4uLjIxMTE+Ozs7TklJSWVPT094S0tLhE5O + TpBISEibTExMp0lJSbJQUFC+UlJSyWpqattycnLqdnZ29Xx8fP97e3v/d3d3/3Nzc/9ubm7/bW1t/2Zm + Zv9lZWX/YWFh/19fX/9eXl7/XV1d/1xcXP9cXFz/XFxc/1xcXP9bW1v/Wlpa/1lZWf9cXFz/W1tb/2Fh + Yf9gYGD/Y2Nj/2VlZf9lZWX/YmJi/1lZWfVPT0/qRUVF2zMzM8kuLi6+JycnsiYmJqcjIyObIyMjkCEh + IYQgICB4Hh4eZRcXF04VFRU+Dw8PMggICB8AAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAghISEfNDQ0Nj8/ + P0k/Pz9VR0dHZVBQUHxVVVWPUVFRm1FRUadMTEyyUFBQvlBQUMloaGjbcXFx8Xh4eP97e3v/fn5+/3R0 + dP9wcHD/bGxs/2dnZ/9jY2P/YmJi/1tbW/9bW1v/V1dX/1VVVf9VVVX/VFRU/1NTU/9UVFT/U1NT/1NT + U/9TU1P/UlJS/1FRUf9UVFT/VFRU/1paWv9ZWVn/W1tb/15eXv9eXl7/X19f/2VlZf9dXV3/VlZW/0tL + S/E/Pz/bLi4uySoqKr4lJSWyJSUlpyMjI5skJCSPISEhfBwcHGUYGBhVFRUVSRMTEzYICAgfAAAACAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAACCEhIR80NDQ2RUVFTk1NTWBLS0ttUFBQfFVVVZNYWFimUVFRslRUVL5SUlLJZWVl221t + bfFzc3P/eHh4/3x8fP90dHT/cnJy/2hoaP9lZWX/YmJi/11dXf9aWlr/WVlZ/1JSUv9PT0//SUlJ/0ZG + Rv9DQ0P/QkJC/0BAQP9CQkL/QkJC/0VFRf9JSUn/SkpK/0pKSv9NTU3/TU1N/1NTU/9SUlL/VFRU/1dX + V/9XV1f/WFhY/19fX/9cXFz/YGBg/1lZWf9QUFD/RUVF8To6OtsqKirJJycnviQkJLIjIyOmIyMjkx8f + H3wcHBxtGxsbYBcXF04TExM2CAgIHwAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIISEhHzQ0NDZFRUVOU1NTZVlZWXhRUVGEU1NTk1hY + WKpaWlq9VlZWyWhoaNttbW3xbm5u/3Fxcf93d3f/cXFx/3BwcP9paWn/aGho/19fX/9cXFz/WVlZ/1JS + Uv9JSUn/RUVF/z4+Pv87Ozv/NTU1/zExMf8sLCz/IyMj/x4eHv8oKCj/MjIy/zs7O/9AQED/Q0ND/0VF + Rf9JSUn/SkpK/09PT/9NTU3/Tk5O/1BQUP9RUVH/UlJS/1lZWf9XV1f/W1tb/1paWv9cXFz/UlJS/0hI + SP8+Pj7xMjIy2yYmJskmJia9JCQkqiMjI5MfHx+EICAgeBwcHGUXFxdOExMTNggICB8AAAAIAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQhISEfOTk5NkVF + RU5TU1NlX19ffGBgYI9XV1ebV1dXqltbW8JpaWnZb29v8W1tbf9ubm7/cHBw/29vb/9ra2v/Z2dn/2Zm + Zv9gYGD/YGBg/1ZWVv9MTEz/RUVF/z4+Pv80NDT/JSUl/x0dHf8bGxv/FRUV/w4ODv8KCgr/DAwM/w8P + D/8UFBT/Ghoa/yEhIf8pKSn/MDAw/zY2Nv87Ozv/SUlJ/1BQUP9MTEz/TExM/01NTf9MTEz/TU1N/1NT + U/9RUVH/VVVV/1VVVf9XV1f/Wlpa/1RUVP9HR0f/PT09/zc3N/EuLi7ZJiYmwiIiIqohISGbJCQkjyEh + IXwcHBxlFxcXThMTEzYICAgfAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAABkZGRQ5OTk2SEhITlZWVmVfX198ZmZmk2VlZaZZWVmyWVlZwm9vb+Fubm7/a2tr/2xs + bP9wcHD/ZWVl/2BgYP9dXV3/XFxc/19fX/9ZWVn/V1dX/0ZGRv87Ozv/NTU1/ywsLP8mJib/Hx8f/xYW + Fv8PDw//CQkJ/wMDA/8AAAD/AQEB/wEBAf8CAgL/BgYG/wwMDP8TExP/Gxsb/yUlJf8wMDD/OTk5/0hI + SP9KSkr/TExM/05OTv9MTEz/S0tL/1FRUf9NTU3/UVFR/1FRUf9TU1P/VlZW/1RUVP9VVVX/RkZG/zw8 + PP82Njb/MTEx4SUlJcIiIiKyIyMjpiQkJJMhISF8HBwcZRcXF04TExM2AAAAFAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACDU1NStLS0tOWFhYZWNjY3xoaGiTampqqmho + aL1cXFzJbW1t4Wtra/9oaGj/ampq/29vb/9jY2P/U1NT/1NTU/9TU1P/V1dX/1lZWf9QUFD/S0tL/0BA + QP85OTn/MjIy/ysrK/8jIyP/Gxsb/xEREf8ICAj/AwMD/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wEB + Af8BAQH/BAQE/wwMDP8WFhb/JSUl/zU1Nf8/Pz//SEhI/1FRUf9PT0//TU1N/1JSUv9NTU3/UFBQ/05O + Tv9QUFD/U1NT/1FRUf9RUVH/VVVV/0dHR/87Ozv/NDQ0/y4uLuEjIyPJJiYmvSUlJaokJCSTISEhfB4e + HmUaGhpOEhISKwAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEISEhH01N + TUJdXV1lZ2dnfG1tbZNtbW2qbm5uwnZ2dtlycnLxampq/2NjY/9lZWX/ampq/19fX/9OTk7/SUlJ/0xM + TP9QUFD/UlJS/09PT/9HR0f/RUVF/z09Pf84ODj/MzMz/yoqKv8gICD/FxcX/wwMDP8DAwP/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8CAgL/CAgI/xQUFP8nJyf/ODg4/0lJ + Sf9SUlL/UlJS/1ZWVv9QUFD/UVFR/09PT/9PT0//UVFR/05OTv9OTk7/UlJS/1RUVP9HR0f/ODg4/zIy + Mv8vLy/xKysr2SYmJsIlJSWqJCQkkyMjI3whISFlGxsbQggICB8AAAAEAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAZGRkUOTk5Nl1dXVptbW18cnJyk3Nzc6pycnLCgYGB4Xd3d/9qamr/YWFh/2Ji + Yv9mZmb/Wlpa/0tLS/9DQ0P/RERE/0tLS/9PT0//T09P/0pKSv9CQkL/Pj4+/zQ0NP8wMDD/Kioq/yEh + If8YGBj/DQ0N/wMDA/8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8FBQX/FBQU/yoqKv9AQED/Tk5O/1xcXP9WVlb/VlZW/1JSUv9RUVH/UVFR/01N + Tf9MTEz/UFBQ/1JSUv9UVFT/RUVF/zY2Nv8vLy//Li4u/y4uLuEnJyfCKCgoqioqKpMnJyd8IiIiWhMT + EzYNDQ0UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAg1NTUrTk5OTm5ubnF5eXmTe3t7qnd3 + d8KGhobheXl5/2tra/9gYGD/X19f/2JiYv9XV1f/RkZG/z4+Pv8/Pz//Q0ND/0tLS/9MTEz/SUlJ/0RE + RP85OTn/MTEx/ygoKP8hISH/FxcX/w8PD/8JCQn/BAQE/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8YGBj/ODg4/1RU + VP9ZWVn/W1tb/1hYWP9VVVX/VVVV/09PT/9NTU3/T09P/1BQUP9SUlL/UlJS/0NDQ/80NDT/LS0t/yws + LP8uLi7hKSkpwisrK6orKyuTKSkpcR0dHU4SEhIrAAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCEh + IR9NTU1CYGBgZX5+foiCgoKqgYGBwouLi+F9fX3/bW1t/2FhYf9dXV3/YGBg/1VVVf9GRkb/OTk5/zs7 + O/8+Pj7/RERE/0pKSv9ISEj/QUFB/zY2Nv8sLCz/ISEh/xISEv8MDAz/BQUF/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8BAQH/CAgI/yoqKv9LS0v/W1tb/1paWv9bW1v/Wlpa/1NTU/9PT0//UFBQ/1BQ + UP9SUlL/UVFR/1RUVP9AQED/MTEx/ykpKf8sLCz/MTEx4S0tLcIuLi6qLS0tiCMjI2UbGxtCCAgIHwAA + AAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAJiYmFD09PTZgYGBab29vfIqKip+KiorClpaW4YODg/9vb2//YWFh/1xc + XP9fX1//VlZW/0hISP85OTn/NTU1/zo6Ov8+Pj7/QEBA/0VFRf8/Pz//NDQ0/yYmJv8UFBT/DQ0N/wQE + BP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wEBAf8CAgL/AQEB/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wUFBf8XFxf/Q0ND/1dX + V/9aWlr/XFxc/1hYWP9UVFT/U1NT/1JSUv9TU1P/UVFR/1RUVP9RUVH/Ojo6/ysrK/8nJyf/Li4u/zU1 + NeEyMjLCMjIynykpKXwlJSVaGBgYNg0NDRQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFOzs7K1JSUk5zc3Nxf39/k5OT + k7ahoaHhjIyM/3R0dP9iYmL/WVlZ/1xcXP9YWFj/S0tL/zo6Ov8zMzP/NTU1/zk5Of85OTn/PT09/0BA + QP8xMTH/ICAg/xISEv8ICAj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AgIC/wwMDP8XFxf/Hx8f/yEh + If8bGxv/EBAQ/wcHB/8EBAT/AgIC/wEBAf8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8EBAT/EhIS/zIyMv9RUVH/Wlpa/1lZWf9YWFj/WVlZ/1ZWVv9VVVX/UlJS/1VV + Vf9WVlb/S0tL/zIyMv8oKCj/KCgo/zIyMv86OjrhNTU1ti8vL5MrKytxHR0dThISEisAAAAFAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAkJCQVUVFRQmVlZWWFhYWIioqKqqurq9KXl5f/fHx8/2RkZP9ZWVn/V1dX/1tbW/9OTk7/QEBA/zU1 + Nf8yMjL/Ly8v/zAwMP8zMzP/MzMz/y8vL/8cHBz/ERER/wMDA/8AAAD/AAAA/wAAAP8AAAD/AQEB/wgI + CP8eHh7/Ojo6/0pKSv9UVFT/UVFR/1FRUf9PT0//SkpK/0JCQv8uLi7/FxcX/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BAQE/xMTE/8oKCj/R0dH/1RU + VP9YWFj/XV1d/1xcXP9ZWVn/VVVV/1ZWVv9XV1f/W1tb/0BAQP8tLS3/Jycn/ywsLP84ODj/PT090jQ0 + NKoxMTGIJiYmZR8fH0IMDAwVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAVAQEAsZmZmWnl5eXySkpKfk5OTwqKiovGGhob/a2tr/1lZ + Wf9TU1P/WFhY/1VVVf9ERET/ODg4/zQ0NP8wMDD/Jycn/ygoKP8nJyf/IiIi/xwcHP8PDw//AgIC/wAA + AP8AAAD/AAAA/wAAAP8HBwf/JSUl/0RERP9kZGT/hISE/5ycnP+SkpL/hISE/3V1df9sbGz/bW1t/3R0 + dP9NTU3/LS0t/xkZGf8NDQ3/BQUF/wEBAf8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AgIC/wgICP8WFhb/KSkp/zQ0NP9PT0//W1tb/1xcXP9eXl7/Wlpa/1lZWf9ZWVn/XFxc/1JS + Uv84ODj/KSkp/ygoKP8xMTH/Pj4+8Tc3N8I2NjafLy8vfCgoKFoXFxcsAAAABQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACoqKhJUVFRDfHx8cYmJ + iZOfn5+2rq6u4ZSUlP90dHT/XV1d/1BQUP9TU1P/VVVV/01NTf89PT3/Nzc3/zIyMv8jIyP/HR0d/xsb + G/8XFxf/GBgY/xAQEP8CAgL/AAAA/wAAAP8AAAD/AwMD/xcXF/8+Pj7/ZWVl/4WFhf+bm5v/rq6u/7a2 + tv+4uLj/uLi4/7Gxsf+ysrL/tLS0/6Wlpf+SkpL/e3t7/1tbW/86Ojr/JiYm/xUVFf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wcHB/8ODg7/Ghoa/ysrK/8rKyv/T09P/1lZ + Wf9eXl7/Xl5e/15eXv9cXFz/X19f/19fX/9HR0f/MDAw/ygoKP8sLCz/OTk5/0JCQuE8PDy2NjY2kzIy + MnEiIiJDDg4OEgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAEBAQCRqampbkJCQiJmZmaq8vLzSpKSk/4SEhP9kZGT/UlJS/0xMTP9WVlb/UVFR/0VF + Rf87Ozv/ODg4/ysrK/8ZGRn/EBAQ/wwMDP8VFRX/FBQU/wkJCf8FBQX/AwMD/wAAAP8EBAT/Jycn/0dH + R/9lZWX/fX19/5SUlP+urq7/vb29/7+/v//BwcH/wsLC/8LCwv/CwsL/wsLC/8LCwv+9vb3/vLy8/6ys + rP+Pj4//Z2dn/z4+Pv8ODg7/AQEB/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AQEB/wUF + Bf8NDQ3/FBQU/yAgIP8rKyv/Kioq/0lJSf9aWlr/X19f/2JiYv9hYWH/YmJi/2FhYf9bW1v/Ozs7/ysr + K/8oKCj/MTEx/z8/P/9FRUXSPT09qjg4OIgqKipbFRUVJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABVZWVjuCgoJyo6Ojn6ioqMK1tbXxlJSU/3Fx + cf9XV1f/S0tL/05OTv9VVVX/TExM/0FBQf86Ojr/MTEx/x0dHf8SEhL/BAQE/wwMDP8TExP/FxcX/xQU + FP8QEBD/CwsL/wcHB/8bGxv/PDw8/1ZWVv9vb2//iIiI/6Kiov+8vLz/xMTE/8TExP/FxcX/xsbG/8jI + yP/IyMj/yMjI/8nJyf/IyMj/x8fH/8fHx//FxcX/uLi4/5ycnP9mZmb/ISEh/wUFBf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8NDQ3/FBQU/xsbG/8mJib/Kioq/ykpKf9JSUn/W1tb/2Nj + Y/9lZWX/Z2dn/2VlZf9oaGj/S0tL/zIyMv8oKCj/Kysr/zg4OP9ISEjxQ0NDwkBAQJ82NjZyIyMjOwAA + AAUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKioqEm9v + b1OXl5eJtLS0tsnJyeGqqqr/g4OD/2JiYv9MTEz/R0dH/1FRUf9WVlb/SkpK/0JCQv87Ozv/Kioq/yAg + IP8LCwv/BgYG/xEREf8aGhr/IiIi/yEhIf8dHR3/GRkZ/x8fH/85OTn/S0tL/2BgYP9zc3P/kZGR/6qq + qv/FxcX/x8fH/8nJyf/FxcX/tra2/6qqqv+tra3/tLS0/7e3t/+9vb3/ycnJ/8rKyv/Jycn/yMjI/8bG + xv/BwcH/mpqa/0tLS/8ICAj/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wUFBf8ODg7/FhYW/xsb + G/8iIiL/Kioq/ykpKf8oKCj/SkpK/15eXv9lZWX/a2tr/2lpaf9ra2v/X19f/zw8PP8qKir/Jycn/zIy + Mv9ERET/T09P4UlJSbY/Pz+JLi4uUw4ODhIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAQEBAJISEhGqsrKyg2NjY0sLCwv+bm5v/c3Nz/1VVVf9GRkb/SUlJ/1dX + V/9XV1f/TU1N/0xMTP9AQED/Li4u/yEhIf8JCQn/EhIS/xUVFf8qKir/LS0t/y8vL/8sLCz/Kysr/zo6 + Ov9QUFD/Z2dn/3V1df+Hh4f/oaGh/7a2tv/Gxsb/vLy8/4+Pj/9gYGD/VVVV/1paWv9gYGD/WVlZ/0RE + RP+JiYn/wcHB/8rKyv/Ly8v/y8vL/8rKyv/Jycn/x8fH/7m5uf9ycnL/Dg4O/wEBAf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wUFBf8ODg7/GBgY/x4eHv8iIiL/KSkp/ysrK/8oKCj/KSkp/1FRUf9hYWH/a2tr/21t + bf9vb2//cXFx/0xMTP8wMDD/JiYm/y0tLf89PT3/UFBQ/1VVVdJISEigOjo6ahwcHCQAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWFhYOpycnIG/v7+31tbW8bW1 + tf+Kior/ZWVl/0xMTP9ERET/UVFR/2FhYf9eXl7/V1dX/1ZWVv9CQkL/MjIy/x4eHv8cHBz/EhIS/yMj + I/8wMDD/Pj4+/z4+Pv88PDz/PT09/09PT/9kZGT/eXl5/42Njf+lpaX/t7e3/8DAwP+YmJj/UlJS/x0d + Hf8AAAD/AAAA/wUFBf8RERH/BwcH/w4ODv8rKyv/VFRU/4WFhf+qqqr/vb29/8vLy//Ly8v/ysrK/8nJ + yf/ExMT/lJSU/x4eHv8BAQH/AAAA/wAAAP8AAAD/AAAA/wAAAP8TExP/Gxsb/yIiIv8mJib/KCgo/y0t + Lf8pKSn/KCgo/ywsLP9WVlb/aGho/29vb/90dHT/eXl5/2BgYP86Ojr/Jycn/ykpKf83Nzf/SkpK/1tb + W/FRUVG3Q0NDgSgoKDoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAcXFxUbKyspjl5eXU0NDQ/6ioqP96enr/WFhY/0VFRf9FRUX/W1tb/2tra/9kZGT/ZGRk/1tb + W/9ERET/Nzc3/x8fH/8lJSX/ICAg/y0tLf83Nzf/SEhI/09PT/9OTk7/Tk5O/2NjY/96enr/jY2N/6en + p/+9vb3/vb29/4KCgv89PT3/ExMT/wICAv8AAAD/AAAA/wYGBv8NDQ3/FBQU/xMTE/8RERH/FRUV/zIy + Mv9mZmb/lJSU/8LCwv/Ly8v/y8vL/8vLy//Kysr/ycnJ/6Ghof8iIiL/AQEB/wAAAP8AAAD/AAAA/wIC + Av8VFRX/ICAg/ycnJ/8sLCz/LCws/y0tLf8sLCz/KCgo/ygoKP82Njb/YWFh/25ubv94eHj/fX19/3Z2 + dv9HR0f/Kysr/yYmJv8yMjL/RUVF/1paWv9fX1/UTU1NmDU1NVEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFiIiIacbGxq/i4uLxxcXF/5aWlv9sbGz/Tk5O/0ND + Q/9LS0v/ZmZm/3Z2dv9ycnL/cHBw/1tbW/9NTU3/NjY2/zMzM/8lJSX/Li4u/zExMf9FRUX/TU1N/1RU + VP9ZWVn/X19f/3V1df+MjIz/qKio/76+vv+9vb3/j4+P/1RUVP8nJyf/AgIC/wICAv8RERH/FxcX/x4e + Hv8uLi7/UVFR/35+fv8yMjL/BAQE/woKCv8iIiL/Wlpa/5mZmf/Gxsb/y8vL/8vLy//Ly8v/ysrK/8rK + yv+ZmZn/FhYW/wAAAP8AAAD/AAAA/wYGBv8RERH/KCgo/y4uLv8zMzP/MzMz/zIyMv8wMDD/Kioq/ycn + J/8pKSn/TExM/2lpaf94eHj/goKC/4uLi/9YWFj/MjIy/yQkJP8tLS3/Pz8//1VVVf9kZGTxV1dXr0FB + QWkAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqKioSoaGhgPDw + 8Mze3t7/uLi4/4aGhv9eXl7/RkZG/0RERP9TU1P/c3Nz/4GBgf+AgID/dnZ2/11dXf9SUlL/OTk5/0BA + QP82Njb/PT09/zk5Of9LS0v/U1NT/1ZWVv9fX1//YWFh/3R0dP+Xl5f/tbW1/8fHx/+rq6v/c3Nz/0FB + Qf8QEBD/AgIC/woKCv8mJib/R0dH/11dXf9gYGD/ZGRk/2tra/+Dg4P/aGho/ywsLP8RERH/Kioq/2Fh + Yf+ioqL/yMjI/8vLy//Ly8v/y8vL/8vLy//ExMT/eXl5/wgICP8AAAD/AAAA/wcHB/8TExP/Li4u/zk5 + Of87Ozv/PDw8/zg4OP81NTX/LS0t/ygoKP8nJyf/Kioq/11dXf90dHT/hYWF/5mZmf9sbGz/PDw8/yMj + I/8oKCj/Ojo6/1BQUP9kZGT/ZmZmzE5OToAODg4SAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABAQEAkuLi4l+3t7eXX19f/qamp/3h4eP9SUlL/QkJC/0hISP9eXl7/gYGB/4uL + i/+Ojo7/d3d3/2RkZP9TU1P/S0tL/z8/P/9JSUn/SkpK/1JSUv9SUlL/UlJS/1paWv9iYmL/Z2dn/3R0 + dP+UlJT/q6ur/7Gxsf+Li4v/XV1d/yoqKv8GBgb/AgIC/wsLC/8ICAj/BAQE/xISEv8rKyv/NDQ0/xAQ + EP9SUlL/dnZ2/2tra/87Ozv/Ghoa/zIyMv99fX3/tLS0/8zMzP/MzMz/y8vL/8vLy//Kysr/tLS0/zw8 + PP8CAgL/AAAA/wEBAf8gICD/Ly8v/0RERP9FRUX/RUVF/0JCQv87Ozv/MTEx/yoqKv8nJyf/KCgo/0JC + Qv9sbGz/hISE/6Kiov+CgoL/R0dH/yUlJf8kJCT/NDQ0/0tLS/9gYGD/bW1t5VlZWZccHBwkAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABYWFg6z8/Prurq6vXQ0ND/m5ub/2lp + af9ISEj/Pz8//01NTf9qamr/kZGR/5qamv+YmJj/fX19/2xsbP9UVFT/WFhY/0xMTP9WVlb/WFhY/2Vl + Zf9iYmL/ZGRk/2VlZf9lZWX/Z2dn/21tbf+Li4v/l5eX/42Njf9nZ2f/LCws/wsLC/8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BgYG/xgYGP8pKSn/IiIi/xEREf9RUVH/nZ2d/8jI + yP/MzMz/zMzM/8vLy//Ly8v/vr6+/3l5ef8NDQ3/AAAA/wgICP8pKSn/NjY2/05OTv9QUFD/UFBQ/01N + Tf9ERET/NjY2/ywsLP8oKCj/Jycn/yoqKv9eXl7/f39//6Wlpf+YmJj/VFRU/ygoKP8hISH/Ly8v/0VF + Rf9eXl7/bm5u9WVlZa4sLCw6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AABxcXFR/Pz8y+np6f/IyMj/jo6O/11dXf9AQED/Pj4+/1JSUv92dnb/paWl/6mpqf+enp7/goKC/3Nz + c/9YWFj/YGBg/11dXf9oaGj/aWlp/2xsbP9zc3P/eXl5/3t7e/99fX3/f39//4KCgv+AgID/f39//3Nz + c/8+Pj7/Dg4O/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/CQkJ/wYGBv80NDT/fn5+/8PDw//MzMz/zMzM/8zMzP/Ly8v/wcHB/5GRkf81NTX/AgIC/xQU + FP8jIyP/RUVF/1RUVP9hYWH/X19f/1tbW/9OTk7/PT09/zAwMP8pKSn/Jycn/ykpKf9DQ0P/d3d3/6Sk + pP+urq7/YmJi/ywsLP8fHx//Kioq/0FBQf9cXFz/bm5u/3d3d8s5OTlRAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKiopp/v7+5OXl5f/AwMD/goKC/1JSUv87Ozv/Pj4+/1dX + V/+BgYH/ubm5/7i4uP+pqan/iYmJ/3l5ef9lZWX/ZGRk/25ubv91dXX/gYGB/4SEhP+IiIj/j4+P/4+P + j/+Li4v/iYmJ/3R0dP9oaGj/ZmZm/1VVVf8ZGRn/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8cHBz/ampq/7i4uP/MzMz/zMzM/8zM + zP/MzMz/xMTE/6SkpP9MTEz/BgYG/wQEBP8qKir/VFRU/1tbW/9wcHD/bm5u/2pqav9ZWVn/RERE/zQ0 + NP8rKyv/Jycn/ygoKP8rKyv/aGho/5+fn//BwcH/b29v/zIyMv8eHh7/JiYm/z09Pf9aWlr/bW1t/39/ + f+RJSUlpAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAChoaGA/f399OHh + 4f+4uLj/dnZ2/0hISP83Nzf/Pz8//1tbW/+Kior/xsbG/7+/v/+qqqr/kZGR/3x8fP90dHT/a2tr/3d3 + d/+BgYH/j4+P/5SUlP+UlJT/lJSU/5OTk/+SkpL/d3d3/1RUVP9OTk7/Tk5O/z09Pf8SEhL/AgIC/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8KCgr/TExM/62trf/MzMz/zMzM/8zMzP/MzMz/zMzM/6Wlpf9UVFT/EhIS/w8PD/88PDz/X19f/2Zm + Zv9/f3//f39//3d3d/9kZGT/TExM/zo6Ov8uLi7/KCgo/ycnJ/8qKir/UVFR/5iYmP/S0tL/fHx8/zc3 + N/8eHh7/IiIi/zg4OP9YWFj/bGxs/4ODg/RaWlqAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAC4uLiX/v7+/Nzc3P+ysrL/bW1t/0FBQf81NTX/QEBA/15eXv+RkZH/09PT/8jI + yP+wsLD/m5ub/4GBgf94eHj/cHBw/3p6ev+BgYH/k5OT/5aWlv+Tk5P/lZWV/5OTk/+IiIj/YmJi/zw8 + PP81NTX/NjY2/y0tLf8ZGRn/FBQU/wkJCf8CAgL/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/PT09/6Wlpf/MzMz/zMzM/8zMzP/MzMz/zMzM/5qa + mv9WVlb/EhIS/yEhIf9OTk7/ZGRk/3V1df+Pj4//kpKS/4aGhv9ubm7/VFRU/0BAQP8xMTH/Kioq/ycn + J/8oKCj/Nzc3/42Njf/g4OD/iYmJ/z09Pf8fHx//Hx8f/zQ0NP9XV1f/bGxs/4WFhfxnZ2eXAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADPz8+u/////9fX1/+tra3/ZGRk/zw8 + PP80NDT/QEBA/2BgYP+Xl5f/29vb/8nJyf+0tLT/oaGh/4aGhv99fX3/cnJy/319ff+CgoL/jIyM/5OT + k/+UlJT/k5OT/5CQkP95eXn/SkpK/yIiIv8aGhr/LCws/zQ0NP83Nzf/NTU1/ykpKf8VFRX/BgYG/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/QkJC/6Ki + ov/Ly8v/zMzM/8zMzP/MzMz/y8vL/4mJif9UVFT/FRUV/zMzM/9dXV3/Z2dn/4eHh/+bm5v/o6Oj/5OT + k/95eXn/XV1d/0ZGRv81NTX/LCws/ygoKP8oKCj/LS0t/3t7e//s7Oz/kpKS/0FBQf8gICD/Hh4e/zEx + Mf9VVVX/a2tr/4WFhf93d3euAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAD9/f3L/////9TU1P+oqKj/XV1d/zk5Of8zMzP/QUFB/2JiYv+enp7/4eHh/8TExP+1tbX/qamp/46O + jv+Hh4f/fHx8/4CAgP+FhYX/jIyM/5GRkf+VlZX/k5OT/3t7e/9hYWH/IiIi/w4ODv8NDQ3/NDQ0/0xM + TP9VVVX/VlZW/0xMTP8+Pj7/Jycn/xISEv8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8CAgL/VFRU/6SkpP/MzMz/zMzM/8zMzP/MzMz/w8PD/3t7e/9PT0//EBAQ/z09 + Pf9lZWX/cXFx/5mZmf+qqqr/r6+v/52dnf+CgoL/ZmZm/0xMTP85OTn/Li4u/ygoKP8nJyf/LCws/2ho + aP/19fX/mpqa/0VFRf8hISH/HBwc/y8vL/9VVVX/a2tr/4ODg/+Ojo7LAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v7k/////9LS0v+mpqb/WVlZ/zc3N/8zMzP/QEBA/2Fh + Yf+hoaH/6enp/8DAwP+0tLT/qqqq/5eXl/+RkZH/iIiI/4SEhP+Li4v/jo6O/5OTk/+Wlpb/kpKS/1xc + XP9CQkL/BgYG/yAgIP81NTX/UlJS/3Fxcf92dnb/cnJy/2lpaf9mZmb/V1dX/0NDQ/8iIiL/CwsL/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8ODg7/YGBg/6Ojo//MzMz/zMzM/8zM + zP/MzMz/ysrK/4CAgP9GRkb/AgIC/z4+Pv9nZ2f/g4OD/6urq/+7u7v/ubm5/6Wlpf+Li4v/bW1t/1NT + U/89PT3/MDAw/ykpKf8nJyf/Kysr/09PT//7+/v/np6e/0hISP8iIiL/HBwc/y4uLv9VVVX/bGxs/4SE + hP+amprkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD9/f30/////9HR + 0f+lpaX/V1dX/zc3N/8zMzP/Pz8//15eXv+jo6P/8PDw/76+vv+0tLT/qamp/6CgoP+bm5v/k5OT/4+P + j/+NjY3/kZGR/5SUlP+ampr/lpaW/1BQUP8mJib/AwMD/zY2Nv9oaGj/gYGB/46Ojv+Wlpb/lZWV/4+P + j/+Dg4P/eXl5/2NjY/9MTEz/JCQk/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8ODg7/RERE/6+vr//MzMz/zMzM/8zMzP/MzMz/vr6+/46Ojv8+Pj7/DAwM/zg4OP9ra2v/lJSU/729 + vf/Gxsb/vb29/6urq/+SkpL/dHR0/1hYWP9BQUH/MzMz/yoqKv8nJyf/Kioq/0FBQf/+/v7/oqKi/0xM + TP8jIyP/HR0d/y0tLf9WVlb/bm5u/4aGhv+hoaH0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAD+/v77/////9DQ0P+kpKT/VlZW/zY2Nv8yMjL/PT09/1tbW/+hoaH/8/Pz/76+ + vv+0tLT/qamp/6Ojo/+hoaH/n5+f/52dnf+bm5v/nZ2d/6Wlpf+qqqr/oqKi/1hYWP9FRUX/BgYG/01N + Tf9mZmb/hYWF/6qqqv+2trb/tra2/7a2tv++vr7/urq6/7CwsP+lpaX/m5ub/3l5ef9AQED/JiYm/wAA + AP8NDQ3/AAAA/wAAAP8ICAj/GBgY/yYmJv9OTk7/tra2/8XFxf/MzMz/zMzM/8zMzP/FxcX/pKSk/1JS + Uv8mJib/FRUV/19fX/+IiIj/pqam/8bGxv/Jycn/wcHB/7CwsP+Xl5f/enp6/15eXv9FRUX/NTU1/yws + LP8nJyf/KSkp/zw8PP//////pKSk/05OTv8lJSX/HR0d/y4uLv9YWFj/cHBw/4mJif+lpaX7AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v75/////9HR0f+lpaX/V1dX/zc3 + N/8yMjL/PT09/1paWv+enp7/8vLy/76+vv+0tLT/qamp/6Ojo/+hoaH/pKSk/6mpqf+qqqr/q6ur/7Ky + sv+5ubn/paWl/2JiYv9ZWVn/JCQk/1tbW/9vb2//nJyc/7u7u//Jycn/zMzM/8zMzP/MzMz/ysrK/8zM + zP/Kysr/xcXF/8zMzP/Gxsb/pqam/zIyMv9mZmb/YGBg/01NTf9OTk7/VFRU/21tbf+goKD/ysrK/8zM + zP/MzMz/zMzM/8rKyv+xsbH/goKC/yIiIv8KCgr/GBgY/3R0dP+ioqL/tbW1/8rKyv/Jycn/w8PD/7Oz + s/+cnJz/f39//2NjY/9ISEj/ODg4/y0tLf8oKCj/KSkp/z09Pf/+/v7/o6Oj/05OTv8lJSX/Hh4e/y8v + L/9aWlr/c3Nz/4yMjP+np6f5AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAD+/v7u/////9HR0f+lpaX/WFhY/zc3N/8zMzP/Pj4+/1lZWf+ZmZn/7e3t/7+/v/+0tLT/qqqq/6Oj + o/+hoaH/paWl/6ysrP+0tLT/urq6/8PDw//IyMj/oqKi/2ZmZv9GRkb/LS0t/2RkZP9/f3//tra2/8vL + y//Kysr/zMzM/8jIyP/Hx8f/zMzM/8zMzP/MzMz/zMzM/8zMzP/MzMz/zMzM/8zMzP/Gxsb/srKy/7Ky + sv+jo6P/oaGh/6qqqv/ExMT/zMzM/8zMzP/MzMz/y8vL/7q6uv+VlZX/VFRU/w4ODv8AAAD/ISEh/4GB + gf+pqan/u7u7/8rKyv/Jycn/w8PD/7S0tP+enp7/goKC/2ZmZv9LS0v/Ojo6/y4uLv8oKCj/Kioq/0ZG + Rv/9/f3/oaGh/0xMTP8lJSX/Hx8f/zExMf9dXV3/dXV1/4+Pj/+mpqbuAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+/v7d/////9LS0v+np6f/W1tb/zg4OP8zMzP/Pz8//1lZ + Wf+SkpL/5OTk/8LCwv+1tbX/qqqq/6Ojo/+hoaH/pKSk/6urq/+1tbX/vr6+/8XFxf/IyMj/l5eX/2Zm + Zv8wMDD/Li4u/2ZmZv+VlZX/ysrK/8fHx/+6urr/srKy/7W1tf+zs7P/tLS0/7e3t//AwMD/zMzM/8zM + zP/MzMz/zMzM/8zMzP/MzMz/zMzM/8vLy//Gxsb/x8fH/8zMzP/MzMz/zMzM/8zMzP/Jycn/v7+//5eX + l/9qamr/Ly8v/wUFBf8CAgL/MDAw/4SEhP+hoaH/q6ur/7q6uv/FxcX/wcHB/7W1tf+fn5//hYWF/2lp + af9NTU3/Ozs7/zAwMP8oKCj/Kioq/1dXV//5+fn/nZ2d/0pKSv8lJSX/ICAg/zQ0NP9fX1//eHh4/5GR + kf+goKDdAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADl5eXF/////9XV + 1f+qqqr/X19f/zo6Ov8zMzP/Pz8//1dXV/+Kior/29vb/8bGxv+2trb/q6ur/6SkpP+hoaH/o6Oj/6mp + qf+zs7P/vLy8/8PDw//BwcH/kZGR/2VlZf8hISH/MjIy/2ZmZv+rq6v/zMzM/7Ozs/+mpqb/lpaW/46O + jv+JiYn/gYGB/4aGhv+NjY3/oaGh/66urv+6urr/yMjI/8zMzP/Kysr/zMzM/8zMzP/MzMz/wMDA/8DA + wP/FxcX/xsbG/7i4uP+mpqb/jo6O/2xsbP9AQED/Ghoa/wICAv8MDAz/Ojo6/35+fv+Xl5f/m5ub/6qq + qv+2trb/t7e3/7CwsP+fn5//hYWF/2tra/9PT0//PT09/zExMf8pKSn/Kysr/2lpaf/y8vL/mJiY/0dH + R/8kJCT/IiIi/zc3N/9iYmL/e3t7/5WVlf+RkZHFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAADPz8+u/v7+/dnZ2f+urq7/ZmZm/z4+Pv80NDT/Pj4+/1VVVf+CgoL/0NDQ/8nJ + yf+3t7f/rKys/6SkpP+hoaH/oqKi/6enp/+wsLD/ubm5/8HBwf+9vb3/kJCQ/2BgYP8ZGRn/PT09/2Zm + Zv+wsLD/ubm5/6Ghof+Pj4//eHh4/2lpaf9mZmb/W1tb/0xMTP9GRkb/QkJC/zk5Of8+Pj7/SkpK/76+ + vv9mZmb/dHR0/4aGhv+Tk5P/mZmZ/5mZmf+bm5v/lJSU/4mJif99fX3/Xl5e/zw8PP8QEBD/AgIC/wAA + AP8WFhb/SkpK/3BwcP+Hh4f/k5OT/5iYmP+np6f/rKys/6Wlpf+bm5v/hYWF/2xsbP9QUFD/Pj4+/zIy + Mv8qKir/MTEx/3t7e//p6en/kZGR/0RERP8kJCT/JCQk/zw8PP9mZmb/f39//5iYmP2CgoKuAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC4uLiX/v7++d3d3f+zs7P/bm5u/0ND + Q/82Njb/Pj4+/1NTU/96enr/wsLC/8bGxv+7u7v/rq6u/6Wlpf+hoaH/oaGh/6Wlpf+tra3/tra2/76+ + vv+8vLz/k5OT/1xcXP81NTX/OTk5/2xsbP+ioqL/tLS0/5KSkv94eHj/ZmZm/1VVVf9CQkL/Nzc3/yYm + Jv8WFhb/Dg4O/wcHB/8AAAD/AgIC/w4ODv8gICD/LS0t/0JCQv9SUlL/XV1d/2ZmZv9mZmb/YmJi/15e + Xv9XV1f/MTEx/wsLC/8AAAD/AAAA/wUFBf8vLy//X19f/2ZmZv91dXX/iIiI/4+Pj/+Xl5f/oKCg/5iY + mP+Pj4//gICA/2pqav9RUVH/Pz8//zIyMv8sLCz/QEBA/4mJif/e3t7/h4eH/0BAQP8lJSX/KCgo/0JC + Qv9qamr/g4OD/5ycnPlzc3OXAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAChoaGA/v7+7uHh4f+5ubn/eHh4/0tLS/85OTn/PT09/1BQUP9xcXH/srKy/8HBwf/AwMD/sLCw/6en + p/+hoaH/oKCg/6Ojo/+qqqr/s7Oz/7u7u/+7u7v/lpaW/11dXf86Ojr/NjY2/2lpaf+YmJj/s7Oz/42N + jf9qamr/VlZW/z4+Pv8pKSn/ERER/wQEBP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wsL + C/8bGxv/Kioq/zIyMv8zMzP/Ozs7/1tbW/82Njb/GRkZ/wICAv8AAAD/AAAA/xISEv82Njb/TExM/2Nj + Y/9nZ2f/eXl5/4WFhf+IiIj/kJCQ/46Ojv+CgoL/d3d3/2ZmZv9OTk7/Pz8//zMzM/8sLCz/U1NT/5OT + k//Pz8//fX19/zs7O/8mJib/Li4u/0lJSf9wcHD/iIiI/5ycnO5kZGSAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKiopp/v7+3eXl5f/BwcH/g4OD/1RUVP89PT3/PT09/01N + Tf9nZ2f/oqKi/7i4uP/AwMD/tLS0/6mpqf+ioqL/oKCg/6Ghof+np6f/r6+v/7i4uP+4uLj/l5eX/2ho + aP86Ojr/NDQ0/19fX/+Tk5P/sbGx/4qKiv9mZmb/R0dH/zAwMP8UFBT/BwcH/wEBAf8AAAD/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wQEBP8XFxf/Tk5O/0dHR/82Njb/ICAg/w4O + Dv8EBAT/AQEB/w8PD/80NDT/Pj4+/1JSUv9lZWX/aGho/3Z2dv9+fn7/gICA/4KCgv93d3f/a2tr/19f + X/9LS0v/PT09/zQ0NP84ODj/Y2Nj/5ubm/+/v7//cXFx/zg4OP8oKCj/NTU1/1JSUv93d3f/jY2N/5qa + mt1VVVVpAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwcHBQ5eXlxefn + 5/rJycn/j4+P/19fX/9DQ0P/Pj4+/0pKSv9cXFz/kZGR/62trf+7u7v/urq6/6ysrP+kpKT/oKCg/6Cg + oP+lpaX/rKys/7S0tP+3t7f/m5ub/3BwcP88PDz/OTk5/1lZWf+IiIj/p6en/46Ojv9mZmb/RERE/yEh + If8NDQ3/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/BgYG/yIi + Iv9kZGT/ZmZm/1paWv9GRkb/MTEx/yYmJv8NDQ3/Dw8P/w4ODv8iIiL/PDw8/0NDQ/9WVlb/Y2Nj/2Zm + Zv90dHT/dXV1/3Nzc/9wcHD/YmJi/1hYWP9HR0f/OTk5/zIyMv9ISEj/b29v/6CgoP+srKz/ZWVl/zQ0 + NP8sLCz/PT09/1paWv9+fn7/kZGR+o6OjsVDQ0NQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABYWFg3z8/Pru3t7fDS0tL/np6e/21tbf9MTEz/QUFB/0hISP9UVFT/f39//6Gh + of+zs7P/urq6/7CwsP+mpqb/oaGh/6CgoP+ioqL/qKio/7CwsP+3t7f/oqKi/3d3d/9NTU3/PT09/1NT + U/9+fn7/oqKi/5KSkv9tbW3/RkZG/yAgIP8DAwP/AAAA/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AP8AAAD/AAAA/wcHB/8WFhb/XFxc/4SEhP+Ojo7/enp6/2ZmZv9TU1P/RkZG/y8vL/8nJyf/EhIS/xUV + Ff8cHBz/Kysr/0FBQf9FRUX/Wlpa/19fX/9jY2P/bGxs/2dnZ/9kZGT/Xl5e/1BQUP9BQUH/Nzc3/zg4 + OP9TU1P/cXFx/6Ojo/+YmJj/WFhY/zIyMv8xMTH/RkZG/2VlZf+FhYX/lZWV8H9/f64zMzM3AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCQkIfuLi4l/Dw8N7a2tr/rq6u/3x8 + fP9WVlb/RUVF/0VFRf9MTEz/bW1t/5eXl/+qqqr/tLS0/7e3t/+qqqr/o6Oj/6CgoP+hoaH/paWl/6ys + rP+0tLT/pqam/4CAgP9WVlb/QkJC/0lJSf9zc3P/l5eX/6Ghof93d3f/UVFR/ykpKf8EBAT/AAAA/wAA + AP8AAAD/AAAA/wAAAP8AAAD/AAAA/wICAv8LCwv/Hh4e/z4+Pv94eHj/mpqa/7Ozs/+bm5v/hoaG/29v + b/9lZWX/TExM/0RERP8xMTH/JCQk/xkZGf8cHBz/Jycn/zMzM/9CQkL/SUlJ/1hYWP9aWlr/Xl5e/2Bg + YP9ZWVn/VFRU/0tLS/88PDz/NTU1/0RERP9ZWVn/dnZ2/6Ojo/+Dg4P/Tk5O/zIyMv85OTn/UVFR/3Bw + cP+MjIz/lZWV3nFxcZchISEfAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAZGRkKoaGhgN7e3sfh4eH4vb29/4yMjP9jY2P/S0tL/0NDQ/9FRUX/XV1d/42Njf+goKD/q6ur/7S0 + tP+wsLD/pqam/6Ghof+goKD/o6Oj/6ioqP+wsLD/qKio/4uLi/9gYGD/RkZG/0JCQv9mZmb/j4+P/6Sk + pP+IiIj/XFxc/zk5Of8TExP/AAAA/wAAAP8AAAD/AAAA/wAAAP8NDQ3/BAQE/xYWFv8yMjL/Wlpa/4iI + iP+np6f/wMDA/729vf+mpqb/kpKS/35+fv9kZGT/X19f/0xMTP8+Pj7/MzMz/yUlJf8jIyP/KSkp/zMz + M/81NTX/Q0ND/0pKSv9UVFT/U1NT/1VVVf9UVFT/SkpK/0RERP84ODj/PDw8/0tLS/9aWlr/eXl5/6Cg + oP9ubm7/RUVF/zY2Nv9DQ0P/XV1d/3x8fP+SkpL4iYmJx2RkZIAAAAAKAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAioqKacvLy6/p6enmzMzM/5+fn/9ycnL/U1NT/0ND + Q/9BQUH/UlJS/39/f/+Wlpb/oaGh/66urv+0tLT/q6ur/6Ojo/+hoaH/oaGh/6Wlpf+srKz/rKys/5OT + k/9sbGz/T09P/0JCQv9XV1f/fX19/6ioqP+ysrL/iYmJ/0dHR/8lJSX/DAwM/w0NDf8DAwP/Dg4O/yIi + Iv87Ozv/R0dH/0JCQv95eXn/np6e/7a2tv/Gxsb/y8vL/8LCwv+2trb/m5ub/4GBgf9ra2v/UFBQ/1RU + VP9KSkr/PT09/zQ0NP8pKSn/Li4u/zExMf82Njb/Ojo6/0JCQv9HR0f/T09P/0pKSv9LS0v/RUVF/z09 + Pf84ODj/QkJC/01NTf9dXV3/enp6/46Ojv9dXV3/Pz8//zw8PP9OTk7/a2tr/4iIiP+UlJTmfX19r1dX + V2kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcHBwULe3 + t5jZ2dnP19fX+LCwsP+Dg4P/X19f/0lJSf9AQED/SEhI/2tra/+Kior/mJiY/6Wlpf+urq7/sbGx/6en + p/+ioqL/oaGh/6Ojo/+oqKj/ra2t/5+fn/97e3v/V1dX/0hISP9JSUn/aGho/5CQkP+4uLj/wMDA/5mZ + mf9xcXH/PT09/x8fH/8tLS3/Q0ND/1dXV/9kZGT/ZmZm/2xsbP+UlJT/vr6+/8vLy//MzMz/zMzM/8jI + yP+xsbH/np6e/3Z2dv9OTk7/TExM/05OTv9MTEz/SkpK/zs7O/80NDT/MjIy/zY2Nv87Ozv/ODg4/z09 + Pf9AQED/Q0ND/0dHR/9BQUH/Pj4+/zk5Of89PT3/RkZG/0tLS/9iYmL/f39//3p6ev9QUFD/Pj4+/0VF + Rf9bW1v/eXl5/5GRkfiKiorPcHBwmEZGRlAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAWFhYN6CgoIHFxcW34uLi5cDAwP+VlZX/bm5u/1JSUv9ERET/QEBA/1VV + Vf9+fn7/jo6O/52dnf+mpqb/rq6u/66urv+kpKT/oaGh/6Kiov+mpqb/qqqq/6SkpP+Li4v/aWlp/0lJ + Sf9ISEj/UVFR/3x8fP+goKD/v7+//8nJyf+5ubn/l5eX/3t7e/9oaGj/ZmZm/2hoaP9ycnL/hYWF/5qa + mv+vr6//xcXF/8rKyv/Gxsb/xsbG/76+vv+mpqb/dnZ2/2VlZf9OTk7/TExM/0VFRf9MTEz/Q0ND/0hI + SP87Ozv/NTU1/zo6Ov85OTn/Pz8//zk5Of9AQED/Pj4+/z09Pf89PT3/Nzc3/zs7O/8+Pj7/RkZG/0xM + TP9oaGj/g4OD/2RkZP9HR0f/QEBA/09PT/9paWn/hoaG/5WVleWAgIC3Y2NjgTMzMzcAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQkJCH4mJiWq0tLSg0tLSzc/P + z/Cnp6f/fn5+/15eXv9JSUn/Pz8//0pKSv9wcHD/g4OD/5OTk/+cnJz/p6en/6ysrP+qqqr/o6Oj/6Ki + ov+kpKT/p6en/6urq/+Wlpb/eHh4/1dXV/9JSUn/TU1N/2JiYv+Hh4f/p6en/8LCwv/IyMj/ycnJ/8DA + wP+srKz/o6Oj/6Wlpf+ysrL/xMTE/8nJyf/Hx8f/wcHB/7i4uP+wsLD/paWl/5aWlv+Ojo7/ZmZm/1JS + Uv9MTEz/RUVF/0lJSf88PDz/RkZG/z8/P/9AQED/Ojo6/zc3N/8+Pj7/Ozs7/0JCQv88PDz/Pj4+/zg4 + OP83Nzf/OTk5/zs7O/8+Pj7/QkJC/1JSUv9ra2v/d3d3/1RUVP9DQ0P/R0dH/1xcXP94eHj/j4+P8IuL + i810dHSgVFRUaiEhIR8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAGRkZCnJyclOgoKCJwcHBtsPDw9m4uLj4kZGR/21tbf9TU1P/RERE/0JCQv9ZWVn/dnZ2/4iI + iP+Tk5P/np6e/6Wlpf+oqKj/qKio/6SkpP+kpKT/pqam/6qqqv+lpaX/hYWF/2lpaf9MTEz/S0tL/1BQ + UP9sbGz/iIiI/6+vr//Dw8P/x8fH/8jIyP/Jycn/ycnJ/8jIyP/Hx8f/ysrK/8TExP+wsLD/nZ2d/5KS + kv+QkJD/gYGB/319ff9ycnL/Wlpa/0VFRf9JSUn/S0tL/0ZGRv9DQ0P/Ozs7/z8/P/88PDz/PDw8/0FB + Qf89PT3/RERE/z09Pf9BQUH/OTk5/zo6Ov85OTn/Ojo6/zo6Ov86Ojr/Q0ND/1paWv92dnb/ZGRk/0tL + S/9FRUX/UlJS/2pqav+FhYX4iIiI2YGBgbZoaGiJR0dHUwAAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFhYWDeIiIhyr6+vn7a2tsLHx8flpKSk/39/ + f/9hYWH/TU1N/0FBQf9KSkr/aWlp/3t7e/+JiYn/lZWV/5ycnP+hoaH/pqam/6mpqf+mpqb/pqam/6io + qP+qqqr/m5ub/3p6ev9cXFz/R0dH/0dHR/9SUlL/b29v/5GRkf+tra3/wsLC/8XFxf/Gxsb/x8fH/8jI + yP/Jycn/v7+//62trf+cnJz/iIiI/3l5ef9qamr/a2tr/2ZmZv9UVFT/T09P/05OTv9ISEj/V1dX/1hY + WP9JSUn/Pz8//zo6Ov84ODj/Ozs7/zg4OP9BQUH/QEBA/0VFRf87Ozv/Pz8//zo6Ov89PT3/Ozs7/zo6 + Ov82Njb/SEhI/19fX/9ycnL/VFRU/0hISP9LS0v/X19f/3l5ef+MjIzlgYGBwnV1dZ9ZWVlyODg4NwAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEJC + Qh9wcHBbnZ2diKioqKq/v7/Ntra28JOTk/9xcXH/Wlpa/0lJSf9GRkb/U1NT/29vb/98fHz/i4uL/5SU + lP+Xl5f/np6e/6SkpP+srKz/qKio/6ioqP+qqqr/pqam/5CQkP9ubm7/UVFR/z4+Pv9AQED/VlZW/3Fx + cf+Ojo7/rKys/7y8vP/Dw8P/w8PD/7a2tv+5ubn/q6ur/5qamv+JiYn/dnZ2/1lZWf9QUFD/U1NT/1FR + Uf9FRUX/S0tL/1paWv9hYWH/ZGRk/1xcXP9PT0//RERE/zk5Of85OTn/Nzc3/zg4OP83Nzf/RUVF/0BA + QP9CQkL/Pj4+/0JCQv89PT3/Ojo6/zMzM/86Ojr/VFRU/25ubv9hYWH/TExM/0pKSv9WVlb/bm5u/4WF + hfCGhobNdnZ2qmlpaYhJSUlbISEhHwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQpbW1tDiYmJcZeXl5O0tLS2sLCw2aSkpPiEhIT/aWlp/1dX + V/9KSkr/RkZG/2NjY/9wcHD/f39//4qKiv+Pj4//lZWV/5ubm/+kpKT/q6ur/6urq/+pqan/qqqq/6Oj + o/+Hh4f/aGho/0tLS/80NDT/Pj4+/0hISP9nZ2f/fX19/6Kiov+ysrL/rKys/6Ghof+UlJT/kZGR/4OD + g/9zc3P/XFxc/05OTv9ERET/RERE/0hISP9JSUn/YGBg/2lpaf9ubm7/b29v/2FhYf9ZWVn/SEhI/0ND + Q/83Nzf/NjY2/zQ0NP85OTn/OTk5/0NDQ/9ERET/RERE/0BAQP89PT3/Ly8v/zIyMv9HR0f/Wlpa/21t + bf9VVVX/TExM/1JSUv9kZGT/fHx8+IGBgdl/f3+2bGxsk1xcXHE5OTlDAAAACgAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA+Pj4lcXFxWoaG + hnynp6efqKiowrm5ueWYmJj/e3t7/2VlZf9VVVX/SUlJ/0xMTP9mZmb/c3Nz/39/f/+Ghob/jY2N/5SU + lP+cnJz/o6Oj/6ioqP+tra3/q6ur/6qqqv+hoaH/hYWF/2dnZ/9MTEz/Ly8v/xgYGP8ZGRn/QUFB/15e + Xv9tbW3/dXV1/3h4eP9vb2//ampq/3t7e/9fX1//Tk5O/0JCQv84ODj/Pz8//0pKSv9UVFT/a2tr/3t7 + e/97e3v/eXl5/2RkZP9cXFz/VFRU/0hISP9AQED/NTU1/zk5Of80NDT/Ojo6/z09Pf9ERET/QUFB/0FB + Qf8uLi7/KSkp/zs7O/9OTk7/cXFx/19fX/9RUVH/UFBQ/15eXv90dHT/hoaG5Xt7e8J1dXWfX19ffExM + TFopKSklAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAZGRkKWVlZQnJycmWYmJiIn5+fqrOzs82rq6vwjY2N/3R0dP9iYmL/U1NT/01N + Tf9ZWVn/ampq/3Jycv97e3v/hYWF/42Njf+Wlpb/mpqa/6CgoP+np6f/rKys/6ysrP+qqqr/o6Oj/4uL + i/9sbGz/UFBQ/zc3N/8dHR3/CwsL/wUFBf8LCwv/HBwc/y4uLv9BQUH/V1dX/2BgYP9jY2P/UlJS/zg4 + OP8zMzP/RkZG/1JSUv9dXV3/f39//4+Pj/+Dg4P/enp6/3Jycv9fX1//XFxc/1BQUP9JSUn/Pz8//zg4 + OP83Nzf/MzMz/zk5Of87Ozv/Ojo6/ysrK/8gICD/MDAw/0dHR/9eXl7/a2tr/1dXV/9TU1P/W1tb/21t + bf9/f3/wgYGBzXNzc6pra2uIUVFRZTo6OkIAAAAKAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQEBAJFtbW06FhYVxkJCQk6ys + rLampqbZn5+f8IWFhf9ycnL/Y2Nj/1RUVP9MTEz/YmJi/2lpaf9vb2//eXl5/4SEhP+Pj4//k5OT/5eX + l/+enp7/paWl/6enp/+srKz/ra2t/6qqqv+cnJz/fHx8/1xcXP9AQED/KSkp/xQUFP8ICAj/DQ0N/xER + Ef8TExP/Hh4e/y0tLf86Ojr/QEBA/0lJSf9RUVH/Wlpa/2dnZ/9wcHD/jIyM/46Ojv+Li4v/fHx8/3R0 + dP9paWn/W1tb/1xcXP9PT0//S0tL/0BAQP84ODj/NTU1/zAwMP8xMTH/JSUl/xoaGv8oKCj/Pj4+/1VV + Vf9wcHD/YGBg/1hYWP9cXFz/aWlp/3p6evB9fX3ZfHx8tmxsbJNcXFxxQUFBTioqKiQAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAICAgCEJCQjZxcXFaf39/fKKiop+hoaHCnZ2d2ZiYmPCDg4P/c3Nz/2FhYf9SUlL/UVFR/2Rk + ZP9nZ2f/b29v/3l5ef+FhYX/ioqK/4+Pj/+Wlpb/nJyc/56env+lpaX/p6en/66urv+vr6//rq6u/6am + pv+Pj4//W1tb/05OTv9DQ0P/Ojo6/zw8PP9AQED/Pz8//0BAQP9ZWVn/bm5u/3Fxcf9ubm7/cHBw/319 + ff+JiYn/kJCQ/42Njf+Ojo7/hISE/3p6ev92dnb/Z2dn/1tbW/9YWFj/TU1N/0hISP8/Pz//Nzc3/y8v + L/8eHh7/FRUV/yMjI/84ODj/T09P/3Jycv9nZ2f/X19f/2BgYP9paWn/dnZ28Hh4eNl6enrCdXV1n19f + X3xPT09aLy8vNgAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC0tLRFZWVlCb29vZZSUlIiZmZmqmpqawpWV + ldmUlJTwgoKC/3Fxcf9fX1//VVVV/1VVVf9jY2P/aGho/3BwcP97e3v/gICA/4aGhv+Ojo7/lZWV/5eX + l/+cnJz/n5+f/6enp/+qqqr/q6ur/6+vr/+xsbH/sLCw/6ysrP+mpqb/nJyc/42Njf9/f3//dHR0/2tr + a/99fX3/jY2N/5qamv+fn5//k5OT/46Ojv+Pj4//jY2N/4+Pj/+Pj4//j4+P/4KCgv95eXn/c3Nz/2Nj + Y/9ZWVn/U1NT/0lJSf9DQ0P/MDAw/xwcHP8VFRX/Jycn/zs7O/9RUVH/b29v/2pqav9jY2P/ZGRk/2tr + a/91dXXwdHR02XZ2dsJzc3Oqa2triFFRUWU+Pj5CDw8PEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AABAQEAkW1tbToWFhXGQkJCTlJSUqpOTk8KQkJDZkpKS8IGBgf9xcXH/YGBg/1ZWVv9WVlb/ZmZm/2pq + av9ycnL/d3d3/3x8fP+FhYX/jY2N/4+Pj/+VlZX/l5eX/56env+goKD/o6Oj/6mpqf+srKz/rKys/66u + rv+wsLD/tbW1/7e3t/+4uLj/ubm5/7q6uv+6urr/urq6/7Kysv+mpqb/nJyc/5OTk/+Ojo7/kpKS/5GR + kf+Ojo7/ioqK/4iIiP97e3v/cXFx/2lpaf9cXFz/VVVV/0lJSf82Njb/ISEh/xkZGf8sLCz/QkJC/1ZW + Vv9vb2//bGxs/2VlZf9nZ2f/bm5u/3h4ePB0dHTZcnJywnJycqpsbGyTX19fcUFBQU4qKiokAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgICAIQkJCNnFxcVp/f398i4uLk42NjaqPj4/Cj4+P2ZCQ + kOyAgID4cnJy/2JiYv9YWFj/W1tb/2pqav9vb2//cHBw/3Nzc/97e3v/g4OD/4aGhv+NjY3/j4+P/5aW + lv+YmJj/mpqa/5+fn/+jo6P/o6Oj/6ampv+pqan/rq6u/7Kysv+0tLT/tbW1/7a2tv+2trb/tra2/7S0 + tP+qqqr/n5+f/5OTk/+NjY3/i4uL/46Ojv+Pj4//iIiI/4CAgP98fHz/dHR0/2lpaf9fX1//UFBQ/zk5 + Of8nJyf/ISEh/zY2Nv9HR0f/XV1d/3Jycv9ubm7/Z2dn/2lpaf9vb2/4eHh47HV1ddlycnLCb29vqmpq + apNhYWF8T09PWi8vLzYAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALS0tEVlZ + WUJvb29lfX19fIeHh5OLi4uqjIyMwo6OjtR6enrggoKC8HV1df9nZ2f/Xl5e/1xcXP9vb2//bm5u/25u + bv90dHT/e3t7/35+fv+EhIT/hoaG/42Njf+Pj4//kpKS/5eXl/+ampr/m5ub/56env+hoaH/pKSk/6en + p/+qqqr/q6ur/6ysrP+srKz/rKys/6qqqv+jo6P/mpqa/5KSkv+MjIz/iIiI/4iIiP+JiYn/h4eH/39/ + f/96enr/c3Nz/2VlZf9RUVH/PT09/ywsLP8vLy//QEBA/1JSUv9oaGj/eXl5/3Jycv9sbGz/bGxs/3Bw + cPBpaWngdHR01HNzc8Jvb2+qampqk2FhYXxTU1NlPj4+Qg8PDxEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAQCRbW1tObW1tZXt7e3yGhoaTioqKqoyMjL13d3fJe3t72YWF + hfB6enr/bW1t/2RkZP9gYGD/bW1t/29vb/9ycnL/dnZ2/3h4eP99fX3/fn5+/4WFhf+Ghob/iYmJ/42N + jf+RkZH/kpKS/5WVlf+YmJj/mpqa/5ycnP+enp7/n5+f/6CgoP+goKD/oKCg/6Ghof+bm5v/kpKS/4mJ + if+IiIj/hoaG/4ODg/+CgoL/gICA/3t7e/9ycnL/YGBg/0tLS/89PT3/NTU1/z09Pf9NTU3/YGBg/3Bw + cP99fX3/dnZ2/3Fxcf9ycnL/dHR08GhoaNllZWXJdXV1vXJycqpsbGyTYWFhfFNTU2VFRUVOKioqJAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAgIAhCQkI2W1tbTm1t + bWV7e3t8hoaGk4qKiqZ1dXWyd3d3wn19fdmKiorsf39/+Hd3d/9vb2//ZWVl/2lpaf92dnb/eHh4/3d3 + d/97e3v/enp6/39/f/9/f3//gYGB/4WFhf+IiIj/iYmJ/4yMjP+Ojo7/kJCQ/5GRkf+Tk5P/lJSU/5WV + lf+VlZX/lZWV/5WVlf+VlZX/jo6O/4WFhf+BgYH/f39//319ff94eHj/cHBw/2RkZP9YWFj/TExM/0RE + RP9ERET/TExM/1tbW/9ycnL/enp6/4CAgP98fHz/d3d3/3d3d/h4eHjsbW1t2WZmZsJkZGSyc3Nzpm1t + bZNjY2N8U1NTZUVFRU4vLy82AAAACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAtLS0RQkJCNltbW05tbW1le3t7fIaGho9zc3ObdnZ2qnp6esKDg4PUeHh44IeH + h+1/f3/4c3Nz/2xsbP9tbW3/eXl5/3x8fP9+fn7/e3t7/39/f/9+fn7/fX19/4CAgP+BgYH/gYGB/4SE + hP+FhYX/hoaG/4eHh/+JiYn/ioqK/4uLi/+Li4v/i4uL/4uLi/+MjIz/ioqK/4ODg/96enr/dHR0/29v + b/9qamr/YGBg/1hYWP9VVVX/UlJS/1RUVP9dXV3/cnJy/3x8fP+EhIT/gICA/319ff99fX34fHx87W1t + beBycnLUampqwmRkZKpkZGSbbm5uj2dnZ3xYWFhlRUVFTjQ0NDYeHh4RAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALS0tEUJCQjZbW1tObW1tZXt7 + e3hubm6EdHR0k3l5eaqAgIC9cnJyyX5+ftV3d3fghISE7Xl5efh1dXX/dHR0/3V1df+CgoL/gYGB/4OD + g/+AgID/f39//4CAgP+AgID/fn5+/39/f/9/f3//gICA/4GBgf+Dg4P/g4OD/4SEhP+EhIT/hISE/4WF + hf+FhYX/hoaG/4ODg/97e3v/c3Nz/2xsbP9nZ2f/ZGRk/2JiYv9iYmL/ZmZm/3t7e/+FhYX/h4eH/4eH + h/+Dg4P/f39/+ICAgO1vb2/gcnJy1WdnZ8lvb2+9aWlpqmNjY5NgYGCEZmZmeFtbW2VISEhONDQ0Nh4e + HhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAC0tLRFCQkI2W1tbTm1tbWBkZGRtb29vfHh4eJN/f3+mcHBwsnd3d75ubm7JfHx81XR0 + dOCFhYXtf39/+H19ff99fX3/e3t7/4mJif+JiYn/hYWF/4SEhP+Dg4P/f39//4CAgP+AgID/gYGB/4KC + gv+Dg4P/hISE/4WFhf+FhYX/hYWF/4WFhf+Ghob/hoaG/4SEhP+AgID/e3t7/3d3d/93d3f/dXV1/3p6 + ev+Ghob/jo6O/42Njf+Ojo7/ioqK/4WFhfiFhYXtcXFx4HR0dNVlZWXJbW1tvmRkZLJtbW2maGhok19f + X3xWVlZtWlpaYEtLS040NDQ2Hh4eEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAtLS0RQkJCNltbW0lUVFRVZWVlZXFx + cXx9fX2Pbm5um3V1dadoaGiydXV1vm1tbcl/f3/VeHh44IyMjO2Hh4f0gYGB+oKCgv+BgYH/g4OD/4uL + i/+Li4v/hoaG/4WFhf+EhIT/hISE/4WFhf+Hh4f/h4eH/4iIiP+IiIj/iIiI/4mJif+JiYn/ioqK/4qK + iv+IiIj/iIiI/4iIiP+Ojo7/kJCQ/4yMjP+RkZH/kpKS/46OjvqNjY30jY2N7Xd3d+B5eXnVZ2dnyW1t + bb5hYWGya2trp2RkZJtra2uPY2NjfFZWVmVISEhVSUlJSTk5OTYeHh4RAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAALS0tEUJCQjJCQkI+VVVVTmdnZ2V3d3d4bGxshHV1dZBoaGibcnJyp2dnZ7J3d3e+cXFxyYWF + hdWAgIDdenp644uLi+2FhYX0hISE+oSEhP2EhIT/g4OD/4iIiP+Kior/jo6O/5CQkP+SkpL/kpKS/5OT + k/+Tk5P/k5OT/5SUlP+UlJT/lZWV/5SUlP+RkZH/j4+P/4yMjP+Ojo7/j4+P/Y+Pj/qRkZH0k5OT7Xx8 + fON/f3/dgICA1WxsbMlvb2++YWFhsmtra6dhYWGbampqkGBgYIRmZmZ4WFhYZUhISE46Ojo+ODg4Mh4e + HhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAgIAgoKCggQkJCNlhYWE5qampgZGRkbXBw + cHlmZmaEcXFxkGRkZJtycnKna2trsnt7e754eHjGcnJyzIWFhdV/f3/denp643V1deZwcHDnhYWF7YWF + hfSGhob6hYWF/YiIiP+Kior/i4uL/4yMjP+NjY3/jY2N/42Njf+Pj4//j4+P/42Njf2Pj4/6jo6O9I6O + ju13d3fne3t75n9/f+OCgoLdhYWF1XBwcMx0dHTGd3d3vmZmZrJsbGynX19fm2pqapBfX1+EZ2dneVtb + W21dXV1gS0tLTjk5OTYgICAgICAgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAALS0tEUJCQjZbW1tJVFRUVWhoaGJgYGBtbW1teWRkZIRxcXGQaGhom3d3d6dycnKvampqtH5+ + fr54eHjGc3NzzG5ubs9paWnQfHx81Xt7e916enrjdXV15nNzc+d0dHTndXV153Z2dud2dnbndnZ253Z2 + dud3d3fnd3d353h4eOZ8fHzjf39/3X9/f9VqamrQb29vz3Nzc8x4eHjGfX19vmlpabRvb2+vdHR0p2Nj + Y5tqamqQXV1dhGdnZ3lZWVltXl5eYk5OTlVNTU1JOTk5Nh4eHhEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC0tLRFCQkIyQkJCPlZWVkpUVFRVZWVlYl1d + XW1tbW15ZmZmhHV1dZBwcHCYZmZmnXh4eKdycnKvampqtGZmZrhgYGC5c3NzvnFxccZvb2/MbGxsz2pq + atBqamrQampq0GpqatBqamrQampq0GpqatBqamrQbGxs0GxsbM9vb2/McXFxxnNzc75gYGC5ZmZmuGpq + arRycnKvd3d3p2VlZZ1ra2uYcXFxkGJiYoRpaWl5WVlZbV5eXmJOTk5VT09PSj4+Pj44ODgyHh4eEQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAgICAIKCgoIEFBQTNCQkI+VlZWSlRUVFVlZWViYmJibXR0dHlubm6AZWVlhnV1dZBvb2+YZmZmnWJi + YqFbW1uibGxsp2lpaa9mZma0ZWVluGRkZLlkZGS5ZGRkuWRkZLlkZGS5ZGRkuWRkZLlkZGS5ZGRkuWVl + ZbhmZma0aWlpr2xsbKdbW1uiYmJioWZmZp1vb2+YdXV1kGNjY4ZsbGyAbW1teV1dXW1gYGBiTk5OVU9P + T0o+Pj4+PDw8MygoKCAgICAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQooKCggQUFBM0JCQj5WVlZKVFRUVWho + aGJmZmZpYGBgb3R0dHlubm6AZWVlhl9fX4lYWFiLaGhokGNjY5hhYWGdYWFhoWFhYaJhYWGiYWFhomFh + YaJhYWGiYWFhomFhYaJhYWGiYWFhomFhYaFhYWGdY2NjmGhoaJBYWFiLX19fiWVlZYZubm6AcnJyeWBg + YG9jY2NpZWVlYlFRUVVTU1NKPj4+Pjw8PDMoKCggGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAGRkZCigoKCBBQUEzQkJCPlpaWkpXV1dSVFRUWGhoaGJmZmZpYGBgb1xcXHJWVlZzZWVleWRk + ZIBfX1+GXV1diV9fX4tfX1+LX19fi19fX4tfX1+LX19fi19fX4tfX1+LX19fi11dXYlfX1+GZGRkgGVl + ZXlWVlZzXFxccmBgYG9mZmZpaGhoYlRUVFhUVFRSVlZWSj4+Pj48PDwzKCgoIBkZGQoAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZGRkKKCgoIEFBQTNBQUE7REREQFpa + WkpXV1dSVFRUWFFRUVtOTk5cYGBgYl9fX2leXl5vXl5ecl1dXXNdXV1zXV1dc11dXXNdXV1zXV1dc11d + XXNdXV1zXV1dc15eXnJeXl5vX19faWBgYGJOTk5cUVFRW1RUVFhXV1dSWlpaSkREREBBQUE7QUFBMygo + KCAZGRkKAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAABkZGQopKSkZKSkpJUFBQTNBQUE7REREQENDQ0Q/Pz9FU1NTSlRUVFJRUVFYUVFRW1NT + U1xTU1NcU1NTXFNTU1xTU1NcU1NTXFNTU1xTU1NcU1NTXFFRUVtRUVFYVFRUUlNTU0o/Pz9FQ0NDRERE + REBBQUE7QUFBMykpKSUpKSkZGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGQopKSkZKSkpJSkp + KSwsLCwuQUFBM0FBQTtERERAQ0NDRENDQ0VDQ0NFQ0NDRUNDQ0VDQ0NFQ0NDRUNDQ0VDQ0NFQ0NDRUND + Q0RERERAQUFBO0FBQTMsLCwuKSkpLCkpKSUpKSkZGRkZCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGRkZCikpKRkpKSklKSkpLCwsLC4sLCwuLCwsLiws + LC4sLCwuLCwsLiwsLC4sLCwuLCwsLikpKSwpKSklKSkpGRkZGQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////////////////////////////////////////// + /////////////////////////////////////////////////////////////////////////4AA//// + ////////8AAAB///////////gAAAAP/////////+AAAAAD/////////4AAAAAA/////////gAAAAAAP/ + //////+AAAAAAAD///////8AAAAAAAB///////4AAAAAAAA///////gAAAAAAAAP//////AAAAAAAAAH + /////+AAAAAAAAAD/////8AAAAAAAAAB/////4AAAAAAAAAA/////wAAAAAAAAAAf////gAAAAAAAAAA + P////AAAAAAAAAAAH////AAAAAAAAAAAH///+AAAAAAAAAAAD///8AAAAAAAAAAAB///8AAAAAAAAAAA + B///4AAAAAAAAAAAA///wAAAAAAAAAAAAf//wAAAAAAAAAAAAf//gAAAAAAAAAAAAP//gAAAAAAAAAAA + AP//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH/+AAAAAAAAAAAAAD/+AAAAAAAAAAAA + AD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAA + AB/8AAAAAAAAAAAAAB/8AAAAAAAAAAAAAB/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAA + AD/+AAAAAAAAAAAAAD/+AAAAAAAAAAAAAD//AAAAAAAAAAAAAH//AAAAAAAAAAAAAH//AAAAAAAAAAAA + AH//gAAAAAAAAAAAAP//gAAAAAAAAAAAAP//wAAAAAAAAAAAAf//wAAAAAAAAAAAAf//4AAAAAAAAAAA + A///8AAAAAAAAAAAB///8AAAAAAAAAAAB///+AAAAAAAAAAAD////AAAAAAAAAAAH////AAAAAAAAAAA + H////gAAAAAAAAAAP////wAAAAAAAAAAf////4AAAAAAAAAA/////8AAAAAAAAAB/////+AAAAAAAAAD + //////AAAAAAAAAH//////gAAAAAAAAP//////4AAAAAAAA///////8AAAAAAAB///////+AAAAAAAD/ + ///////gAAAAAAP////////4AAAAAA/////////+AAAAAD//////////gAAAAP//////////8AAAB/// + /////////4AA//////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////8= +</value> + </data> +</root>
\ No newline at end of file diff --git a/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.vb b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.vb new file mode 100644 index 0000000..44feaa5 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/Main_Launcher.vb @@ -0,0 +1,123 @@ +Imports System.IO + + +Public Class Main_Launcher + + Public FirstBoot As Boolean = False + Public Stable As Boolean = True + Dim loaddata(100) As String + Dim lateststable As String + Dim latestunstable As String + Dim doneversionsetup As Boolean = False + Dim currentlydownloading As Boolean = False + Dim currentversion As String = "0.0.8 RC2" + Dim exepath As String = "C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\ShiftOS 0.0.8 RC2" + + Private Sub Main_Launcher_Load(sender As Object, e As EventArgs) Handles MyBase.Load + If Directory.Exists("C:\ShiftOS\SoftwareData\Launcher") Then Else Directory.CreateDirectory("C:\ShiftOS\SoftwareData\Launcher") + + If File.Exists("C:\ShiftOS\SoftwareData\Launcher\Log.txt") Then File.Delete("C:\ShiftOS\SoftwareData\Launcher\Log.txt") + File.Create("C:\ShiftOS\SoftwareData\Launcher\Log.txt") + + If Directory.Exists("C:\ShiftOS\SoftwareData\Launcher\UserPreferences") Then Else FirstBoot = True + If FirstBoot = True Then Directory.CreateDirectory("C:\ShiftOS\SoftwareData\Launcher\UserPreferences") + + If FirstBoot = True Then + FirstBootSetup.Show() + Me.Text = "ShiftOS Launcher [Setting Up]" + Else + UpdateOptions() + End If + End Sub + + Public Sub UpdateOptions() + If Me.Text = "ShiftOS Launcher [Setting Up]" Then Me.Text = "ShiftOS Launcher [Downloading]" + + Dim fileContents As String + fileContents = My.Computer.FileSystem.ReadAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\Nickname.dat") + + Label1.Text = ("Greetings, " + fileContents) + + Dim fileContents1 As String + fileContents1 = My.Computer.FileSystem.ReadAllText("C:\ShiftOS\SoftwareData\Launcher\UserPreferences\BuildOption.dat") + + If currentlydownloading = True Then + If fileContents1 = "Stable" Then + Me.Text = "ShiftOS Launcher [Downloading: Stable]" + Label2.Text = "Status: Downloading [Stable]" + Stable = True + End If + If fileContents1 = "Unstable" Then + Me.Text = "ShiftOS Launcher [Downloading: Unstable]" + Label2.Text = "Status: Downloading [Unstable]" + Stable = False + End If + Else + If fileContents1 = "Stable" Then + Me.Text = "ShiftOS Launcher" + Label2.Text = "Status: Ready to play ShiftOS " & currentversion + Stable = True + End If + If fileContents1 = "Unstable" Then + Me.Text = "ShiftOS Launcher" + Label2.Text = "Status: Ready to play ShiftOS " & currentversion + Stable = False + End If + End If + End Sub + + Private Sub readversiondata() + Dim sr As New StreamReader("C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\versiondata.dat", True) + If File.Exists("C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\versiondata.dat") Then + For i As Integer = 0 To 4 Step 1 + loaddata(i) = sr.ReadLine + If i = 4 Then + sr.Close() + Exit For + End If + Next + lateststable = loaddata(3) + latestunstable = loaddata(4) + doneversionsetup = True + DownloadLatestVersion(Stable) + Else : MessageBox.Show("Unable to read version data. This error has occured because you are either not connected to a network with internet access or our servers are down. We apologize for any inconvenience.", "Can't read version information") + End If + End Sub + + Private Sub DownloadLatestVersion(ByVal BuildOption As Boolean) + If My.Computer.Network.IsAvailable Then + If File.Exists("C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\versiondata.dat") Then File.Delete("C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\versiondata.dat") + My.Computer.Network.DownloadFile("http://shiftos.bitbucket.org/downloads/versiondata.dat", "C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\versiondata.dat") + readversiondata() + If doneversionsetup = True Then + If BuildOption = True Then + My.Computer.Network.DownloadFile("http://shiftos.bitbucket.org/downloads/ShiftOS" & lateststable & ".exe", "C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\ShiftOS" & lateststable & ".exe") + exepath = "C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\ShiftOS" & lateststable & ".exe" + launchshiftos() + ' Detect when finished, do fancy progress bar stuff and run + Else + My.Computer.Network.DownloadFile("http://shiftos.bitbucket.org/downloads/ShiftOS" & latestunstable & ".exe", "C:\ShiftOS\SoftwareData\Launcher\ShiftOSVersion\ShiftOS" & latestunstable & ".exe") + End If + End If + Else 'Offlinemode() + End If ' No idea how to do this, we need a dedicated server + ' This also needs to check if they have the latest unstable / stable + ' But it cant do that here, it has to do it at the end of updateoptions + ' Where the little green text is on updateoptions is where it needs + ' to check, if you read the code - it should be obvious what does + ' what, once this is done, i will add backups to this and an + ' offline mode option + End Sub + + Private Sub launchshiftos() + Process.Start("F:\william\Documents\Visual Studio\ShiftOS 0.0.8 RCs\ShiftOS 0.0.8 RC2.exe") ' For some reason ShiftOS dosen't auto-extract it's dll when started like this, therefore producing an error. + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + If Button1.Text = "Play" Then + launchshiftos() + ElseIf Button1.Text = "Download" Then + DownloadLatestVersion(Stable) + End If + End Sub +End Class diff --git a/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.Designer.vb b/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.Designer.vb new file mode 100644 index 0000000..0c50e20 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' <auto-generated> +' This code was generated by a tool. +' Runtime Version:4.0.30319.34209 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' </auto-generated> +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + 'NOTE: This file is auto-generated; do not modify it directly. To make changes, + ' or if you encounter build errors in this file, go to the Project Designer + ' (go to Project Properties or double-click the My Project node in + ' Solution Explorer), and make changes on the Application tab. + ' + Partial Friend Class MyApplication + + <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + Me.IsSingleInstance = false + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses + End Sub + + <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.ShiftOS_Launcher.Main_Launcher + End Sub + End Class +End Namespace diff --git a/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.myapp b/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.myapp new file mode 100644 index 0000000..4f0ca28 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Application.myapp @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="utf-16"?> +<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"> + <MySubMain>true</MySubMain> + <MainForm>Main_Launcher</MainForm> + <SingleInstance>false</SingleInstance> + <ShutdownMode>0</ShutdownMode> + <EnableVisualStyles>true</EnableVisualStyles> + <AuthenticationMode>0</AuthenticationMode> + <SaveMySettingsOnExit>true</SaveMySettingsOnExit> +</MyApplicationData>
\ No newline at end of file diff --git a/ShiftOS Launcher/ShiftOS Launcher/My Project/AssemblyInfo.vb b/ShiftOS Launcher/ShiftOS Launcher/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..d9411ba --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/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 + +<Assembly: AssemblyTitle("ShiftOS Launcher")> +<Assembly: AssemblyDescription("")> +<Assembly: AssemblyCompany("")> +<Assembly: AssemblyProduct("ShiftOS Launcher")> +<Assembly: AssemblyCopyright("Copyright © 2015")> +<Assembly: AssemblyTrademark("")> + +<Assembly: ComVisible(False)> + +'The following GUID is for the ID of the typelib if this project is exposed to COM +<Assembly: Guid("f9605e2f-85d0-46f6-b316-81a3ec9cbbb0")> + +' 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 Launcher/ShiftOS Launcher/My Project/Resources.Designer.vb b/ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.Designer.vb new file mode 100644 index 0000000..cf4a7d9 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.Designer.vb @@ -0,0 +1,62 @@ +'------------------------------------------------------------------------------ +' <auto-generated> +' This code was generated by a tool. +' Runtime Version:4.0.30319.34209 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' </auto-generated> +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My.Resources + + 'This class was auto-generated by the StronglyTypedResourceBuilder + 'class via a tool like ResGen or Visual Studio. + 'To add or remove a member, edit your .ResX file then rerun ResGen + 'with the /str option, or rebuild your VS project. + '''<summary> + ''' A strongly-typed resource class, for looking up localized strings, etc. + '''</summary> + <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _ + Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ + Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ + Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + '''<summary> + ''' Returns the cached ResourceManager instance used by this class. + '''</summary> + <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("ShiftOS_Launcher.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + '''<summary> + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + '''</summary> + <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set(ByVal value As Global.System.Globalization.CultureInfo) + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.resx b/ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.resx new file mode 100644 index 0000000..af7dbeb --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Resources.resx @@ -0,0 +1,117 @@ +<?xml version="1.0" encoding="utf-8"?> +<root> + <!-- + Microsoft ResX Schema + + Version 2.0 + + The primary goals of this format is to allow a simple XML format + that is mostly human readable. The generation and parsing of the + various data types are done through the TypeConverter classes + associated with the data types. + + Example: + + ... ado.net/XML headers & schema ... + <resheader name="resmimetype">text/microsoft-resx</resheader> + <resheader name="version">2.0</resheader> + <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader> + <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader> + <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data> + <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data> + <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64"> + <value>[base64 mime encoded serialized .NET Framework object]</value> + </data> + <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value> + <comment>This is a comment</comment> + </data> + + There are any number of "resheader" rows that contain simple + name/value pairs. + + Each data row contains a name, and value. The row also contains a + type or mimetype. Type corresponds to a .NET class that support + text/value conversion through the TypeConverter architecture. + Classes that don't support this are serialized and stored with the + mimetype set. + + The mimetype is used for serialized objects, and tells the + ResXResourceReader how to depersist the object. This is currently not + extensible. For a given mimetype the value must be set accordingly: + + Note - application/x-microsoft.net.object.binary.base64 is the format + that the ResXResourceWriter will generate, however the reader can + read any of the formats listed below. + + mimetype: application/x-microsoft.net.object.binary.base64 + value : The object must be serialized with + : System.Serialization.Formatters.Binary.BinaryFormatter + : and then encoded with base64 encoding. + + mimetype: application/x-microsoft.net.object.soap.base64 + value : The object must be serialized with + : System.Runtime.Serialization.Formatters.Soap.SoapFormatter + : and then encoded with base64 encoding. + + mimetype: application/x-microsoft.net.object.bytearray.base64 + value : The object must be serialized into a byte array + : using a System.ComponentModel.TypeConverter + : and then encoded with base64 encoding. + --> + <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata"> + <xsd:element name="root" msdata:IsDataSet="true"> + <xsd:complexType> + <xsd:choice maxOccurs="unbounded"> + <xsd:element name="metadata"> + <xsd:complexType> + <xsd:sequence> + <xsd:element name="value" type="xsd:string" minOccurs="0" /> + </xsd:sequence> + <xsd:attribute name="name" type="xsd:string" /> + <xsd:attribute name="type" type="xsd:string" /> + <xsd:attribute name="mimetype" type="xsd:string" /> + </xsd:complexType> + </xsd:element> + <xsd:element name="assembly"> + <xsd:complexType> + <xsd:attribute name="alias" type="xsd:string" /> + <xsd:attribute name="name" type="xsd:string" /> + </xsd:complexType> + </xsd:element> + <xsd:element name="data"> + <xsd:complexType> + <xsd:sequence> + <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" /> + <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" /> + </xsd:sequence> + <xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" /> + <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" /> + <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" /> + </xsd:complexType> + </xsd:element> + <xsd:element name="resheader"> + <xsd:complexType> + <xsd:sequence> + <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" /> + </xsd:sequence> + <xsd:attribute name="name" type="xsd:string" use="required" /> + </xsd:complexType> + </xsd:element> + </xsd:choice> + </xsd:complexType> + </xsd:element> + </xsd:schema> + <resheader name="resmimetype"> + <value>text/microsoft-resx</value> + </resheader> + <resheader name="version"> + <value>2.0</value> + </resheader> + <resheader name="reader"> + <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> + <resheader name="writer"> + <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </resheader> +</root>
\ No newline at end of file diff --git a/My Project/Settings.Designer.vb b/ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.Designer.vb index 696276e..68a629e 100644 --- a/My Project/Settings.Designer.vb +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. -' Runtime Version:4.0.30319.17929 +' Runtime Version:4.0.30319.34209 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. @@ -64,9 +64,9 @@ Namespace My Friend Module MySettingsProperty <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _ - Friend ReadOnly Property Settings() As Global.ShiftOS.My.MySettings + Friend ReadOnly Property Settings() As Global.ShiftOS_Launcher.My.MySettings Get - Return Global.ShiftOS.My.MySettings.Default + Return Global.ShiftOS_Launcher.My.MySettings.Default End Get End Property End Module diff --git a/My Project/Settings.settings b/ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.settings index 85b890b..85b890b 100644 --- a/My Project/Settings.settings +++ b/ShiftOS Launcher/ShiftOS Launcher/My Project/Settings.settings diff --git a/ShiftOS Launcher/ShiftOS Launcher/ShiftOS Launcher.vbproj b/ShiftOS Launcher/ShiftOS Launcher/ShiftOS Launcher.vbproj new file mode 100644 index 0000000..7479615 --- /dev/null +++ b/ShiftOS Launcher/ShiftOS Launcher/ShiftOS Launcher.vbproj @@ -0,0 +1,136 @@ +<?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>{E9A73EB3-3CFE-4FC1-ABB3-FB93DACA5BE6}</ProjectGuid> + <OutputType>WinExe</OutputType> + <StartupObject>ShiftOS_Launcher.My.MyApplication</StartupObject> + <RootNamespace>ShiftOS_Launcher</RootNamespace> + <AssemblyName>ShiftOS Launcher</AssemblyName> + <FileAlignment>512</FileAlignment> + <MyType>WindowsForms</MyType> + <TargetFrameworkVersion>v4.5</TargetFrameworkVersion> + </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>ShiftOS Launcher.xml</DocumentationFile> + <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> + </PropertyGroup> + <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> + <PlatformTarget>AnyCPU</PlatformTarget> + <DebugType>pdbonly</DebugType> + <DefineDebug>false</DefineDebug> + <DefineTrace>true</DefineTrace> + <Optimize>true</Optimize> + <OutputPath>bin\Release\</OutputPath> + <DocumentationFile>ShiftOS Launcher.xml</DocumentationFile> + <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> + </PropertyGroup> + <PropertyGroup> + <OptionExplicit>On</OptionExplicit> + </PropertyGroup> + <PropertyGroup> + <OptionCompare>Binary</OptionCompare> + </PropertyGroup> + <PropertyGroup> + <OptionStrict>Off</OptionStrict> + </PropertyGroup> + <PropertyGroup> + <OptionInfer>On</OptionInfer> + </PropertyGroup> + <ItemGroup> + <Reference Include="System" /> + <Reference Include="System.Data" /> + <Reference Include="System.Deployment" /> + <Reference Include="System.Drawing" /> + <Reference Include="System.Windows.Forms" /> + <Reference Include="System.Xml" /> + <Reference Include="System.Core" /> + <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="FirstBootSetup.Designer.vb"> + <DependentUpon>FirstBootSetup.vb</DependentUpon> + </Compile> + <Compile Include="FirstBootSetup.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Main_Launcher.vb"> + <SubType>Form</SubType> + </Compile> + <Compile Include="Main_Launcher.Designer.vb"> + <DependentUpon>Main_Launcher.vb</DependentUpon> + <SubType>Form</SubType> + </Compile> + <Compile Include="My Project\AssemblyInfo.vb" /> + <Compile Include="My Project\Application.Designer.vb"> + <AutoGen>True</AutoGen> + <DependentUpon>Application.myapp</DependentUpon> + </Compile> + <Compile Include="My Project\Resources.Designer.vb"> + <AutoGen>True</AutoGen> + <DesignTime>True</DesignTime> + <DependentUpon>Resources.resx</DependentUpon> + </Compile> + <Compile Include="My Project\Settings.Designer.vb"> + <AutoGen>True</AutoGen> + <DependentUpon>Settings.settings</DependentUpon> + <DesignTimeSharedInput>True</DesignTimeSharedInput> + </Compile> + </ItemGroup> + <ItemGroup> + <EmbeddedResource Include="FirstBootSetup.resx"> + <DependentUpon>FirstBootSetup.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="Main_Launcher.resx"> + <DependentUpon>Main_Launcher.vb</DependentUpon> + </EmbeddedResource> + <EmbeddedResource Include="My Project\Resources.resx"> + <Generator>VbMyResourcesResXFileCodeGenerator</Generator> + <LastGenOutput>Resources.Designer.vb</LastGenOutput> + <CustomToolNamespace>My.Resources</CustomToolNamespace> + <SubType>Designer</SubType> + </EmbeddedResource> + </ItemGroup> + <ItemGroup> + <None Include="My Project\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" /> + </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 Save File Converter.vb b/ShiftOS Save File Converter.vb deleted file mode 100644 index 906d73a..0000000 --- a/ShiftOS Save File Converter.vb +++ /dev/null @@ -1,215 +0,0 @@ -Public Class ShiftOS_Save_File_Converter - Dim loadlines(2000) As String - - '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 - loadold() - addlines() - convertfile() - MessageBox.Show("Your save file is now compatible with ShiftOS 0.0.7. Press ok then open the ShiftOS application again to start playing ShiftOS 0.0.7.", "Conversion Complete", MessageBoxButtons.OK, MessageBoxIcon.Information) - Me.Close() - HijackScreen.Close() - End Sub - - Private Sub loadold() - File_Crypt.DecryptFile("C:/ShiftOS/Shiftum42/SKernal.sft", "C:\ShiftOS\Shiftum42\Drivers\HDD.dri", sSecretKey) - loadlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Drivers\HDD.dri") - 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("C:\ShiftOS\Shiftum42\Drivers\HDD.dri", loadlines) - File_Crypt.EncryptFile("C:\ShiftOS\Shiftum42\Drivers\HDD.dri", "C:/ShiftOS/Shiftum42/SKernal.sft", sSecretKey) - Dim objWriter As New System.IO.StreamWriter("C:/ShiftOS/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.sln b/ShiftOS.sln new file mode 100644 index 0000000..ee49134 --- /dev/null +++ b/ShiftOS.sln @@ -0,0 +1,25 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio Express 2012 for Windows Desktop +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "ShiftOS", "ShiftOS\ShiftOS.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 +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 + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal 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 @@ +<?xml version="1.0" encoding="utf-8" ?> +<configuration> + <configSections> + <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" > + <section name="ShiftOS.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" /> + </sectionGroup> + </configSections> + <startup> + <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" /> + </startup> + <userSettings> + <ShiftOS.My.MySettings> + <setting name="ShouldCrashOccur" serializeAs="String"> + <value>0</value> + </setting> + </ShiftOS.My.MySettings> + </userSettings> +</configuration>
\ No newline at end of file diff --git a/ApplicationEvents.vb b/ShiftOS/ApplicationEvents.vb index 5f28270..5f28270 100644 --- a/ApplicationEvents.vb +++ b/ShiftOS/ApplicationEvents.vb diff --git a/ArtPad.Designer.vb b/ShiftOS/ArtPad.Designer.vb index 7acdffc..7acdffc 100644 --- a/ArtPad.Designer.vb +++ b/ShiftOS/ArtPad.Designer.vb diff --git a/ArtPad.resx b/ShiftOS/ArtPad.resx index 2b92c10..2b92c10 100644 --- a/ArtPad.resx +++ b/ShiftOS/ArtPad.resx diff --git a/ArtPad.vb b/ShiftOS/ArtPad.vb index 0cda5c0..355d29e 100644 --- a/ArtPad.vb +++ b/ShiftOS/ArtPad.vb @@ -13,10 +13,10 @@ Dim canvaswidth As Integer = 150 Dim canvasheight As Integer = 100 - Public canvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) + Dim canvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) Dim canvascolor As Color = Color.White - Public previewcanvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) + Dim previewcanvasbitmap As New Drawing.Bitmap(canvaswidth, canvasheight) Dim magnificationlevel As Integer = 1 Dim magnifyRect As New Rectangle(0, 0, canvaswidth, canvasheight) @@ -62,14 +62,13 @@ Dim drawtextfontname As String Dim drawtextfontstyle As FontStyle - Private Sub ArtPad_Load(sender As Object, e As EventArgs) Handles MyBase.Load +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() setuppreview() settoolcolours() loadcolors() @@ -78,12 +77,19 @@ determinevisiblepallets() setuppallets() - ShiftOSDesktop.pnlpanelbuttonartpad.SendToBack() 'modfiy to proper name + 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 @@ -148,27 +154,19 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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) + ShiftOSDesktop.minimizeprogram(Me, False) End Sub Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click @@ -176,52 +174,57 @@ End Sub Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) + 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 ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -235,67 +238,64 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.artpadname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtartpadicon = True Then + 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. + pnlicon.Image = ShiftOSDesktop.artpadicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -317,33 +317,33 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + 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 + 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 @@ -359,6 +359,7 @@ 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() @@ -420,57 +421,61 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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.boughtartpadsave = True Then - e.Cancel = True - 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 close Artpad without saving the changes to your canvas?" - infobox.Show() - infobox.showyesno() - infobox.sendyesno = "artpad" - Else - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 - Me.Hide() - ShiftOSDesktop.setuppanelbuttons() - savecolors() - End If - Else - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 - Me.Hide() - ShiftOSDesktop.setuppanelbuttons() - savecolors() - End If - - + 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) @@ -640,10 +645,12 @@ drawtextfont = New System.Drawing.Font(drawtextfontname, drawtextsize, drawtextfontstyle) g.DrawString(txtdrawstringtext.Text, drawtextfont, CurrentBrush, thisPoint.X, thisPoint.Y) End If - - e.Graphics.DrawImage(canvasbitmap, 0, 0) - e.Graphics.DrawImage(previewcanvasbitmap, 0, 0) - + Try + e.Graphics.DrawImage(canvasbitmap, 0, 0) + e.Graphics.DrawImage(previewcanvasbitmap, 0, 0) + Catch ex As System.OutOfMemoryException + OutOfMemory() + End Try End Sub @@ -837,8 +844,8 @@ If selectedtool = "Line Tool" Then - picdrawingdisplay.Invalidate() - currentlydrawingline = False + picdrawingdisplay.Invalidate() + currentlydrawingline = False End If If selectedtool = "Text Tool" Then @@ -1374,7 +1381,7 @@ lbltotalpixels.ForeColor = Color.Black End If End If - End If + End If End Sub diff --git a/Audio Player.Designer.vb b/ShiftOS/Audio Player.Designer.vb index 524360e..524360e 100644 --- a/Audio Player.Designer.vb +++ b/ShiftOS/Audio Player.Designer.vb diff --git a/Audio Player.resx b/ShiftOS/Audio Player.resx index a333ede..a333ede 100644 --- a/Audio Player.resx +++ b/ShiftOS/Audio Player.resx diff --git a/Audio Player.vb b/ShiftOS/Audio Player.vb index 73c07e3..deef0df 100644 --- a/Audio Player.vb +++ b/ShiftOS/Audio Player.vb @@ -1,11 +1,4 @@ Public Class Audio_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 = 471 - Public minimumsizeheight As Integer = 266 Public clickedstop = False Public cancelindex = False @@ -14,21 +7,34 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonaudioplayer.SendToBack() 'modfiy to proper name + 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 @@ -93,80 +99,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -180,63 +189,61 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.audioplayername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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) @@ -262,29 +269,29 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -304,6 +311,7 @@ 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() @@ -365,26 +373,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -396,6 +427,7 @@ 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 diff --git a/Bitnote Digger.Designer.vb b/ShiftOS/Bitnote Digger.Designer.vb index 05fe0d0..12412fb 100644 --- a/Bitnote Digger.Designer.vb +++ b/ShiftOS/Bitnote Digger.Designer.vb @@ -42,11 +42,11 @@ Partial Class Bitnote_Digger Me.Panel1 = New System.Windows.Forms.Panel() Me.Label6 = New System.Windows.Forms.Label() Me.Label8 = New System.Windows.Forms.Label() - Me.Label9 = New System.Windows.Forms.Label() + Me.turbomodespeed = New System.Windows.Forms.Label() Me.Label5 = 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.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() @@ -56,6 +56,7 @@ Partial Class Bitnote_Digger 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() @@ -121,10 +122,10 @@ Partial Class Bitnote_Digger ' 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.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(148, 18) + Me.lbtitletext.Size = New System.Drawing.Size(115, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Bitnote Digger" ' @@ -230,11 +231,11 @@ Partial Class Bitnote_Digger ' Me.Panel1.Controls.Add(Me.Label6) Me.Panel1.Controls.Add(Me.Label8) - Me.Panel1.Controls.Add(Me.Label9) + Me.Panel1.Controls.Add(Me.turbomodespeed) Me.Panel1.Controls.Add(Me.Label5) - Me.Panel1.Controls.Add(Me.Label4) - Me.Panel1.Controls.Add(Me.Label3) - Me.Panel1.Controls.Add(Me.Label2) + 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) @@ -265,15 +266,15 @@ Partial Class Bitnote_Digger Me.Label8.TabIndex = 11 Me.Label8.Text = "Codepoint Cost: 1CP / 10s" ' - 'Label9 + 'turbomodespeed ' - 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(3, 109) - Me.Label9.Name = "Label9" - Me.Label9.Size = New System.Drawing.Size(183, 16) - Me.Label9.TabIndex = 10 - Me.Label9.Text = "Turbo Speed: 0.00002 BTN/S" + 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 ' @@ -285,35 +286,35 @@ Partial Class Bitnote_Digger Me.Label5.TabIndex = 9 Me.Label5.Text = "Digger Stats:" ' - 'Label4 + 'lbldiggerstatsspeed ' - 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(6, 60) - Me.Label4.Name = "Label4" - Me.Label4.Size = New System.Drawing.Size(144, 16) - Me.Label4.TabIndex = 8 - Me.Label4.Text = "Speed: 0.00001 BTN/S" + 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" ' - 'Label3 + 'lbldiggerstatsgrade ' - 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(6, 43) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(103, 16) - Me.Label3.TabIndex = 7 - Me.Label3.Text = "Digger Grade: 1" + 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" ' - 'Label2 + 'lbldiggerstatsname ' - 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(6, 26) - Me.Label2.Name = "Label2" - Me.Label2.Size = New System.Drawing.Size(157, 16) - Me.Label2.TabIndex = 6 - Me.Label2.Text = "Name: Surface Scratcher" + 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 ' @@ -411,6 +412,10 @@ Partial Class Bitnote_Digger ' Me.tmrcalcbitnotesmined.Interval = 1000 ' + 'tmrturbomode + ' + Me.tmrturbomode.Interval = 10000 + ' 'Bitnote_Digger ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -461,14 +466,15 @@ Partial Class Bitnote_Digger 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 Label9 As System.Windows.Forms.Label + Friend WithEvents turbomodespeed As System.Windows.Forms.Label Friend WithEvents Label5 As System.Windows.Forms.Label - 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 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/Bitnote Digger.resx b/ShiftOS/Bitnote Digger.resx index 67454ac..7beae4d 100644 --- a/Bitnote Digger.resx +++ b/ShiftOS/Bitnote Digger.resx @@ -120,4 +120,7 @@ <metadata name="tmrcalcbitnotesmined.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <value>17, 17</value> </metadata> + <metadata name="tmrturbomode.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>187, 17</value> + </metadata> </root>
\ 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/Bitnote Wallet.Designer.vb b/ShiftOS/Bitnote Wallet.Designer.vb index 5a4446b..5a4446b 100644 --- a/Bitnote Wallet.Designer.vb +++ b/ShiftOS/Bitnote Wallet.Designer.vb diff --git a/Bitnote Wallet.resx b/ShiftOS/Bitnote Wallet.resx index 1af7de1..1af7de1 100644 --- a/Bitnote Wallet.resx +++ b/ShiftOS/Bitnote Wallet.resx diff --git a/Bitnote Wallet.vb b/ShiftOS/Bitnote Wallet.vb index 4cd4f65..7b17add 100644 --- a/Bitnote Wallet.vb +++ b/ShiftOS/Bitnote Wallet.vb @@ -1,29 +1,35 @@ 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 = 0 'replace with minimum size - Public minimumsizeheight As Integer = 0 'replace with minimum size + 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() setupbitnotestats() - ShiftOSDesktop.pnlpanelbuttonbitnotewallet.SendToBack() 'modfiy to proper name + 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 @@ -88,80 +94,76 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight If justopened = True Then - Me.Size = New Size(422, 204) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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 - 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If + 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 ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -175,67 +177,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.bitnotewalletname 'Remember to change to name of program!!!! + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.bitnotewalleticontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -259,46 +259,30 @@ Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + 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 @@ -324,26 +308,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -355,6 +362,7 @@ End Sub 'end of general setup +#End Region Public Sub setupbitnotestats() lblbalancerounded.Text = "Balance: " & Math.Truncate(ShiftOSDesktop.bitnotebalance * 100) / 100 & " BTN" @@ -429,6 +437,18 @@ 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) diff --git a/Calculator.Designer.vb b/ShiftOS/Calculator.Designer.vb index 514dadf..3661f0e 100644 --- a/Calculator.Designer.vb +++ b/ShiftOS/Calculator.Designer.vb @@ -168,6 +168,7 @@ Partial Class Calculator ' '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) @@ -193,6 +194,7 @@ Partial Class Calculator ' '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) @@ -205,6 +207,7 @@ Partial Class Calculator ' '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) @@ -217,6 +220,7 @@ Partial Class Calculator ' '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) @@ -229,6 +233,8 @@ Partial Class Calculator ' '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) @@ -242,6 +248,7 @@ Partial Class Calculator ' '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) @@ -254,6 +261,7 @@ Partial Class Calculator ' '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) @@ -266,6 +274,7 @@ Partial Class Calculator ' '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) @@ -278,6 +287,7 @@ Partial Class Calculator ' '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) @@ -290,6 +300,7 @@ Partial Class Calculator ' '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) @@ -302,6 +313,7 @@ Partial Class Calculator ' '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) @@ -314,6 +326,7 @@ Partial Class Calculator ' '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) @@ -325,6 +338,7 @@ Partial Class Calculator ' '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) @@ -337,6 +351,7 @@ Partial Class Calculator ' '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) @@ -349,6 +364,7 @@ Partial Class Calculator ' '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) @@ -361,6 +377,7 @@ Partial Class Calculator ' '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) @@ -373,6 +390,7 @@ Partial Class Calculator ' '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) @@ -385,6 +403,7 @@ Partial Class Calculator ' '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) diff --git a/Calculator.resx b/ShiftOS/Calculator.resx index ff4c820..ff4c820 100644 --- a/Calculator.resx +++ b/ShiftOS/Calculator.resx diff --git a/Calculator.vb b/ShiftOS/Calculator.vb index d88c6b8..270d3b3 100644 --- a/Calculator.vb +++ b/ShiftOS/Calculator.vb @@ -1,36 +1,38 @@ 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 = 0 - Public minimumsizeheight As Integer = 0 - - Public dNumber As Double - Public sOperation As String - Public bHasFirstNumber, bHasSecondNumber, bHasOperation As Boolean + 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + If ShiftOSDesktop.CalculatorCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() 'modfiy to proper name + ShiftOSDesktop.pnlpanelbuttoncalculator.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoncalculator, ShiftOSDesktop.tbcalculatoricon, ShiftOSDesktop.tbcalculatortext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub - dNumber = 0 - bHasFirstNumber = False - bHasOperation = False + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() End Sub - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown + 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() @@ -94,80 +96,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -181,67 +186,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.calculatorname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.calculatoricontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -263,38 +266,165 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 MyBase.FormClosing + 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 diff --git a/Clock.Designer.vb b/ShiftOS/Clock.Designer.vb index a36a758..a36a758 100644 --- a/Clock.Designer.vb +++ b/ShiftOS/Clock.Designer.vb diff --git a/Clock.resx b/ShiftOS/Clock.resx index 02cc2a0..02cc2a0 100644 --- a/Clock.resx +++ b/ShiftOS/Clock.resx diff --git a/Clock.vb b/ShiftOS/Clock.vb index 843a954..2d20ce9 100644 --- a/Clock.vb +++ b/ShiftOS/Clock.vb @@ -9,22 +9,27 @@ Dim movedtext As Boolean = False - Private Sub Knowledge_Input_Load(sender As Object, e As EventArgs) Handles MyBase.Load +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - gettime() - setskin() + setupall() + If ShiftOSDesktop.ClockCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() + ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonclock, ShiftOSDesktop.tbclockicon, ShiftOSDesktop.tbclocktext, True) + 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 @@ -51,6 +56,7 @@ 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 @@ -88,80 +94,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -175,67 +184,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.clockname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtclockicon = True Then + '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.clockicontitlebar 'Replace with the correct icon for the program. + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -257,27 +264,100 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -289,6 +369,7 @@ End Sub 'end of general setup +#End Region Private Sub clocktick_Tick(sender As Object, e As EventArgs) Handles clocktick.Tick gettime() diff --git a/Colour Picker.Designer.vb b/ShiftOS/Colour Picker.Designer.vb index 9c0833e..9c0833e 100644 --- a/Colour Picker.Designer.vb +++ b/ShiftOS/Colour Picker.Designer.vb diff --git a/Colour Picker.resx b/ShiftOS/Colour Picker.resx index 1af7de1..1af7de1 100644 --- a/Colour Picker.resx +++ b/ShiftOS/Colour Picker.resx diff --git a/Colour Picker.vb b/ShiftOS/Colour Picker.vb index 514c8c1..dad5545 100644 --- a/Colour Picker.vb +++ b/ShiftOS/Colour Picker.vb @@ -21,18 +21,18 @@ Public redlevel As Integer Public pinklevel As Integer +#Region "Template Code" + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + If ShiftOSDesktop.ColourPickerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttoncolourpicker.SendToBack() + ShiftOSDesktop.pnlpanelbuttoncolourpicker.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoncolourpicker, ShiftOSDesktop.tbcolourpickericon, ShiftOSDesktop.tbcolourpickertext, True) + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoncolourpicker, ShiftOSDesktop.tbcolourpickericon, ShiftOSDesktop.tbcolourpickertext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 getoldcolour() @@ -40,6 +40,13 @@ 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 @@ -106,80 +113,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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, 596) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -193,65 +203,63 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.colourpickername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtcolourpickericon = True Then + '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.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 @@ -275,29 +283,102 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -307,6 +388,7 @@ 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) @@ -1806,6 +1888,16 @@ 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 "mod dono" + 'Dim sw As New System.IO.StreamWriter(NewAPI.varpath & "\colourpickeroutput") + 'sw.WriteLine(pnlnewcolour.BackColor.ToArgb) + 'sw.Close() Case "artpallet1" : ArtPad.colourpallet1.BackColor = pnlnewcolour.BackColor Case "artpallet2" : ArtPad.colourpallet2.BackColor = pnlnewcolour.BackColor Case "artpallet3" : ArtPad.colourpallet3.BackColor = pnlnewcolour.BackColor @@ -1934,12 +2026,17 @@ 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() 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 @@ +' <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 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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Custom_Menu + 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.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/infobox.resx b/ShiftOS/Custom_Menu.resx index 1af7de1..1af7de1 100644 --- a/infobox.resx +++ b/ShiftOS/Custom_Menu.resx 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/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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Dodge + 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(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 @@ +<?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="player.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAIAAAD8GO2jAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAANlJREFUSEvVjtsOwyAMQ/v/P90hnKW5ADFSq27nYUscY/c4H2aj4OjIQkM9sNF2 + Zqitwzi+o/BpkE3ETHawBZmbCxbDmtpkE+2MoYT7Ch+tM8OOdTMa/EaBjbYzQ2G1cbN5jTOFN2UE478k + nNuvAn2NWDtYoStuz+cths8vST9Bgb5AfF+g4KS4PZyzO8D4VxG7BUPeLigR65ypg3ncKG17BVn8qwIo + Qb+twK6zecgbBe0NkL1j1zAD2RPxMLRmkVGAU6cmLm4syn/n8YJGM2Xk5pGbQQ6W8/wAaLdSOxZqwToA + AAAASUVORK5CYII= +</value> + </data> + <data name="QuitButton.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + 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 +</value> + </data> + <data name="BeginButton.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + 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 +</value> + </data> + <data name="object_small2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAAEsAAAAUCAIAAABK9FefAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAC9JREFUWEftzwEBAAAIwjD6l9Ych6/BMuF6OeRzyOeQzyGfQz6HfA75HPLNDJsl + D4jAV3xQnIczAAAAAElFTkSuQmCC +</value> + </data> + <data name="object_mid2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAAH0AAAAUCAIAAAAvGaXgAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEJJREFUWEft0DEBADAMwKD6N7091dA8IIEh87jlveG94b3hveG94b3hveG94b3h + veG94b3hveG94b3hveG9se9cm/mqBdmGSM9R1gAAAABJRU5ErkJggg== +</value> + </data> + <data name="object_large.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAAK8AAAAUCAIAAAB0/fqUAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEFJREFUaEPt0gEJACAQALHvX/pFEA47bBk28FnYtYHYQGwgNhAbiA3EBmIDsYHY + QGwgNhAbiA3EBmIDsYG8DXDNHAnVW5/1c3lZAAAAAElFTkSuQmCC +</value> + </data> + <data name="object_small.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAAEsAAAAUCAIAAABK9FefAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAC9JREFUWEftzwEBAAAIwjD6l9Ych6/BMuF6OeRzyOeQzyGfQz6HfA75HPLNDJsl + D4jAV3xQnIczAAAAAElFTkSuQmCC +</value> + </data> + <data name="object_mid.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAAH0AAAAUCAIAAAAvGaXgAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wAAADsABataJCQAAAEJJREFUWEft0DEBADAMwKD6N7091dA8IIEh87jlveG94b3hveG94b3hveG94b3h + veG94b3hveG94b3hveG9se9cm/mqBdmGSM9R1gAAAABJRU5ErkJggg== +</value> + </data> + <data name="PicBonus.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> + <value> + iVBORw0KGgoAAAANSUhEUgAAABAAAAALCAIAAAD5gJpuAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAE1JREFUKFOtjUEOACEIA3k6P2dJSroVuWicA2lksHaDu3MmEcEJmrCQXqMWSjtV + T/PckKik+WdsIPX6vmHPcwMMpRYKTvkBJFWbcILZB/dcg5IyZV67AAAAAElFTkSuQmCC +</value> + </data> + <metadata name="clock.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/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/Downloader.Designer.vb b/ShiftOS/Downloader.Designer.vb index ae8db03..ae8db03 100644 --- a/Downloader.Designer.vb +++ b/ShiftOS/Downloader.Designer.vb diff --git a/Downloader.resx b/ShiftOS/Downloader.resx index ff4c820..ff4c820 100644 --- a/Downloader.resx +++ b/ShiftOS/Downloader.resx diff --git a/template.vb b/ShiftOS/Downloader.vb index 76ea190..11062cc 100644 --- a/template.vb +++ b/ShiftOS/Downloader.vb @@ -1,4 +1,4 @@ -Public Class template +Public Class Downloader Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -7,21 +7,26 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() 'modfiy to proper name + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name + 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 @@ -86,80 +91,88 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -173,67 +186,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.knowledgeinputname 'Remember to change to name of program!!!! + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -257,31 +268,31 @@ Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + 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 + 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 @@ -297,6 +308,7 @@ 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() @@ -358,26 +370,36 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -389,56 +411,5 @@ End Sub 'end of general setup - - Private Sub pgbottom_Paint(sender As Object, e As PaintEventArgs) Handles pgbottom.Paint - - End Sub - - Private Sub pgtoprcorner_Paint(sender As Object, e As PaintEventArgs) Handles pgtoprcorner.Paint - - End Sub - - Private Sub pgtoplcorner_Paint(sender As Object, e As PaintEventArgs) Handles pgtoplcorner.Paint - - End Sub - - Private Sub lbtitletext_Click(sender As Object, e As EventArgs) Handles lbtitletext.Click - - End Sub - - Private Sub closebutton_Paint(sender As Object, e As PaintEventArgs) Handles closebutton.Paint - - End Sub - - Private Sub rollupbutton_Paint(sender As Object, e As PaintEventArgs) Handles rollupbutton.Paint - - End Sub - - Private Sub pnlicon_Click(sender As Object, e As EventArgs) Handles pnlicon.Click - - End Sub - - Private Sub minimizebutton_Paint(sender As Object, e As PaintEventArgs) Handles minimizebutton.Paint - - End Sub - - Private Sub pgbottomrcorner_Paint(sender As Object, e As PaintEventArgs) Handles pgbottomrcorner.Paint - - End Sub - - Private Sub pgright_Paint(sender As Object, e As PaintEventArgs) Handles pgright.Paint - - End Sub - - Private Sub pgbottomlcorner_Paint(sender As Object, e As PaintEventArgs) Handles pgbottomlcorner.Paint - - End Sub - - Private Sub pgleft_Paint(sender As Object, e As PaintEventArgs) Handles pgleft.Paint - - End Sub - - Private Sub pgcontents_Paint(sender As Object, e As PaintEventArgs) Handles pgcontents.Paint - - End Sub -End Class +#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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Downloadmanager + + Inherits System.Windows.Forms.Form + + Public ShiftOSPath As String = "C:\ShiftOS\" + + '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(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 @@ +<?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="lblwelcometext.Text" xml:space="preserve"> + <value>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.</value> + </data> + <metadata name="pullside.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>214, 57</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>130, 57</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <metadata name="tmrdownloadspeed.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>308, 57</value> + </metadata> + <metadata name="tmrapplied.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>466, 57</value> + </metadata> +</root>
\ 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/File Opener.Designer.vb b/ShiftOS/File Opener.Designer.vb index 60da916..b232dad 100644 --- a/File Opener.Designer.vb +++ b/ShiftOS/File Opener.Designer.vb @@ -86,10 +86,10 @@ Partial Class File_Opener ' 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.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(111, 18) + Me.lbtitletext.Size = New System.Drawing.Size(95, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "File Opener" ' @@ -346,6 +346,13 @@ Partial Class File_Opener 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 ' 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 @@ +<?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="scaninput.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>348, 12</value> + </metadata> + <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 57</value> + </metadata> + <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> + <value> + 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= +</value> + </data> + <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/File Opener.vb b/ShiftOS/File Opener.vb index 68db938..d5e2422 100644 --- a/File Opener.vb +++ b/ShiftOS/File Opener.vb @@ -8,37 +8,39 @@ Public Class File_Opener 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonfileopener.SendToBack() + lbextention.Text = openextention + showcontents() + + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfileopener, ShiftOSDesktop.tbfileopenericon, ShiftOSDesktop.tbfileopenertext, True) + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttondodge, ShiftOSDesktop.tbdodgeicon, ShiftOSDesktop.tbdodgetext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub - If ShiftOSDesktop.fileopenerlastdirectory = "" Then - 'open default directory - Else - lbllocation.Text = ShiftOSDesktop.fileopenerlastdirectory - End If - lbextention.Text = openextention - showcontents() + Public Sub setupall() + setuptitlebar() + setupborders() + setskin() End Sub - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown + 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() @@ -102,80 +104,83 @@ Public Class File_Opener End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -189,67 +194,65 @@ Public Class File_Opener If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.fileopenername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtfileskimmericon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.fileopenericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -271,29 +274,29 @@ Public Class File_Opener End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -313,6 +316,7 @@ Public Class File_Opener 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() @@ -374,26 +378,49 @@ Public Class File_Opener End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -405,9 +432,11 @@ Public Class File_Opener 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() @@ -457,6 +486,8 @@ Public Class File_Opener filetype = 4 Case ".wmv" filetype = 4 + Case ".mp3" + filetype = 4 Case ".dll" filetype = 6 Case ".exe" @@ -473,6 +504,24 @@ Public Class File_Opener 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 @@ -482,6 +531,10 @@ Public Class File_Opener 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) @@ -581,6 +634,17 @@ Public Class File_Opener 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 @@ -595,7 +659,7 @@ Public Class File_Opener If lvfiles.SelectedItems(0).Text = "Exit Folder" Then - If lbllocation.Text = "C:/ShiftOS/" 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() @@ -638,6 +702,7 @@ Public Class File_Opener showcontents() End If End If + currentLocation = lbllocation.Text End Sub Private Sub btndeletefile_Click(sender As Object, e As EventArgs) @@ -675,7 +740,15 @@ Public Class File_Opener 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 @@ -690,6 +763,15 @@ Public Class File_Opener 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 @@ -706,13 +788,24 @@ Public Class File_Opener Graphic_Picker.setgraphicsmousedown() Me.Close() Case "skinloader" - ShiftOSDesktop.disposeoldskindata("skinloaderemovepreview") - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) - System.IO.Compression.ZipFile.ExtractToDirectory(lbllocation.Text & "\" & lastselectedfilename, "C:\ShiftOS\Shiftum42\Skins\Preview\") - My.Computer.FileSystem.WriteAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) - Skin_Loader.loadlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat") - Skin_Loader.loadskintopreview() - Skin_Loader.skinloaded = True + 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) @@ -734,8 +827,8 @@ Public Class File_Opener Me.Close() Case "iconmanagerpack" Icon_Manager.disposebackgrounds() - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Icons") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Icons", FileIO.DeleteDirectoryOption.DeleteAllContents) - System.IO.Compression.ZipFile.ExtractToDirectory(lbllocation.Text & "\" & lastselectedfilename, "C:\ShiftOS\Shiftum42\Icons") + 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() @@ -743,6 +836,16 @@ Public Class File_Opener 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 @@ -750,4 +853,5 @@ Public Class File_Opener 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/File Saver.Designer.vb b/ShiftOS/File Saver.Designer.vb index 4dbfdef..436de54 100644 --- a/File Saver.Designer.vb +++ b/ShiftOS/File Saver.Designer.vb @@ -32,8 +32,10 @@ Partial Class File_Saver 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() @@ -52,7 +54,6 @@ Partial Class File_Saver 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.pnlsaveoptions.SuspendLayout() Me.Panel1.SuspendLayout() @@ -86,10 +87,10 @@ Partial Class File_Saver ' 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.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(97, 18) + Me.lbtitletext.Size = New System.Drawing.Size(83, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "File Saver" ' @@ -136,6 +137,31 @@ Partial Class File_Saver 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 @@ -150,6 +176,7 @@ Partial Class File_Saver '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) @@ -160,6 +187,15 @@ Partial Class File_Saver 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 @@ -174,10 +210,10 @@ Partial Class File_Saver 'lbextention ' Me.lbextention.AutoSize = True - Me.lbextention.Font = New System.Drawing.Font("Microsoft Sans Serif", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lbextention.Location = New System.Drawing.Point(478, 11) + 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(27, 18) + Me.lbextention.Size = New System.Drawing.Size(34, 20) Me.lbextention.TabIndex = 2 Me.lbextention.Text = ".txt" ' @@ -198,7 +234,7 @@ Partial Class File_Saver 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(383, 22) + Me.txtfilename.Size = New System.Drawing.Size(368, 22) Me.txtfilename.TabIndex = 0 ' 'Panel2 @@ -329,24 +365,6 @@ Partial Class File_Saver ' 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") - ' 'File_Saver ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -402,5 +420,6 @@ Partial Class File_Saver 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 @@ +<?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="scaninput.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>348, 12</value> + </metadata> + <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>138, 12</value> + </metadata> + <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> + <value> + 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= +</value> + </data> + <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/File Saver.vb b/ShiftOS/File Saver.vb index eaaff38..1445c65 100644 --- a/File Saver.vb +++ b/ShiftOS/File Saver.vb @@ -11,36 +11,56 @@ Public Class File_Saver 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonfilesaver.SendToBack() - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonfilesaver, ShiftOSDesktop.tbfilesavericon, ShiftOSDesktop.tbfilesavertext, True) - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + showcontents() lbextention.Text = saveextention - If ShiftOSDesktop.fileopenerlastdirectory = "" Then - lbllocation.Text = "C:/ShiftOS" + 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 - lbllocation.Text = ShiftOSDesktop.fileopenerlastdirectory + cmbformatchooser.Hide() End If - showcontents() + + 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 MyBase.KeyDown + 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() @@ -104,80 +124,83 @@ Public Class File_Saver End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -191,67 +214,65 @@ Public Class File_Saver If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.filesavername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtfileskimmericon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.filesavericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -273,29 +294,29 @@ Public Class File_Saver End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -315,6 +336,7 @@ Public Class File_Saver 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() @@ -375,38 +397,62 @@ Public Class File_Saver 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 - Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - 'end of general setup +#End Region Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) showcontents() @@ -459,6 +505,8 @@ Public Class File_Saver filetype = 4 Case ".wmv" filetype = 4 + Case ".mp3" + filetype = 4 Case ".dll" filetype = 6 Case ".exe" @@ -475,6 +523,24 @@ Public Class File_Saver 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 @@ -488,6 +554,8 @@ Public Class File_Saver 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 @@ -506,7 +574,7 @@ Public Class File_Saver savefile() Else If lvfiles.SelectedItems(0).Text = "Exit Folder" Then - If lbllocation.Text = "C:/ShiftOS/" 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() @@ -573,15 +641,24 @@ Public Class File_Saver 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 "textpad" - My.Computer.FileSystem.WriteAllText(lbllocation.Text & "/" & txtfilename.Text & saveextention, TextPad.txtuserinput.Text, False) + 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 @@ -595,15 +672,14 @@ Public Class File_Saver TextPad.codepointsearned = 0 TextPad.tmrshowearnedcodepoints.Start() Case "skinloader" - System.IO.Compression.ZipFile.CreateFromDirectory("C:\ShiftOS\Shiftum42\Skins\Current\", lbllocation.Text & " / " & txtfilename.Text & saveextention) - Icon_Manager.unsavedchanges = False + Skins.saveskin(lbllocation.Text & " / " & filename) Case "iconmanager" - System.IO.Compression.ZipFile.CreateFromDirectory("C:\ShiftOS\Shiftum42\Icons", lbllocation.Text & " / " & txtfilename.Text & saveextention) + System.IO.Compression.ZipFile.CreateFromDirectory(ShiftOSPath + "Shiftum42\Icons", lbllocation.Text & " / " & filename) Icon_Manager.unsavedchanges = False Case "namechanger" - IO.File.WriteAllLines(lbllocation.Text & "/" & txtfilename.Text & saveextention, Name_Changer.savelines) + IO.File.WriteAllLines(lbllocation.Text & "/" & filename, Name_Changer.savelines) Case "artpad" - ArtPad.savelocation = lbllocation.Text & "/" & txtfilename.Text & saveextention + ArtPad.savelocation = lbllocation.Text & "/" & filename ArtPad.saveimage() ArtPad.needtosave = False ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + ArtPad.codepointsearned @@ -617,6 +693,9 @@ Public Class File_Saver End If ArtPad.codepointsearned = 0 ArtPad.tmrshowearnedcodepoints.Start() + Case "orcwrite" + OrcWrite.savepath = lbllocation.Text & "/" & filename + OrcWrite.savedocument() End Select Me.Close() End If diff --git a/File Skimmer.Designer.vb b/ShiftOS/File Skimmer.Designer.vb index be23a13..1debb60 100644 --- a/File Skimmer.Designer.vb +++ b/ShiftOS/File Skimmer.Designer.vb @@ -104,6 +104,13 @@ Partial Class File_Skimmer 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 ' @@ -285,10 +292,10 @@ Partial Class File_Skimmer ' 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.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(121, 18) + Me.lbtitletext.Size = New System.Drawing.Size(107, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "File Skimmer" ' @@ -326,14 +333,14 @@ Partial Class File_Skimmer 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) + Me.fileactions.Size = New System.Drawing.Size(153, 48) ' '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.Size = New System.Drawing.Size(152, 22) Me.DeleteToolStripMenuItem.Text = "Delete" ' 'pullbs @@ -389,7 +396,6 @@ Partial Class File_Skimmer 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 ImageList1 As System.Windows.Forms.ImageList Friend WithEvents fileactions As System.Windows.Forms.ContextMenuStrip Friend WithEvents DeleteToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents lbllocation As System.Windows.Forms.Label @@ -403,4 +409,5 @@ Partial Class File_Skimmer 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..b3951e5 --- /dev/null +++ b/ShiftOS/File Skimmer.resx @@ -0,0 +1,421 @@ +<?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="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>28, 12</value> + </metadata> + <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64"> + <value> + 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= +</value> + </data> + <metadata name="fileactions.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>138, 12</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/File Skimmer.vb b/ShiftOS/File Skimmer.vb new file mode 100644 index 0000000..6134638 --- /dev/null +++ b/ShiftOS/File Skimmer.vb @@ -0,0 +1,936 @@ +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 + 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.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() + 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 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 lbllocation.Text Like "*/" Then + Else + lbllocation.Text = lbllocation.Text + "/" + End If + OpenFile(lbllocation.Text + lvfiles.SelectedItems(0).Text) + End If + + End Sub + + 'Used for Desktop. + 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.UseCode(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/File_Crypt.vb b/ShiftOS/File_Crypt.vb index d6ee0f7..d6ee0f7 100644 --- a/File_Crypt.vb +++ b/ShiftOS/File_Crypt.vb 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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class FloatyBird + 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 + ' + '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/template.resx b/ShiftOS/FloatyBird.resx index 79f713a..79f713a 100644 --- a/template.resx +++ b/ShiftOS/FloatyBird.resx diff --git a/Downloader.vb b/ShiftOS/FloatyBird.vb index 75a32e6..41c7988 100644 --- a/Downloader.vb +++ b/ShiftOS/FloatyBird.vb @@ -1,4 +1,5 @@ -Public Class Downloader +Public Class FloatyBird +#Region "Template Code" Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -9,19 +10,22 @@ Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonclock.SendToBack() 'modfiy to proper name + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name + 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 @@ -86,80 +90,88 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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(800, 600) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -173,67 +185,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.knowledgeinputname 'Remember to change to name of program!!!! + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) - pnlicon.Image = ShiftOSDesktop.knowledgeinputicontitlebar 'Replace with the correct icon for the program. + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -257,27 +267,27 @@ Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -297,6 +307,7 @@ 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() @@ -358,26 +369,34 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle + '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 + '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 @@ -389,4 +408,8 @@ End Sub 'end of general setup -End Class
\ No newline at end of file +#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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class FloodGate_Manager + 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.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 @@ +<?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>316, 24</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>433, 24</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>14, 24</value> + </metadata> + <metadata name="shouldnotneedtoexist.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>132, 22</value> + </metadata> + <metadata name="dnloadtimer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>517, 24</value> + </metadata> + <metadata name="tmrdwnld.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>17, 41</value> + </metadata> + <metadata name="ColorDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>121, 41</value> + </metadata> +</root>
\ 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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class FloodRegistry + 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() + ' + '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 @@ +<?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/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/Graphic Picker.Designer.vb b/ShiftOS/Graphic Picker.Designer.vb index 689cf11..689cf11 100644 --- a/Graphic Picker.Designer.vb +++ b/ShiftOS/Graphic Picker.Designer.vb diff --git a/Graphic Picker.resx b/ShiftOS/Graphic Picker.resx index 33c7f67..33c7f67 100644 --- a/Graphic Picker.resx +++ b/ShiftOS/Graphic Picker.resx diff --git a/Graphic Picker.vb b/ShiftOS/Graphic Picker.vb index 38f8a69..6be6615 100644 --- a/Graphic Picker.vb +++ b/ShiftOS/Graphic Picker.vb @@ -6,23 +6,23 @@ Public needtorollback As Boolean = False Public minimumsizewidth As Integer = 0 Public minimumsizeheight As Integer = 0 + Public ShiftOSPath As String = "C:\ShiftOS" Public graphictochange - Public imagestyle As ImageLayout = ImageLayout.Stretch - Public images(2) As Image + Dim imagestyle As ImageLayout = ImageLayout.Stretch + Dim images(2) As Image Public imagelocations(2) As String - Public skinimages(100) As String + Dim skinimages(100) As String Dim firstrun As Boolean = True Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - GC.Collect() - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + 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() @@ -49,6 +49,12 @@ 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 @@ -113,80 +119,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -200,67 +209,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.graphicpickername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.graphicpickericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -282,27 +289,100 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -373,9 +453,9 @@ Shifter.skintitlebarstyle = imagestyle Case "Desktop Background" Array.Copy(images, Shifter.skindesktopbackground, Shifter.skindesktopbackground.Length) - Shifter.shifterskinimages(6) = imagelocations(0).Clone - Shifter.shifterskinimages(7) = imagelocations(1).Clone - Shifter.shifterskinimages(8) = imagelocations(2).Clone + 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) @@ -463,6 +543,7 @@ 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) @@ -476,13 +557,17 @@ GC.Collect() 'fix a hang issue when the image isn't changed - ' If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Temp") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Temp", FileIO.DeleteDirectoryOption.DeleteAllContents) + ' 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 - My.Computer.FileSystem.CopyFile(skinimages(imagenumber1), "C:\ShiftOS\Shiftum42\Skins\Temp\" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")), True) - skinimages(imagenumber1) = "C:\ShiftOS\Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) - skinimages(imagenumber2) = "C:\ShiftOS\Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) - skinimages(imagenumber3) = "C:\ShiftOS\Shiftum42\Skins\Temp" & skinimages(imagenumber1).Substring(skinimages(imagenumber1).LastIndexOf("\")) + 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() @@ -516,15 +601,15 @@ 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 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)) + If imagelocations(0) = "" Then Else picgraphic.BackgroundImage = Image.FromFile(imagelocations(0)) End Sub Private Sub cloneidle() diff --git a/ShiftOS/Helper.vb b/ShiftOS/Helper.vb new file mode 100644 index 0000000..167665c --- /dev/null +++ b/ShiftOS/Helper.vb @@ -0,0 +1,9 @@ +Public Class 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 +End Class diff --git a/HijackScreen.Designer.vb b/ShiftOS/HijackScreen.Designer.vb index a314557..a314557 100644 --- a/HijackScreen.Designer.vb +++ b/ShiftOS/HijackScreen.Designer.vb diff --git a/HijackScreen.resx b/ShiftOS/HijackScreen.resx index b58c9d2..b58c9d2 100644 --- a/HijackScreen.resx +++ b/ShiftOS/HijackScreen.resx diff --git a/HijackScreen.vb b/ShiftOS/HijackScreen.vb index aa5266f..44d6868 100644 --- a/HijackScreen.vb +++ b/ShiftOS/HijackScreen.vb @@ -4,7 +4,7 @@ Imports System.Text Imports System.Net.Mail Public Class HijackScreen - Public actualshiftversion As String = "0.0.7" + Public actualshiftversion As String = "0.0.8" Dim newgame As Boolean = True Dim tcount As Integer = 0 Dim rtext As String @@ -18,13 +18,15 @@ Public Class HijackScreen 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 @@ -306,4 +308,16 @@ Public Class HijackScreen 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/Icon Manager.Designer.vb b/ShiftOS/Icon Manager.Designer.vb index f15d596..33dd8ea 100644 --- a/Icon Manager.Designer.vb +++ b/ShiftOS/Icon Manager.Designer.vb @@ -144,9 +144,16 @@ Partial Class Icon_Manager Me.pnltitlebarterminalicon = New System.Windows.Forms.Panel() Me.pnlpanelbuttonterminalicon = New System.Windows.Forms.Panel() Me.pnllauncherterminalicon = 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() + 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() @@ -166,6 +173,59 @@ Partial Class Icon_Manager 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() @@ -191,12 +251,24 @@ Partial Class Icon_Manager Me.pnlnamechangericons.SuspendLayout() Me.pnliconmanagericons.SuspendLayout() Me.Panel7.SuspendLayout() - Me.Panel8.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 @@ -211,9 +283,9 @@ Partial Class Icon_Manager ' Me.pgbottom.BackColor = System.Drawing.Color.Gray Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottom.Location = New System.Drawing.Point(2, 498) + Me.pgbottom.Location = New System.Drawing.Point(2, 702) Me.pgbottom.Name = "pgbottom" - Me.pgbottom.Size = New System.Drawing.Size(396, 2) + Me.pgbottom.Size = New System.Drawing.Size(1449, 2) Me.pgbottom.TabIndex = 23 ' 'pullbottom @@ -252,7 +324,7 @@ Partial Class Icon_Manager ' Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 468) + 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 @@ -262,9 +334,9 @@ Partial Class Icon_Manager 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(398, 30) + Me.pgright.Location = New System.Drawing.Point(1451, 30) Me.pgright.Name = "pgright" - Me.pgright.Size = New System.Drawing.Size(2, 470) + Me.pgright.Size = New System.Drawing.Size(2, 674) Me.pgright.TabIndex = 22 ' 'closebutton @@ -279,10 +351,10 @@ Partial Class Icon_Manager ' 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.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(140, 18) + Me.lbtitletext.Size = New System.Drawing.Size(110, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Icon Manager" ' @@ -299,7 +371,7 @@ Partial Class Icon_Manager ' Me.pgtoprcorner.BackColor = System.Drawing.Color.Red Me.pgtoprcorner.Dock = System.Windows.Forms.DockStyle.Right - Me.pgtoprcorner.Location = New System.Drawing.Point(398, 0) + 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 @@ -308,7 +380,7 @@ Partial Class Icon_Manager ' Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 468) + 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 @@ -323,7 +395,7 @@ Partial Class Icon_Manager 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(396, 468) + Me.pgcontents.Size = New System.Drawing.Size(1449, 672) Me.pgcontents.TabIndex = 20 ' 'FlowLayoutPanel1 @@ -350,11 +422,23 @@ Partial Class Icon_Manager 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(396, 363) + Me.FlowLayoutPanel1.Size = New System.Drawing.Size(1449, 567) Me.FlowLayoutPanel1.TabIndex = 2 ' 'pnlknowledgeinputicons @@ -415,7 +499,7 @@ Partial Class Icon_Manager 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(3, 73) + 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 @@ -467,7 +551,7 @@ Partial Class Icon_Manager 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(3, 143) + 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 @@ -519,7 +603,7 @@ Partial Class Icon_Manager 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, 213) + 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 @@ -571,7 +655,7 @@ Partial Class Icon_Manager 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(3, 283) + 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 @@ -623,7 +707,7 @@ Partial Class Icon_Manager 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(3, 353) + 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 @@ -675,7 +759,7 @@ Partial Class Icon_Manager 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, 423) + 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 @@ -727,7 +811,7 @@ Partial Class Icon_Manager 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(3, 493) + 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 @@ -779,7 +863,7 @@ Partial Class Icon_Manager 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(3, 563) + 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 @@ -831,7 +915,7 @@ Partial Class Icon_Manager 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, 633) + 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 @@ -883,7 +967,7 @@ Partial Class Icon_Manager 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(3, 703) + 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 @@ -935,7 +1019,7 @@ Partial Class Icon_Manager 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(3, 773) + 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 @@ -987,7 +1071,7 @@ Partial Class Icon_Manager 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, 843) + 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 @@ -1039,7 +1123,7 @@ Partial Class Icon_Manager 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(3, 913) + 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 @@ -1091,7 +1175,7 @@ Partial Class Icon_Manager 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(3, 983) + 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 @@ -1143,7 +1227,7 @@ Partial Class Icon_Manager 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, 1053) + 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 @@ -1195,7 +1279,7 @@ Partial Class Icon_Manager 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(3, 1123) + 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 @@ -1247,7 +1331,7 @@ Partial Class Icon_Manager 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(3, 1193) + 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 @@ -1299,7 +1383,7 @@ Partial Class Icon_Manager 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, 1263) + 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 @@ -1351,7 +1435,7 @@ Partial Class Icon_Manager 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(3, 1333) + 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 @@ -1403,7 +1487,7 @@ Partial Class Icon_Manager 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(3, 1403) + 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 @@ -1449,35 +1533,109 @@ Partial Class Icon_Manager Me.pnllauncherterminalicon.Size = New System.Drawing.Size(64, 64) Me.pnllauncherterminalicon.TabIndex = 0 ' - 'Panel8 - ' - Me.Panel8.Controls.Add(Me.txtshutdownname) - Me.Panel8.Controls.Add(Me.pnllaunchershutdownicon) - Me.Panel8.Location = New System.Drawing.Point(3, 1473) - Me.Panel8.Name = "Panel8" - Me.Panel8.Size = New System.Drawing.Size(369, 64) - Me.Panel8.TabIndex = 21 - ' - '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 + '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 ' @@ -1489,9 +1647,9 @@ Partial Class Icon_Manager 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, 390) + Me.Panel2.Location = New System.Drawing.Point(0, 594) Me.Panel2.Name = "Panel2" - Me.Panel2.Size = New System.Drawing.Size(396, 37) + Me.Panel2.Size = New System.Drawing.Size(1449, 37) Me.Panel2.TabIndex = 4 ' 'Panel3 @@ -1500,7 +1658,7 @@ Partial Class Icon_Manager 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(396, 1) + Me.Panel3.Size = New System.Drawing.Size(1449, 1) Me.Panel3.TabIndex = 7 ' 'txtlaunchericonsize @@ -1509,7 +1667,7 @@ Partial Class Icon_Manager 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(330, 8) + 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) @@ -1522,7 +1680,7 @@ Partial Class Icon_Manager 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(261, 10) + 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 @@ -1534,7 +1692,7 @@ Partial Class Icon_Manager 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(225, 8) + 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) @@ -1547,7 +1705,7 @@ Partial Class Icon_Manager 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(137, 10) + 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 @@ -1559,7 +1717,7 @@ Partial Class Icon_Manager 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(98, 8) + 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) @@ -1572,7 +1730,7 @@ Partial Class Icon_Manager 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(38, 10) + 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 @@ -1587,9 +1745,9 @@ Partial Class Icon_Manager 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, 427) + Me.Panel1.Location = New System.Drawing.Point(0, 631) Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(396, 41) + Me.Panel1.Size = New System.Drawing.Size(1449, 41) Me.Panel1.TabIndex = 3 ' 'Panel5 @@ -1598,7 +1756,7 @@ Partial Class Icon_Manager 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(396, 1) + Me.Panel5.Size = New System.Drawing.Size(1449, 1) Me.Panel5.TabIndex = 8 ' 'btnReset @@ -1606,7 +1764,7 @@ Partial Class Icon_Manager 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(2, 4) + 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 @@ -1618,7 +1776,7 @@ Partial Class Icon_Manager 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(101, 4) + 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 @@ -1630,7 +1788,7 @@ Partial Class Icon_Manager 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(200, 4) + 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 @@ -1642,7 +1800,7 @@ Partial Class Icon_Manager 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(299, 4) + 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 @@ -1656,7 +1814,7 @@ Partial Class Icon_Manager 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(396, 27) + Me.Panel4.Size = New System.Drawing.Size(1449, 27) Me.Panel4.TabIndex = 1 ' 'Panel6 @@ -1665,7 +1823,7 @@ Partial Class Icon_Manager 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(396, 1) + Me.Panel6.Size = New System.Drawing.Size(1449, 1) Me.Panel6.TabIndex = 9 ' 'Label1 @@ -1674,7 +1832,7 @@ Partial Class Icon_Manager 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(396, 27) + 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 @@ -1686,7 +1844,7 @@ Partial Class Icon_Manager 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, 470) + Me.pgleft.Size = New System.Drawing.Size(2, 674) Me.pgleft.TabIndex = 21 ' 'titlebar @@ -1703,14 +1861,564 @@ Partial Class Icon_Manager 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(400, 30) + 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(400, 500) + Me.ClientSize = New System.Drawing.Size(1453, 704) Me.Controls.Add(Me.pgcontents) Me.Controls.Add(Me.pgbottom) Me.Controls.Add(Me.pgright) @@ -1745,7 +2453,8 @@ Partial Class Icon_Manager Me.pnlnamechangericons.ResumeLayout(False) Me.pnliconmanagericons.ResumeLayout(False) Me.Panel7.ResumeLayout(False) - Me.Panel8.ResumeLayout(False) + Me.pnlbitnotewallet.ResumeLayout(False) + Me.pnlbitnotedigger.ResumeLayout(False) Me.Panel2.ResumeLayout(False) Me.Panel2.PerformLayout() Me.Panel1.ResumeLayout(False) @@ -1753,6 +2462,17 @@ Partial Class Icon_Manager 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 @@ -1773,14 +2493,8 @@ Partial Class Icon_Manager 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 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 Panel4 As System.Windows.Forms.Panel Friend WithEvents Label1 As System.Windows.Forms.Label - Friend WithEvents FlowLayoutPanel1 As System.Windows.Forms.FlowLayoutPanel Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents Button3 As System.Windows.Forms.Button Friend WithEvents btnSave As System.Windows.Forms.Button @@ -1796,6 +2510,12 @@ Partial Class Icon_Manager 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 @@ -1896,6 +2616,66 @@ Partial Class Icon_Manager 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 diff --git a/Icon Manager.resx b/ShiftOS/Icon Manager.resx index ff4c820..ff4c820 100644 --- a/Icon Manager.resx +++ b/ShiftOS/Icon Manager.resx diff --git a/Icon Manager.vb b/ShiftOS/Icon Manager.vb index 5e877e7..b1c1df7 100644 --- a/Icon Manager.vb +++ b/ShiftOS/Icon Manager.vb @@ -4,8 +4,9 @@ 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 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 @@ -14,21 +15,27 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + 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.pnlpanelbuttonclock.SendToBack() 'modfiy to proper name + ShiftOSDesktop.pnlpanelbuttoniconmanager.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoniconmanager, ShiftOSDesktop.tbiconmanagericon, ShiftOSDesktop.tbiconmanagertext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub - loadsettings() + 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 @@ -95,80 +102,74 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If + 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 ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -182,63 +183,61 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.iconmanagername 'Remember to change to name of program!!!! + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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) @@ -264,29 +263,29 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -306,87 +305,50 @@ resettitlebar() End Sub - 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() + 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 - End Sub - Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -398,6 +360,7 @@ End Sub 'end of general setup +#End Region Private Function GetImage(ByVal fileName As String) As Bitmap Dim ret As Bitmap @@ -497,6 +460,54 @@ 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 @@ -520,11 +531,24 @@ 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.setupalltitlebars() + 'ShiftOSDesktop.setuppanelbuttons() ShiftOSDesktop.setupdesktop() needtosetupdesktop = False End If @@ -624,31 +648,78 @@ 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.setupalltitlebars() ShiftOSDesktop.setuppanelbuttons() ShiftOSDesktop.setupdesktop() If Name_Changer.Visible = True Then Name_Changer.loadicons() - While My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Icons") + While My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Try - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Icons") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Icons", FileIO.DeleteDirectoryOption.DeleteAllContents) + 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("C:\ShiftOS\Shiftum42\Icons") + My.Computer.FileSystem.CreateDirectory(ShiftOSPath + "Shiftum42\Icons") savelines(0) = ShiftOSDesktop.titlebariconsize savelines(1) = ShiftOSDesktop.panelbuttoniconsize savelines(2) = ShiftOSDesktop.launchericonsize - IO.File.WriteAllLines("C:\ShiftOS\Shiftum42\Icons\icondata.dat", savelines) + 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, pnllaunchershutdownicon.MouseClick + 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" @@ -700,6 +771,20 @@ 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 @@ -722,6 +807,20 @@ 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 @@ -744,10 +843,23 @@ 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.setupalltitlebars() ShiftOSDesktop.setuppanelbuttons() ShiftOSDesktop.setupdesktop() @@ -1019,11 +1131,59 @@ 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("C:\ShiftOS\Shiftum42\Icons\" & panel.Name.Substring(3) & ".pic", Imaging.ImageFormat.Png) + 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 diff --git a/Web Browser.Designer.vb b/ShiftOS/Installer.Designer.vb index 6c0575f..a65b473 100644 --- a/Web Browser.Designer.vb +++ b/ShiftOS/Installer.Designer.vb @@ -1,5 +1,5 @@ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ -Partial Class Web_Browser +Partial Class Installer Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. @@ -23,11 +23,13 @@ Partial Class Web_Browser <System.Diagnostics.DebuggerStepThrough()> _ 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() @@ -37,22 +39,20 @@ Partial Class Web_Browser Me.pgtoprcorner = New System.Windows.Forms.Panel() Me.pgbottomlcorner = New System.Windows.Forms.Panel() Me.pgcontents = New System.Windows.Forms.Panel() - Me.webwindow = New System.Windows.Forms.WebBrowser() - 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.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.pnlicon = New System.Windows.Forms.PictureBox() + 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.Panel1.SuspendLayout() Me.pgleft.SuspendLayout() Me.titlebar.SuspendLayout() - CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'pullside @@ -67,9 +67,9 @@ Partial Class Web_Browser ' 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.Location = New System.Drawing.Point(2, 259) Me.pgbottom.Name = "pgbottom" - Me.pgbottom.Size = New System.Drawing.Size(796, 2) + Me.pgbottom.Size = New System.Drawing.Size(580, 2) Me.pgbottom.TabIndex = 23 ' 'pullbottom @@ -84,6 +84,17 @@ Partial Class Web_Browser 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 @@ -96,7 +107,7 @@ Partial Class Web_Browser ' 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.Location = New System.Drawing.Point(0, 229) Me.pgbottomrcorner.Name = "pgbottomrcorner" Me.pgbottomrcorner.Size = New System.Drawing.Size(2, 2) Me.pgbottomrcorner.TabIndex = 15 @@ -106,9 +117,9 @@ Partial Class Web_Browser 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.Location = New System.Drawing.Point(582, 30) Me.pgright.Name = "pgright" - Me.pgright.Size = New System.Drawing.Size(2, 570) + Me.pgright.Size = New System.Drawing.Size(2, 231) Me.pgright.TabIndex = 22 ' 'closebutton @@ -123,12 +134,12 @@ Partial Class Web_Browser ' 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.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(130, 18) + Me.lbtitletext.Size = New System.Drawing.Size(77, 18) Me.lbtitletext.TabIndex = 19 - Me.lbtitletext.Text = "Web Browser" + Me.lbtitletext.Text = "Template" ' 'pgtoplcorner ' @@ -143,7 +154,7 @@ Partial Class Web_Browser ' 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.Location = New System.Drawing.Point(582, 0) Me.pgtoprcorner.Name = "pgtoprcorner" Me.pgtoprcorner.Size = New System.Drawing.Size(2, 30) Me.pgtoprcorner.TabIndex = 16 @@ -152,7 +163,7 @@ Partial Class Web_Browser ' 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.Location = New System.Drawing.Point(0, 229) Me.pgbottomlcorner.Name = "pgbottomlcorner" Me.pgbottomlcorner.Size = New System.Drawing.Size(2, 2) Me.pgbottomlcorner.TabIndex = 14 @@ -160,95 +171,73 @@ Partial Class Web_Browser 'pgcontents ' Me.pgcontents.BackColor = System.Drawing.Color.White - Me.pgcontents.Controls.Add(Me.webwindow) - Me.pgcontents.Controls.Add(Me.Panel1) + 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(796, 568) + Me.pgcontents.Size = New System.Drawing.Size(582, 231) Me.pgcontents.TabIndex = 20 ' - 'webwindow - ' - Me.webwindow.Dock = System.Windows.Forms.DockStyle.Fill - Me.webwindow.Location = New System.Drawing.Point(0, 35) - Me.webwindow.MinimumSize = New System.Drawing.Size(20, 20) - Me.webwindow.Name = "webwindow" - Me.webwindow.ScriptErrorsSuppressed = True - Me.webwindow.Size = New System.Drawing.Size(796, 533) - Me.webwindow.TabIndex = 1 - ' - '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(796, 35) - 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(761, 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) _ + '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.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(684, 25) - Me.txtlocation.TabIndex = 9 - ' - '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, 34) - Me.Panel2.Name = "Panel2" - Me.Panel2.Size = New System.Drawing.Size(796, 1) - Me.Panel2.TabIndex = 6 + 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 ' @@ -257,7 +246,7 @@ Partial Class Web_Browser 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.Size = New System.Drawing.Size(2, 231) Me.pgleft.TabIndex = 21 ' 'titlebar @@ -274,44 +263,51 @@ Partial Class Web_Browser 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.Size = New System.Drawing.Size(584, 30) Me.titlebar.TabIndex = 19 ' - 'pnlicon + 'tmrprogress ' - 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 ' - 'Web_Browser + '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(800, 600) - Me.Controls.Add(Me.pgcontents) + 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.MinimumSize = New System.Drawing.Size(300, 200) - Me.Name = "Web_Browser" - Me.Text = "Web_Browser" + 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.Panel1.ResumeLayout(False) - Me.Panel1.PerformLayout() + 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 @@ -332,11 +328,11 @@ Partial Class Web_Browser 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 webwindow As System.Windows.Forms.WebBrowser - 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 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 @@ +<?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="lblinfotext.Text" xml:space="preserve"> + <value>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.</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/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/Knowledge Input.Designer.vb b/ShiftOS/Knowledge Input.Designer.vb index 1e4abec..350c238 100644 --- a/Knowledge Input.Designer.vb +++ b/ShiftOS/Knowledge Input.Designer.vb @@ -57,6 +57,7 @@ Partial Class Knowledge_Input 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() @@ -91,10 +92,9 @@ Partial Class Knowledge_Input Me.pnlintro.Controls.Add(Me.Label3) Me.pnlintro.Controls.Add(Me.Label2) Me.pnlintro.Controls.Add(Me.Label1) - Me.pnlintro.Dock = System.Windows.Forms.DockStyle.Right - Me.pnlintro.Location = New System.Drawing.Point(191, 0) + Me.pnlintro.Location = New System.Drawing.Point(190, 0) Me.pnlintro.Name = "pnlintro" - Me.pnlintro.Size = New System.Drawing.Size(478, 272) + Me.pnlintro.Size = New System.Drawing.Size(479, 272) Me.pnlintro.TabIndex = 1 ' 'pnlcategorydisplay @@ -113,7 +113,7 @@ Partial Class Knowledge_Input 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(478, 272) + Me.pnlcategorydisplay.Size = New System.Drawing.Size(479, 272) Me.pnlcategorydisplay.TabIndex = 2 ' 'lblnextreward @@ -131,7 +131,7 @@ Partial Class Knowledge_Input ' Me.guessbox.BackColor = System.Drawing.Color.White Me.guessbox.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.guessbox.Font = New System.Drawing.Font("Century", 24.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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 @@ -143,7 +143,7 @@ Partial Class Knowledge_Input ' 'lblcurrentlevel ' - Me.lblcurrentlevel.Font = New System.Drawing.Font("Gill Sans Ultra Bold", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -277,7 +277,7 @@ Partial Class Knowledge_Input 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(131, 29) + Me.Label6.Size = New System.Drawing.Size(130, 28) Me.Label6.TabIndex = 8 Me.Label6.Text = "Categories" ' @@ -350,10 +350,10 @@ Partial Class Knowledge_Input ' 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.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(170, 18) + Me.lbtitletext.Size = New System.Drawing.Size(131, 18) Me.lbtitletext.TabIndex = 18 Me.lbtitletext.Text = "Knowledge Input" ' @@ -422,6 +422,10 @@ Partial Class Knowledge_Input 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!) @@ -485,4 +489,5 @@ Partial Class Knowledge_Input 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/Knowledge Input.resx b/ShiftOS/Knowledge Input.resx index 20a37bf..c1ab29a 100644 --- a/Knowledge Input.resx +++ b/ShiftOS/Knowledge Input.resx @@ -128,4 +128,7 @@ be rewarded with an increasing number of code points.</value> <metadata name="decider.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <value>106, 17</value> </metadata> + <metadata name="tmrstoryline.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>259, 13</value> + </metadata> </root>
\ No newline at end of file diff --git a/Knowledge Input.vb b/ShiftOS/Knowledge Input.vb index 7436088..f50f635 100644 --- a/Knowledge Input.vb +++ b/ShiftOS/Knowledge Input.vb @@ -6,6 +6,7 @@ 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 @@ -19,57 +20,43 @@ Dim animalslist(226) As String Dim fruitslist(75) As String - Dim countrieslist(232) As String + Dim countrieslist(204) As String Dim carbrandslist(328) As String Dim gameconsoleslist(124) As String Dim elementslist(117) As String - Private Sub Knowledge_Input_Load(sender As Object, e As EventArgs) Handles MyBase.Load +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - pnlcategorydisplay.Hide() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - - ShiftOSDesktop.pnlpanelbuttonknowledgeinput.SendToBack() - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonknowledgeinput, ShiftOSDesktop.tbknowledgeinputicon, ShiftOSDesktop.tbknowledgeinputtext, True) - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + setupall() - level = 1 - tillnextlevel = 10 + pnlintro.Show() + pnlintro.BringToFront() + pnlcategorydisplay.Hide() makeanimallist() - makefruitlist() - makecountrieslist() makecarbrandslist() - makegameconsoleslist() + makecountrieslist() makeelementslist() + makefruitlist() + makegameconsoleslist() + If ShiftOSDesktop.KnowledgeInputCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - 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.boughtgray4 = True And ShiftOSDesktop.boughtshiftnet = False Then tmrstoryline.Start() - If ShiftOSDesktop.boughtkielements = True Then - If ListBox1.Items.Contains("Elements") Then - Else - ListBox1.Items.Add("Elements") - End If - End If + 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 @@ -85,27 +72,21 @@ If e.KeyCode = Keys.A AndAlso e.Control Then e.Handled = True Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) - e.SuppressKeyPress = True 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) - e.SuppressKeyPress = True 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) - e.SuppressKeyPress = True 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) - e.SuppressKeyPress = True 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 @@ -142,155 +123,156 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth - Else - pgtoplcorner.Hide() - pgtoprcorner.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.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.knowledgeinputname - lbtitletext.Show() - 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.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 = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.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 = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.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 - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - 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.boughtknowledgeinputicon = True Then - pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + '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 + pnlicon.Image = ShiftOSDesktop.knowledgeinputicontitlebar 'Replace with the correct icon for the program. + End If End Sub @@ -311,27 +293,100 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -343,6 +398,7 @@ 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() @@ -373,31 +429,26 @@ 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, "C:\ShiftOS\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) + 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, "C:\ShiftOS\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) + 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, "C:\ShiftOS\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) + 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, "C:\ShiftOS\SoftwareData\KnowledgeInput\Car Brands.lst", "Can you list every single car brand?" & Environment.NewLine _ - & "Don't use words like automobiles, motors or cars!", carbrandslist) + 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, "C:\ShiftOS\SoftwareData\KnowledgeInput\Game Consoles.lst", "Do you call yourself a gamer?" & Environment.NewLine _ - & "Earn that title by listing non-handheld game consoles!", gameconsoleslist) + 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, "C:\ShiftOS\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) + 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 @@ -406,17 +457,17 @@ Select Case ListBox1.SelectedItem.ToString Case "Animals" - handlewordtype(animalslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Animals.lst") + handlewordtype(animalslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Animals.lst") Case "Fruits" - handlewordtype(fruitslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Fruits.lst") + handlewordtype(fruitslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Fruits.lst") Case "Countries" - handlewordtype(countrieslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Countries.lst") + handlewordtype(countrieslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Countries.lst") Case "Car Brands" - handlewordtype(carbrandslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Car Brands.lst") + handlewordtype(carbrandslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Car Brands.lst") Case "Game Consoles" - handlewordtype(gameconsoleslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Game Consoles.lst") + handlewordtype(gameconsoleslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Game Consoles.lst") Case "Elements" - handlewordtype(elementslist, "C:\ShiftOS\SoftwareData\KnowledgeInput\Elements.lst") + handlewordtype(elementslist, ShiftOSDesktop.ShiftOSPath + "SoftwareData\KnowledgeInput\Elements.lst") End Select guessbox.Text = "" @@ -532,6 +583,27 @@ 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" @@ -841,240 +913,207 @@ fruitslist(75) = "ugli fruit" End Sub - Private Sub makecountrieslist() + 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) = "american samoa" + countrieslist(3) = "antigua and barbuda" countrieslist(4) = "andorra" countrieslist(5) = "angola" - countrieslist(6) = "anguilla" - countrieslist(7) = "antigua" countrieslist(8) = "argentina" countrieslist(9) = "armenia" - countrieslist(10) = "aruba" - countrieslist(11) = "australia" + countrieslist(10) = "australia" countrieslist(12) = "austria" - countrieslist(13) = "azerbaijan" - countrieslist(14) = "bahamas" - countrieslist(15) = "bahrain" - countrieslist(16) = "bangladesh" - countrieslist(17) = "barbados" - countrieslist(18) = "barbuda" + 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) = "bermuda" - countrieslist(24) = "bhutan" - countrieslist(25) = "bolivia" - countrieslist(26) = "bosnia" - countrieslist(27) = "botswana" - countrieslist(28) = "bouvet island" - countrieslist(29) = "brazil" - countrieslist(30) = "brunei" - countrieslist(31) = "bulgaria" - countrieslist(32) = "burkina faso" - countrieslist(33) = "burundi" - countrieslist(34) = "cambodia" - countrieslist(35) = "cameroon" - countrieslist(36) = "canada" - countrieslist(37) = "cape verde" - countrieslist(38) = "cayman islands" - countrieslist(39) = "central african republic" - countrieslist(40) = "chad" - countrieslist(41) = "chile" - countrieslist(42) = "china" - countrieslist(43) = "christmas island" - countrieslist(44) = "cocos islands" - countrieslist(45) = "colombia" - countrieslist(46) = "comoros" - countrieslist(47) = "democratic republic of the congo" - countrieslist(48) = "republic of congo" - countrieslist(49) = "cook islands" - countrieslist(50) = "costa rica" - countrieslist(51) = "croatia" - countrieslist(52) = "cuba" - countrieslist(53) = "cyprus" - countrieslist(54) = "czech republic" - countrieslist(55) = "denmark" - countrieslist(56) = "djibouti" - countrieslist(57) = "dominica" - countrieslist(58) = "dominican republic" - countrieslist(59) = "ecuador" - countrieslist(60) = "egypt" - countrieslist(61) = "el salvador" - countrieslist(62) = "equatorial guinea" - countrieslist(63) = "eritrea" - countrieslist(64) = "estonia" - countrieslist(65) = "ethiopia" - countrieslist(66) = "falkland islands" - countrieslist(67) = "faroe islands" - countrieslist(68) = "fiji" - countrieslist(69) = "finland" - countrieslist(70) = "france" - countrieslist(71) = "french guiana" - countrieslist(72) = "gabon" - countrieslist(73) = "gambia" - countrieslist(74) = "georgia" - countrieslist(75) = "germany" - countrieslist(76) = "ghana" - countrieslist(77) = "gibraltar" - countrieslist(78) = "greece" - countrieslist(79) = "greenland" - countrieslist(80) = "grenada" - countrieslist(81) = "guadeloupe" - countrieslist(82) = "guam" - countrieslist(83) = "guatemala" - countrieslist(84) = "guinea" - countrieslist(85) = "guinea bissau" - countrieslist(86) = "guyana" - countrieslist(87) = "haiti" - countrieslist(88) = "holy see" - countrieslist(89) = "honduras" - countrieslist(90) = "hong kong" - countrieslist(91) = "hungary" - countrieslist(92) = "iceland" - countrieslist(93) = "india" - countrieslist(94) = "indonesia" - countrieslist(95) = "iran" - countrieslist(96) = "iraq" - countrieslist(97) = "ireland" - countrieslist(98) = "israel" - countrieslist(99) = "italy" - countrieslist(100) = "ivory coas" - countrieslist(101) = "jamaica" - countrieslist(102) = "japan" - countrieslist(103) = "jordan" - countrieslist(104) = "kazakhstan" - countrieslist(105) = "kenya" - countrieslist(106) = "kiribati" - countrieslist(107) = "kuwait" - countrieslist(108) = "kyrgyzstan" - countrieslist(109) = "laos" - countrieslist(110) = "latvia" - countrieslist(111) = "lebanon" - countrieslist(112) = "lesotho" - countrieslist(113) = "liberia" - countrieslist(114) = "libya" - countrieslist(115) = "liechtenstein" - countrieslist(116) = "lithuania" - countrieslist(117) = "luxembourg" - countrieslist(118) = "macau" - countrieslist(119) = "macedonia" - countrieslist(120) = "madagascar" - countrieslist(121) = "malawi" - countrieslist(122) = "malaysia" - countrieslist(123) = "maldives" - countrieslist(124) = "mali" - countrieslist(125) = "malta" - countrieslist(126) = "marshall islands" - countrieslist(127) = "martinique" - countrieslist(128) = "mauritania" - countrieslist(129) = "mauritius" - countrieslist(130) = "mayotte" - countrieslist(131) = "mexico" - countrieslist(132) = "micronesia" - countrieslist(133) = "moldova" - countrieslist(134) = "monaco" - countrieslist(135) = "mongolia" - countrieslist(136) = "montenegro" - countrieslist(137) = "montserrat" - countrieslist(138) = "morocco" - countrieslist(139) = "mozambique" - countrieslist(140) = "myanmar" - countrieslist(141) = "namibia" - countrieslist(142) = "nauru" - countrieslist(143) = "nepal" - countrieslist(144) = "netherlands" - countrieslist(145) = "new caledonia" - countrieslist(146) = "new zealand" - countrieslist(147) = "nicaragua" - countrieslist(148) = "niger" - countrieslist(149) = "nigeria" - countrieslist(150) = "niue" - countrieslist(151) = "norfolk island" - countrieslist(152) = "north korea" - countrieslist(153) = "northern mariana islands" - countrieslist(154) = "norway" - countrieslist(155) = "oman" - countrieslist(156) = "pakistan" - countrieslist(157) = "palau" - countrieslist(158) = "panama" - countrieslist(159) = "papua new guinea" - countrieslist(160) = "paraguay" - countrieslist(161) = "peru" - countrieslist(162) = "philippines" - countrieslist(163) = "pitcairn island" - countrieslist(164) = "poland" - countrieslist(165) = "polynesia" - countrieslist(166) = "portugal" - countrieslist(167) = "puerto rico" - countrieslist(168) = "qatar" - countrieslist(169) = "reunion" - countrieslist(170) = "romania" - countrieslist(171) = "russia" - countrieslist(172) = "rwanda" - countrieslist(173) = "saint helena" - countrieslist(174) = "saint kitts and nevis" - countrieslist(175) = "saint lucia" - countrieslist(176) = "saint pierre and miquelon" - countrieslist(177) = "saint vincent and grenadines" - countrieslist(178) = "samoa" - countrieslist(179) = "san marino" - countrieslist(180) = "sao tome and principe" - countrieslist(181) = "saudi arabia" - countrieslist(182) = "senegal" - countrieslist(183) = "serbia" - countrieslist(184) = "seychelles" - countrieslist(185) = "sierra leone" - countrieslist(186) = "singapore" - countrieslist(187) = "slovakia" - countrieslist(188) = "slovenia" - countrieslist(189) = "solomon islands" - countrieslist(190) = "somalia" - countrieslist(191) = "south africa" - countrieslist(192) = "south georgia and south sandwich islands" - countrieslist(193) = "south korea" - countrieslist(194) = "south sudan" - countrieslist(195) = "spain" - countrieslist(196) = "sri lanka" - countrieslist(197) = "sudan" - countrieslist(198) = "suriname" - countrieslist(199) = "svalbard and jan mayen islands" - countrieslist(200) = "swaziland" - countrieslist(201) = "sweden" - countrieslist(202) = "switzerland" - countrieslist(203) = "syria" - countrieslist(204) = "taiwan" - countrieslist(205) = "tajikistan" - countrieslist(206) = "tanzania" - countrieslist(207) = "thailand" - countrieslist(208) = "east timor" - countrieslist(209) = "togo" - countrieslist(210) = "tokelau" - countrieslist(211) = "tonga" - countrieslist(212) = "trinidad and tobago" - countrieslist(213) = "tunisia" - countrieslist(214) = "turkey" - countrieslist(215) = "turkmenistan" - countrieslist(216) = "turks and caicos islands" - countrieslist(217) = "tuvalu" - countrieslist(218) = "uganda" - countrieslist(219) = "ukraine" - countrieslist(220) = "united arab emirates" - countrieslist(221) = "united kingdom" - countrieslist(222) = "united states" - countrieslist(223) = "uruguay" - countrieslist(224) = "uzbekistan" - countrieslist(225) = "vanuatu" - countrieslist(226) = "venezuela" - countrieslist(227) = "vietnam" - countrieslist(228) = "virgin islands" - countrieslist(229) = "wallis and futuna islands" - countrieslist(230) = "yemen" - countrieslist(231) = "zambia" - countrieslist(232) = "zimbabwe" + 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() @@ -1156,7 +1195,7 @@ carbrandslist(75) = "derby" carbrandslist(76) = "dina" carbrandslist(77) = "dkw" - carbrandslist(78) = "dodge" + carbrandslist(78) = "knowledgeinput" carbrandslist(79) = "dok-ing" carbrandslist(80) = "dok-ing xd" carbrandslist(81) = "dome" @@ -1658,5 +1697,4 @@ 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 @@ +<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ +Partial Class Labyrinth + 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(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 @@ +<?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>106, 17</value> + </metadata> + <metadata name="pullbs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>200, 17</value> + </metadata> + <metadata name="pullbottom.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>396, 17</value> + </metadata> + <data name="lblwelcometxt.Text" xml:space="preserve"> + <value>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.</value> + </data> + <metadata name="tmrtimeleft.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>284, 17</value> + </metadata> + <metadata name="tmrgametick.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <value>509, 17</value> + </metadata> +</root>
\ No newline at end of file diff --git a/ShiftOS/Labyrinth.vb b/ShiftOS/Labyrinth.vb new file mode 100644 index 0000000..2a4f732 --- /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 = "Follown' 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/Module1.vb b/ShiftOS/Module1.vb index 4d3166b..4d3166b 100644 --- a/Module1.vb +++ b/ShiftOS/Module1.vb diff --git a/My Project/Application.Designer.vb b/ShiftOS/My Project/Application.Designer.vb index 129d43f..8fd65ed 100644 --- a/My Project/Application.Designer.vb +++ b/ShiftOS/My Project/Application.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. -' Runtime Version:4.0.30319.17929 +' Runtime Version:4.0.30319.36323 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. @@ -23,7 +23,7 @@ Namespace My <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ Public Sub New() - MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.ApplicationDefined) Me.IsSingleInstance = true Me.EnableVisualStyles = true Me.SaveMySettingsOnExit = true diff --git a/My Project/Application.myapp b/ShiftOS/My Project/Application.myapp index 224b705..c69e73d 100644 --- a/My Project/Application.myapp +++ b/ShiftOS/My Project/Application.myapp @@ -5,6 +5,6 @@ <SingleInstance>true</SingleInstance> <ShutdownMode>1</ShutdownMode> <EnableVisualStyles>true</EnableVisualStyles> - <AuthenticationMode>0</AuthenticationMode> + <AuthenticationMode>1</AuthenticationMode> <SaveMySettingsOnExit>true</SaveMySettingsOnExit> </MyApplicationData>
\ No newline at end of file diff --git a/My Project/AssemblyInfo.vb b/ShiftOS/My Project/AssemblyInfo.vb index 3c5059d..d1a405b 100644 --- a/My Project/AssemblyInfo.vb +++ b/ShiftOS/My Project/AssemblyInfo.vb @@ -10,9 +10,9 @@ Imports System.Runtime.InteropServices <Assembly: AssemblyTitle("ShiftOS")> <Assembly: AssemblyDescription("Experience the thrills of evolving an experimental operating system named ShiftOS")> -<Assembly: AssemblyCompany("Philip Adams")> +<Assembly: AssemblyCompany("ShiftOS Community")> <Assembly: AssemblyProduct("ShiftOS")> -<Assembly: AssemblyCopyright("Copyright © 2014 Philip Adams")> +<Assembly: AssemblyCopyright("Copyright © 2015 ShiftOS Community Developers")> <Assembly: AssemblyTrademark("")> <Assembly: ComVisible(False)> @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' by using the '*' as shown below: ' <Assembly: AssemblyVersion("1.0.*")> -<Assembly: AssemblyVersion("0.0.7.0")> -<Assembly: AssemblyFileVersion("0.0.7.0")> +<Assembly: AssemblyVersion("0.0.8.0")> +<Assembly: AssemblyFileVersion("0.0.8.0")> diff --git a/My Project/Resources.Designer.vb b/ShiftOS/My Project/Resources.Designer.vb index 6621abd..301255a 100644 --- a/My Project/Resources.Designer.vb +++ b/ShiftOS/My Project/Resources.Designer.vb @@ -1,7 +1,7 @@ '------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. -' Runtime Version:4.0.30319.17929 +' Runtime Version:4.0.30319.34014 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. @@ -132,6 +132,26 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property appscapedepositnowbutton() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("appscapedepositnowbutton", resourceCulture) @@ -232,6 +252,26 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property appscapeinfovideoplayertext() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("appscapeinfovideoplayertext", resourceCulture) @@ -282,6 +322,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property appscapetitlebanner() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("appscapetitlebanner", resourceCulture) @@ -580,6 +630,76 @@ Namespace My.Resources End Property '''<summary> + ''' Looks up a localized resource of type System.Byte[]. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property centrebutton() As System.Drawing.Bitmap @@ -602,6 +722,56 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property deletefile() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("deletefile", resourceCulture) @@ -620,6 +790,19 @@ Namespace My.Resources End Property '''<summary> + ''' 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]";. + '''</summary> + Friend ReadOnly Property DesktopPlusPlusAbout() As String + Get + Return ResourceManager.GetString("DesktopPlusPlusAbout", resourceCulture) + End Get + End Property + + '''<summary> ''' Looks up a localized resource of type System.IO.UnmanagedMemoryStream similar to System.IO.MemoryStream. '''</summary> Friend ReadOnly Property dial_up_modem_02() As System.IO.UnmanagedMemoryStream @@ -631,6 +814,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property downarrow() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("downarrow", resourceCulture) @@ -641,6 +834,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconArtpad() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconArtpad", resourceCulture) @@ -711,6 +914,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconDownloader() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconDownloader", resourceCulture) @@ -721,6 +934,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconFileOpener() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconFileOpener", resourceCulture) @@ -751,6 +974,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconGraphicPicker() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconGraphicPicker", resourceCulture) @@ -781,6 +1014,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconKnowledgeInput() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconKnowledgeInput", resourceCulture) @@ -791,6 +1034,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconNameChanger() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconNameChanger", resourceCulture) @@ -801,6 +1054,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconPong() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconPong", resourceCulture) @@ -871,6 +1134,26 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconTerminal() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconTerminal", resourceCulture) @@ -891,6 +1174,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconVideoPlayer() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconVideoPlayer", resourceCulture) @@ -901,6 +1194,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property iconWebBrowser() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("iconWebBrowser", resourceCulture) @@ -918,6 +1221,26 @@ Namespace My.Resources End Property '''<summary> + ''' Looks up a localized resource of type System.Byte[]. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Byte[]. + '''</summary> + Friend ReadOnly Property license() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("license", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property loadbutton() As System.Drawing.Bitmap @@ -930,6 +1253,36 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property newfolder() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("newfolder", resourceCulture) @@ -1068,6 +1421,76 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property skindownarrow() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("skindownarrow", resourceCulture) @@ -1086,6 +1509,26 @@ Namespace My.Resources End Property '''<summary> + ''' Looks up a localized resource of type System.Byte[]. + '''</summary> + Friend ReadOnly Property skinIndustrial() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("skinIndustrial", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + '''<summary> + ''' Looks up a localized resource of type System.Byte[]. + '''</summary> + Friend ReadOnly Property skinLinuxMint7() As Byte() + Get + Dim obj As Object = ResourceManager.GetObject("skinLinuxMint7", resourceCulture) + Return CType(obj,Byte()) + End Get + End Property + + '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> Friend ReadOnly Property skinuparrow() As System.Drawing.Bitmap @@ -1098,6 +1541,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property stopbutton() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("stopbutton", resourceCulture) @@ -1307,6 +1760,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradeamandpm() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradeamandpm", resourceCulture) @@ -2007,6 +2470,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradeinfoboxicon() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradeinfoboxicon", resourceCulture) @@ -2157,6 +2630,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradepanelbuttons() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradepanelbuttons", resourceCulture) @@ -2307,6 +2790,56 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgraderollupbutton() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgraderollupbutton", resourceCulture) @@ -2417,6 +2950,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradeshiftoriumicon() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradeshiftoriumicon", resourceCulture) @@ -2507,6 +3050,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradeterminalicon() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradeterminalicon", resourceCulture) @@ -2597,6 +3150,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradeunitymode() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradeunitymode", resourceCulture) @@ -2617,6 +3180,16 @@ Namespace My.Resources '''<summary> ''' Looks up a localized resource of type System.Drawing.Bitmap. '''</summary> + 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 + + '''<summary> + ''' Looks up a localized resource of type System.Drawing.Bitmap. + '''</summary> Friend ReadOnly Property upgradewindowborders() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("upgradewindowborders", resourceCulture) diff --git a/My Project/Resources.resx b/ShiftOS/My Project/Resources.resx index 8d5ea2d..bcc0d7f 100644 --- a/My Project/Resources.resx +++ b/ShiftOS/My Project/Resources.resx @@ -118,811 +118,982 @@ <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </resheader> <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> - <data name="dial_up_modem_02" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\dial-up-modem-02.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="upgrademinimizecommand" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademinimizecommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="Symbolinfo" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\Symbolinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="writesound" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\writesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="test" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\test.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfobackbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfobackbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="typesound" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\typesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="upgradepinkcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepinkcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealshiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealshiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradewindowborders" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradewindowborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeamandpm" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeamandpm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="saveicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\saveicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeanycolourshade" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\anycolourshade.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadredo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeanycolourshade2" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\anycolourshade2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradedraggablewindows" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradedraggablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeanycolourshade3" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\anycolourshade3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradebrown" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradebrown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeanycolourshade4" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\anycolourshade4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegreenshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegreenshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeapplaunchermenu" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeapplaunchermenu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradebrowncustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradebrowncustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeapplaunchershutdown" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeapplaunchershutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealfileskimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealfileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradepinkshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepinkshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="bitnotewalletpreviewscreenshot" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\bitnotewalletpreviewscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="bitnoteswebsidepnl" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\bitnoteswebsidepnl.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapedownloadbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapedownloadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="loadbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\loadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconSnakey" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconSnakey.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeartpadovaltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadovaltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradeautoscrollterminal" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradeautoscrollterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeblue" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeblue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradebluecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradebluecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradekiaddons" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradekiaddons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeblueshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeblueshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconfloodgate" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconfloodgate.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradeblueshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradeblueshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradebrown" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradebrown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradebrowncustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradebrowncustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradebrownshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradebrownshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradebrownshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradebrownshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="typesound" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\typesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="upgradeclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeterminalicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeterminalicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeclosebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeclosebutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="nextbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\nextbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradecustomusername" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradecustomusername.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadrectangletool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadrectangletool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradedesktoppanel" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradedesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepurplecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepurplecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradedesktoppanelclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradedesktoppanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadpixelsetter" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\pixelsetter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradedraggablewindows" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradedraggablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit16384" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit16384.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegray" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeundefinedprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeundefinedprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegraycustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegraycustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="transactionsClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\transactionsClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegrayshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegrayshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradedesktoppanel" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradedesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegrayshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegrayshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="bitnotewebsitetitle" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\bitnotewebsitetitle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegreen" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegreen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradebluecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradebluecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegreencustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegreencustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfobutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfobutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegreenshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegreenshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradecolourpickericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradecolourpickericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradegreenshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradegreenshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapetitlebanner" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapetitlebanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradehoursssincemidnight" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradehoursssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconDownloader" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconDownloader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradekiaddons" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradekiaddons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfobuybutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfobuybutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeknowledgeinput" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeknowledgeinput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradesgameconsoles" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradesgameconsoles.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademinuteaccuracytime" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademinuteaccuracytime.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapewebbrowser" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapewebbrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademinutesssincemidnight" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademinutesssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="pausebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\pausebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademoveablewindows" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademoveablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconArtpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconArtpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademultitasking" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademultitasking.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconShiftnet" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconShiftnet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradeorange" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradeorange.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeorangecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeorangecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradeorangeshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeorangeshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="infobox" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\infobox.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="upgradeorangeshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeorangeshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfoaudioplayertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfoaudioplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepink" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit4096" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit4096.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepinkcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepinkcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit64" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit64.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepinkshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepinkshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad8colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad8colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepinkshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepinkshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ReceiveUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Receive.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepurple" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepurple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradetextpadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetextpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepurplecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepurplecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="stopbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\stopbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepurpleshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepurpleshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegrayshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegrayshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepurpleshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepurpleshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad16colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad16colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradered" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradered.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit16" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgraderedcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgraderedcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="webforward" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\webforward.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgraderedshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgraderedshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconshutdown" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconshutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgraderedshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgraderedshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeanycolourshade4" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\anycolourshade4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradesecondssincemidnight" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradesecondssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradesgameconsoles" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradesgameconsoles.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradeskicarbrands" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeskicarbrands.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradesplitsecondaccuracy" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradesplitsecondaccuracy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradeterminalscrollbar" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeterminalscrollbar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradetitlebar" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="upgradetitletext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshutdownicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshutdownicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradewindowborders" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradewindowborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeknowledgeinput" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeknowledgeinput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradewindowedterminal" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradewindowedterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradefileskimmerdelete" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradefileskimmerdelete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradewindowsanywhere" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradewindowsanywhere.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeyellow" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeyellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeskinning" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeskinning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeyellowcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeyellowcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegreen" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegreen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeyellowshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeyellowshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeaudioplayerpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeaudioplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeyellowshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeyellowshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftdesktoppanel" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftdesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="writesound" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\writesound.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="upgradefileskimmernew" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradefileskimmernew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="infobox" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\infobox.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="upgradeartpadpixellimit256" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit256.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="rolldown" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\rolldown.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="upgradeinfoboxicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeinfoboxicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="rollup" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\rollup.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="appscapeinfocalculatorvisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfocalculatorvisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealshifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfowebbrowsertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfowebbrowsertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgraderollupbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgraderollupbutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeknowledgeinputicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeknowledgeinputicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgraderollupcommand" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgraderollupcommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="SendClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\SendClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftapplauncher" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftapplauncher.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftborders" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadpixelplacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeyellowshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeyellowshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftdesktop" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftdesktop.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftdesktoppanel" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftdesktoppanel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="rolldown" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\rolldown.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="upgradeshifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="deletefolder" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\deletefolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftpanelclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftpanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad32colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad32colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshifttitlebar" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshifttitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealpong" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealpong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshifttitletext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshifttitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="skinuparrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\skinuparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconClock" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconClock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad128colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad128colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconKnowledgeInput" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconKnowledgeInput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconAudioPlayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconAudioPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconPong" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconPong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="newfolder" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\newfolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconShifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconTextPad" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconTextPad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconShiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconShiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeyellow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeyellow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconTerminal" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconTerminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad64colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad64colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="newicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\newicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeanycolourshade" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\anycolourshade.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="openicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\openicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeskicarbrands" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeskicarbrands.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="saveicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\saveicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadtexttool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="deletefile" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\deletefile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgrademinutesssincemidnight" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademinutesssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="downarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\downarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad4colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad4colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="newfolder" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\newfolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegraycustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegraycustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="uparrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\uparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeorangecustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeorangecustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="deletefolder" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\deletefolder.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconFileSkimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconFileSkimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeyellowshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeyellowshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconshutdown" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconshutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconTextPad" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconTextPad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapevideoplayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapevideoplayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="iconColourPicker" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\iconColourPicker.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> + <data name="upgraderedshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderedshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderedcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderedcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> <data name="iconFileOpener" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\iconFileOpener.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconFileSaver" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconFileSaver.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="stretchbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\stretchbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconInfoBox" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconInfoBox.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="openicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\openicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealfileskimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealfileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradehoursssincemidnight" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradehoursssincemidnight.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealpong" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealpong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadsquarerubber" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadsquarerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradepong" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradealtextpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradealtextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeclockicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeclockicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit1024" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit1024.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradecolourpickericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradecolourpickericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradebrownshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradebrownshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradefileskimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradefileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadOval" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadOval.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradefileskimmerdelete" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradefileskimmerdelete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeorangeshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeorangeshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradefileskimmericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradefileskimmericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadfloodfill" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadfloodfill.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradefileskimmernew" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradefileskimmernew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradered" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradered.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeinfoboxicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeinfoboxicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="dial_up_modem_02" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\dial-up-modem-02.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="upgradekielements" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradekielements.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfovideoplayervisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfovideoplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeknowledgeinputicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeknowledgeinputicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="webback" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\webback.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepong" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="skinfile" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\skinfile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepongicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepongicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconinstaller" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\installericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapedepositbitnotewalletscreenshot" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapedepositbitnotewalletscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshiftoriumicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshiftoriumicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgrademinimizebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademinimizebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeshutdownicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeshutdownicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfowebbrowservisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfowebbrowservisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeterminalicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeterminalicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconorcwrite" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradetextpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadcirclerubber" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadcirclerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradetextpadicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetextpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapemoresoftware" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapemoresoftware.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradetextpadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetextpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfoaudioplayervisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfoaudioplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradetextpadopen" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetextpadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadtexttool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradetextpadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradetextpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradetitletext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconGraphicPicker" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\icongraphicpicker.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeapplaunchermenu" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeapplaunchermenu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="centrebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\centrebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconShifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="centrebuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\centrebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="stretchbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\stretchbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadpencil" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadpencil.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradegreencustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegreencustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapevideoplayerprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapevideoplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="TotalBalanceClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\TotalBalanceClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="stretchbuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\stretchbuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="tilebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\tilebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftborders" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftborders.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="tilebuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\tilebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadfilltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadfilltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="zoombutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\zoombutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepurpleshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepurpleshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="zoombuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\zoombuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepurpleshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepurpleshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadpixelsetter" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\pixelsetter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="deletefile" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\deletefile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconArtpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconArtpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixelplacermovementmode" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixelplacermovementmode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadmagnify" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadmagnify.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadlimitlesspixels" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadlimitlesspixels.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="SendUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Send.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadopen" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeaudioplayerprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeaudioplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadpencil" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadpencil.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconBitnoteWallet" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconBitnoteWallet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadpixelplacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeblueshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeblueshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadredo" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadopen" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgrademultitasking" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademultitasking.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadundo" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegrayshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegrayshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadfloodfill" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadfloodfill.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradewindowedterminal" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradewindowedterminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadOval" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadOval.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradebrownshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradebrownshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadRectangle" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadRectangle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit4" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="ArtPaderacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPaderacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="ArtPadcirclerubberselected" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\ArtPadcirclerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPaderacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPaderacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadundo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadsquarerubber" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadsquarerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadsquarerubberselected" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadsquarerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="rollup" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\rollup.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="ArtPadlinetool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconVideoPlayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconVideoPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadpaintbrush" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadpaintbrush.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="snakeyback" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\snakeyback.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadtexttool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeclosebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeclosebutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="updatecustomcolourpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\updatecustomcolourpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegray" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradealartpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradealartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="Symbolinfo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Symbolinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgraderollupcommand" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderollupcommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad128colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad128colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconInfoBox" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconInfoBox.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad16colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad16colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshifttitletext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshifttitletext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad32colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad32colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeaudioplayerbox" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeaudioplayerbox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad4colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad4colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconKnowledgeInput" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconKnowledgeInput.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad64colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad64colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadload" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpad8colorpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpad8colorpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealshiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealshiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpaderaser" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpaderaser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconNameChanger" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconNameChanger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadfilltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadfilltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="playbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\playbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixellimit65536" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit65536.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadlimitlesspixels" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadlimitlesspixels.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeorangeshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeorangeshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="tilebuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\tilebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradeartpadlinetool" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradeartpadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadload" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfocalculatortext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfocalculatortext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="centrebuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\centrebuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadovaltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadovaltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepongicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepongicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpaintbrushtool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpaintbrushtool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeclockicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeclockicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpenciltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpenciltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeusefulpanelbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeusefulpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit1024" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit1024.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadredo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit16" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeblue" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeblue.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit16384" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit16384.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="dodge" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\dodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit256" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit256.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapedepositnowbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapedepositnowbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit4" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealshifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealshifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit4096" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit4096.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapevideoplayerpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapevideoplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit64" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit64.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="test" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\test.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit65536" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit65536.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgrademoveablewindows" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademoveablewindows.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixellimit8" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixellimit8.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="webhome" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\webhome.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixelplacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradefileskimmericon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradefileskimmericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadpixelplacermovementmode" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadpixelplacermovementmode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadpaintbrush" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadpaintbrush.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadrectangletool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadrectangletool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfobuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfobuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadredo" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadredo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="icondownloadmanager" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\downloadmanagericon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapedepositinfo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapedepositinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadtexttool" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadtexttool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradedesktoppanelclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradedesktoppanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeartpadundo" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeartpadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="BitnotesAcceptedHereLogo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\BitnotesAcceptedHereLogo.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademinimizebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademinimizebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconunitytoggle" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconunitytoggle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradepanelbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradepanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeartpadpixellimit8" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixellimit8.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapewelcometoappscape" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapewelcometoappscape.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="ArtPadundo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadundo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapeundefinedpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeundefinedpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="upgradeshiftpanelbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\upgradeshiftpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeskinning" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeskinning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconIconManager" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconIconManager.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeunitymode" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="downarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\downarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgradeusefulpanelbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgradeusefulpanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadsquarerubberselected" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadsquarerubberselected.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="upgrademinimizecommand" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\upgrademinimizecommand.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="previousbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\previousbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconSkinLoader" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconSkinLoader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="centrebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\centrebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="skinfile" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\skinfile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapeinfovideoplayertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfovideoplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="loadbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\loadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpixelplacer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpixelplacer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="nextbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\nextbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconDodge" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconDodge.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="playbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\playbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadlinetool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadlinetool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="previousbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\previousbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeapplaunchershutdown" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeapplaunchershutdown.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="stopbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\stopbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconSkinShifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconSkinShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="webback" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\webback.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapecalculator" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapecalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="webforward" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\webforward.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpaderaser" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpaderaser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="webhome" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\webhome.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapewebbrowserpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapewebbrowserpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="pausebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\pausebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="newicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\newicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconAudioPlayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconAudioPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpenciltool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpenciltool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconCalculator" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconCalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradetextpadsave" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetextpadsave.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconNameChanger" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconNameChanger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="appscapecalculatorprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapecalculatorprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconVideoPlayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconVideoPlayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeanycolourshade3" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\anycolourshade3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderollupbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderollupbutton.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconTerminal" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconTerminal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconSkinLoader" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconSkinLoader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconClock" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconClock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="iconWebBrowser" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\iconWebBrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconIconManager" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconIconManager.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="TotalBalanceUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\TotalBalanceUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="_3beepvirus" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\3beepvirus.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + <data name="skindownarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\skindownarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeshiftpanelclock" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftpanelclock.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="iconBitnoteDigger" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\iconBitnoteDigger.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconBitnoteWallet" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconBitnoteWallet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconFileSaver" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconFileSaver.fw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ReceiveClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ReceiveClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconvirusscanner" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconvirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ReceiveUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\Receive.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftapplauncher" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftapplauncher.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="SendClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\SendClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradefileskimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradefileskimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="SendUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\Send.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradetitlebar" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="TotalBalanceClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\TotalBalanceClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeamandpm" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeamandpm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="TotalBalanceUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\TotalBalanceUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshiftdesktop" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftdesktop.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="transactionsClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\transactionsClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadpaintbrushtool" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadpaintbrushtool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgrademinuteaccuracytime" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgrademinuteaccuracytime.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradecustomusername" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradecustomusername.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconPong" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconPong.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="bitnotewalletdownload" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\bitnotewalletdownload.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="ArtPadRectangle" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadRectangle.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradetextpadicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetextpadicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeunitymode" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="iconSysinfo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconSysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="bitnotediggergradetable" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\bitnotediggergradetable.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeshiftoriumicon" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftoriumicon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="transactionsUnclicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\transactionsUnclicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconSkinShifter" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconSkinShifter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> - </data> - <data name="skindownarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\skindownarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconShiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconShiftorium.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="skinuparrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\skinuparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeanycolourshade2" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\anycolourshade2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="ArtPadcirclerubber" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\ArtPadcirclerubber.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradegreenshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradegreenshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconDownloader" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconDownloader.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgraderedshades" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderedshades.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="iconShiftnet" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\iconShiftnet.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradetextpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetextpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeaudioplayerbox" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeaudioplayerbox.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="_3beepvirus" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\3beepvirus.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> </data> - <data name="appscapeaudioplayerprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeaudioplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="minimatchdodgepreviewimage" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\minimatchdodgepreviewimage.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapecalculator" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapecalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeshifttitlebar" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshifttitlebar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapecalculatorprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapecalculatorprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradesplitsecondaccuracy" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradesplitsecondaccuracy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapedepositnowbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapedepositnowbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepanelbuttons" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepanelbuttons.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapedownloadbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapedownloadbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconGraphicPicker" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\icongraphicpicker.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfobutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfobutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="Minimatchbackground" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Minimatchbackground.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapemoresoftware" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapemoresoftware.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradekielements" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradekielements.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapetitlebanner" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapetitlebanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="zoombutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\zoombutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeundefinedprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeundefinedprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeyellowcustom" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeyellowcustom.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapevideoplayer" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapevideoplayer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepurple" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepurple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapevideoplayerprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapevideoplayerprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="zoombuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\zoombuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapewebbrowser" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapewebbrowser.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepink" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="appscapewebbrowserprice" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\appscapewebbrowserprice.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapewelcometoappscape" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapewelcometoappscape.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="updatecustomcolourpallets" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\updatecustomcolourpallets.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeaudioplayerpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeaudioplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="floodgateicn" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\floodgateicn.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradetextpadopen" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetextpadopen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="tilebutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\tilebutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> <data name="appscapecalculatorpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> <value>..\Resources\appscapecalculatorpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfobuttonpressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfobuttonpressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconCalculator" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconCalculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeundefinedpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeundefinedpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradepinkshadeset" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradepinkshadeset.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapevideoplayerpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapevideoplayerpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="uparrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\uparrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapewebbrowserpricepressed" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapewebbrowserpricepressed.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="iconFileSkimmer" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconFileSkimmer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfoaudioplayertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfoaudioplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradealartpad" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealartpad.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfoaudioplayervisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfoaudioplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeterminalscrollbar" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeterminalscrollbar.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfobackbutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfobackbutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ReceiveClicked" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ReceiveClicked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfobuybutton" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfobuybutton.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="ArtPadmagnify" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ArtPadmagnify.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfocalculatortext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfocalculatortext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="upgradeartpadnew" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeartpadnew.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfocalculatorvisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfocalculatorvisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="crash" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\crash.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfovideoplayertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfovideoplayertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="shiftomizerindustrialskinpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizerindustrialskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfovideoplayervisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfovideoplayervisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="shiftomizerlinuxmintskinpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizerlinuxmintskinpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfowebbrowsertext" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfowebbrowsertext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="shiftomizersliderleftarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizersliderleftarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> </data> - <data name="appscapeinfowebbrowservisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> - <value>..\Resources\appscapeinfowebbrowservisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + <data name="shiftomizersliderrightarrow" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizersliderrightarrow.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="crash_cheat" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\crash-cheat.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="crash_force" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\crash-force.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="shiftomizerskinchangerpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizerskinshifterscreenshot.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="license" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ShiftOS License.txt;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </data> + <data name="christmaseasteregg" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\christmaseasteregg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="crash_ofm" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\crash_ofm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="AxInterop_WMPLib" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\AxInterop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </data> + <data name="Interop_WMPLib" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Interop.WMPLib.dll;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </data> + <data name="iconmaze" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\iconmaze.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="shiftomizericonpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizericonpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="shiftomizernamechangerpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\shiftomizernamechangerpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="minimatchlabyrinthpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\minimatchlabyrinthpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradealunitymode" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradealunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeiconunitymode" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeiconunitymode.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeosname" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeosname.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderesize" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderesize.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradeshiftitems" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradeshiftitems.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradesysinfo" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradesysinfo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradetrm" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradetrm.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderemoveth1" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderemoveth1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderemoveth2" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderemoveth2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderemoveth3" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderemoveth3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgraderemoveth4" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgraderemoveth4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="upgradevirusscanner" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\upgradevirusscanner.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapeorcwrite" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeorcwrite.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapeinfoorcwritetext" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfoorcwritetext.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="appscapeinfoorcwritevisualpreview" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\appscapeinfoorcwritevisualpreview.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value> + </data> + <data name="skinIndustrial" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\Industrial.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </data> + <data name="skinLinuxMint7" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\ Linux Mint 7.skn;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> + </data> + <data name="DesktopPlusPlusAbout" type="System.Resources.ResXFileRef, System.Windows.Forms"> + <value>..\Resources\DesktopPlusPlusAbout.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value> </data> </root>
\ 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 @@ +'------------------------------------------------------------------------------ +' <auto-generated> +' 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. +' </auto-generated> +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _ + Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) + +#Region "My.Settings Auto-Save Functionality" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ + Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + + <Global.System.Configuration.UserScopedSettingAttribute(), _ + Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ + Global.System.Configuration.DefaultSettingValueAttribute("0")> _ + 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 + + <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _ + Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ + Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _ + Friend Module MySettingsProperty + + <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _ + Friend ReadOnly Property Settings() As Global.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 @@ +<?xml version='1.0' encoding='utf-8'?> +<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true"> + <Profiles /> + <Settings> + <Setting Name="ShouldCrashOccur" Type="System.Int32" Scope="User"> + <Value Profile="(Default)">0</Value> + </Setting> + </Settings> +</SettingsFile>
\ No newline at end of file diff --git a/My Project/app.manifest b/ShiftOS/My Project/app.manifest index f499e6a..f499e6a 100644 --- a/My Project/app.manifest +++ b/ShiftOS/My Project/app.manifest diff --git a/MyPreviewToolStripRenderer.vb b/ShiftOS/MyPreviewToolStripRenderer.vb index ee2239d..ee2239d 100644 --- a/MyPreviewToolStripRenderer.vb +++ b/ShiftOS/MyPreviewToolStripRenderer.vb diff --git a/MyToolStripRenderer.vb b/ShiftOS/MyToolStripRenderer.vb index d517cf9..d517cf9 100644 --- a/MyToolStripRenderer.vb +++ b/ShiftOS/MyToolStripRenderer.vb diff --git a/Name Changer.Designer.vb b/ShiftOS/Name Changer.Designer.vb index 44cf25f..2cbbeb4 100644 --- a/Name Changer.Designer.vb +++ b/ShiftOS/Name Changer.Designer.vb @@ -43,6 +43,10 @@ Partial Class Name_Changer 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() @@ -123,16 +127,62 @@ Partial Class Name_Changer Me.btnApply = New System.Windows.Forms.Button() Me.pgleft = New System.Windows.Forms.Panel() Me.titlebar = New System.Windows.Forms.Panel() - 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.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() @@ -173,8 +223,30 @@ Partial Class Name_Changer CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).BeginInit() Me.pgleft.SuspendLayout() Me.titlebar.SuspendLayout() - Me.pnliconmanagersettings.SuspendLayout() - CType(Me.piciconmanagericon, System.ComponentModel.ISupportInitialize).BeginInit() + 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 @@ -189,7 +261,7 @@ Partial Class Name_Changer ' Me.pgbottom.BackColor = System.Drawing.Color.Gray Me.pgbottom.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottom.Location = New System.Drawing.Point(2, 642) + 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 @@ -230,7 +302,7 @@ Partial Class Name_Changer ' Me.pgbottomrcorner.BackColor = System.Drawing.Color.Red Me.pgbottomrcorner.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottomrcorner.Location = New System.Drawing.Point(0, 612) + 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 @@ -242,7 +314,7 @@ Partial Class Name_Changer 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, 614) + Me.pgright.Size = New System.Drawing.Size(2, 735) Me.pgright.TabIndex = 22 ' 'closebutton @@ -257,10 +329,10 @@ Partial Class Name_Changer ' 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.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(143, 18) + Me.lbtitletext.Size = New System.Drawing.Size(120, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Name Changer" ' @@ -286,7 +358,7 @@ Partial Class Name_Changer ' Me.pgbottomlcorner.BackColor = System.Drawing.Color.Red Me.pgbottomlcorner.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pgbottomlcorner.Location = New System.Drawing.Point(0, 612) + 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 @@ -299,13 +371,25 @@ Partial Class Name_Changer 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, 612) + 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) @@ -329,7 +413,7 @@ Partial Class Name_Changer 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, 572) + Me.pnlprogramlistholder.Size = New System.Drawing.Size(330, 693) Me.pnlprogramlistholder.TabIndex = 1 ' 'pnlterminalsettings @@ -337,8 +421,7 @@ Partial Class Name_Changer Me.pnlterminalsettings.Controls.Add(Me.txtterminalname) Me.pnlterminalsettings.Controls.Add(Me.Label19) Me.pnlterminalsettings.Controls.Add(Me.picterminalicon) - Me.pnlterminalsettings.Dock = System.Windows.Forms.DockStyle.Top - Me.pnlterminalsettings.Location = New System.Drawing.Point(0, 532) + 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 @@ -376,6 +459,51 @@ Partial Class Name_Changer 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) @@ -1192,7 +1320,7 @@ Partial Class Name_Changer 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, 572) + 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 @@ -1262,7 +1390,7 @@ Partial Class Name_Changer 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, 614) + Me.pgleft.Size = New System.Drawing.Size(2, 735) Me.pgleft.TabIndex = 21 ' 'titlebar @@ -1282,56 +1410,551 @@ Partial Class Name_Changer Me.titlebar.Size = New System.Drawing.Size(334, 30) Me.titlebar.TabIndex = 19 ' - 'pnliconmanagersettings + 'pnlwallet ' - 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 + 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 ' - 'txticonmanager + 'txtwallet ' - Me.txticonmanager.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + 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.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 + 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, 644) + Me.ClientSize = New System.Drawing.Size(334, 765) Me.Controls.Add(Me.pgcontents) Me.Controls.Add(Me.pgbottom) Me.Controls.Add(Me.pgright) @@ -1349,6 +1972,9 @@ Partial Class Name_Changer 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() @@ -1408,9 +2034,42 @@ Partial Class Name_Changer Me.pgleft.ResumeLayout(False) Me.titlebar.ResumeLayout(False) Me.titlebar.PerformLayout() - Me.pnliconmanagersettings.ResumeLayout(False) - Me.pnliconmanagersettings.PerformLayout() - CType(Me.piciconmanagericon, System.ComponentModel.ISupportInitialize).EndInit() + 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 @@ -1518,4 +2177,52 @@ Partial Class Name_Changer 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/Name Changer.resx b/ShiftOS/Name Changer.resx index ff4c820..ff4c820 100644 --- a/Name Changer.resx +++ b/ShiftOS/Name Changer.resx diff --git a/Name Changer.vb b/ShiftOS/Name Changer.vb index 450bf32..4dc8cfa 100644 --- a/Name Changer.vb +++ b/ShiftOS/Name Changer.vb @@ -10,23 +10,29 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + If ShiftOSDesktop.NameChangerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonnamechanger.SendToBack() 'modfiy to proper name + 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 - loadnames() - loadicons() - showboughtitems() + 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 @@ -93,80 +99,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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, 450) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -180,7 +189,7 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) + 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 @@ -188,59 +197,57 @@ If ShiftOSDesktop.boughtclosebutton = False Then closebutton.Hide() Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.namechangericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -262,29 +269,29 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -304,6 +311,7 @@ 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() @@ -365,26 +373,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -396,6 +427,7 @@ End Sub 'end of general setup +#End Region Public Sub loadnames() txtknowledgeinputname.Text = ShiftOSDesktop.knowledgeinputname @@ -418,6 +450,18 @@ 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() @@ -441,6 +485,18 @@ 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 @@ -468,8 +524,19 @@ 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.setupalltitlebars() ShiftOSDesktop.setuppanelbuttons() ShiftOSDesktop.setupdesktop() If Icon_Manager.Visible = True Then Icon_Manager.loadsettings() @@ -496,6 +563,18 @@ 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" @@ -531,8 +610,19 @@ 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.setupalltitlebars() ShiftOSDesktop.setuppanelbuttons() ShiftOSDesktop.setupdesktop() End Sub @@ -558,6 +648,20 @@ 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() @@ -581,5 +685,17 @@ 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..0ff7e43 --- /dev/null +++ b/ShiftOS/NewAPI.vb @@ -0,0 +1,79 @@ +Module NewAPI + Private Command As String + Private NewModForm As New ModForm + + Public Sub UseCode(ByVal Path As String) + Dim sr As System.IO.StreamReader + + 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() + DoCommandAPI() + i = i + 1 + End While + sr.Close() + End Sub + + Private Sub DoCommandAPI() + If Command Like "infobox = *" Then + Try + Dim Message As String = Command.Substring(10) + infobox.showinfo("Message from a ShiftOS Mod Files", Message) + 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 "window.create" Then + Try + NewModForm.Show() + 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 "label.create = *" Then + Try + NewModForm.CreateLabel(Command.Substring(15)) + 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 "label.select = *" Then + Try + NewModForm.SelectLabel(Command.Substring(15)) + 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 "SelectedLabel.Location.X = *" Then + Try + NewModForm.MoveSelectedLabelLocationX(Command.Substring(27)) + 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 "SelectedLabel.Location.Y = *" Then + Try + NewModForm.MoveSelectedLabelLocationY(Command.Substring(27)) + 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 "SelectedLabel.Text = *" Then + Try + NewModForm.SelectedLabelText(Command.Substring(21)) + 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 + End Sub +End Module diff --git a/ShiftOS/OrcWrite.Designer.vb b/ShiftOS/OrcWrite.Designer.vb new file mode 100644 index 0000000..f9a8335 --- /dev/null +++ b/ShiftOS/OrcWrite.Designer.vb @@ -0,0 +1,482 @@ +<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.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 + ' + '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 + ' + '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 + ' + '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/Pong.Designer.vb b/ShiftOS/Pong.Designer.vb index c2ddffb..c79de46 100644 --- a/Pong.Designer.vb +++ b/ShiftOS/Pong.Designer.vb @@ -67,6 +67,7 @@ Partial Class Pong 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() @@ -78,6 +79,7 @@ Partial Class Pong 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() @@ -168,7 +170,7 @@ Partial Class Pong ' 'lblmissedout ' - Me.lblmissedout.Font = New System.Drawing.Font("Bookman Old Style", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -461,7 +463,7 @@ Partial Class Pong ' 'lbllevelandtime ' - Me.lbllevelandtime.Font = New System.Drawing.Font("Bookman Old Style", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -540,6 +542,7 @@ Partial Class Pong '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) @@ -554,6 +557,16 @@ Partial Class Pong 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 @@ -594,10 +607,10 @@ Partial Class Pong ' 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.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(55, 18) + Me.lbtitletext.Size = New System.Drawing.Size(47, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Pong" ' @@ -640,6 +653,10 @@ Partial Class Pong ' Me.tmrcountdown.Interval = 1000 ' + 'tmrstoryline + ' + Me.tmrstoryline.Interval = 1000 + ' 'Pong ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -728,4 +745,6 @@ Partial Class Pong 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/Pong.resx b/ShiftOS/Pong.resx index 21fa72b..e92bf0c 100644 --- a/Pong.resx +++ b/ShiftOS/Pong.resx @@ -143,4 +143,7 @@ If you think you are ready to try again then click the button below. Don't blow <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/Pong.vb b/ShiftOS/Pong.vb index 5e6909d..ee99e6f 100644 --- a/Pong.vb +++ b/ShiftOS/Pong.vb @@ -1,4 +1,5 @@ Public Class Pong + Public oldsize As Integer Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -7,6 +8,7 @@ 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 @@ -28,21 +30,29 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + 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() + ShiftOSDesktop.pnlpanelbuttonpong.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonpong, ShiftOSDesktop.tbpongicon, ShiftOSDesktop.tbpongtext, True) + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonpong, ShiftOSDesktop.tbpongicon, ShiftOSDesktop.tbpongtext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub - setuplevelrewards() + 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 @@ -109,80 +119,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -196,67 +209,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.pongname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtpongicon = True Then + '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. + pnlicon.Image = ShiftOSDesktop.pongicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -268,9 +279,6 @@ pgright.Show() Me.Height = rolldownsize Me.MinimumSize = New Size(minimumsizewidth, minimumsizeheight) - If paused = True Then paused = False - gameTimer.Start() - counter.Start() Else Me.MinimumSize = New Size(0, 0) pgleft.Hide() @@ -278,33 +286,103 @@ pgright.Hide() rolldownsize = Me.Height Me.Height = Me.titlebar.Height - If paused = False Then paused = True - gameTimer.Stop() - counter.Stop() + 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -316,6 +394,7 @@ 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 @@ -449,6 +528,8 @@ xveldec = levelxspeed yveldec = levelyspeed + secondsleft = 60 + tmrcountdown.Start() lblbeatai.Text = "Get " & beataireward & " codepoints for beating the Computer!" pnlgamestats.Hide() @@ -602,6 +683,9 @@ beataireward = 2 beatairewardtotal = 0 secondsleft = 60 + lblstatscodepoints.Text = "Codepoints: " 'reset stats text + lblstatsX.Text = "Xspeed: " + lblstatsY.Text = "Yspeed: " levelxspeed = 3 levelyspeed = 3 @@ -633,7 +717,27 @@ newgame() End Sub - Private Sub rollupbutton_Paint(sender As Object, e As PaintEventArgs) Handles rollupbutton.Paint + 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/PreviewCustomColorTable.vb b/ShiftOS/PreviewCustomColorTable.vb index 6ce3d83..6ce3d83 100644 --- a/PreviewCustomColorTable.vb +++ b/ShiftOS/PreviewCustomColorTable.vb 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/Resources/3beepvirus.wav b/ShiftOS/Resources/3beepvirus.wav Binary files differindex c1af078..c1af078 100644 --- a/Resources/3beepvirus.wav +++ b/ShiftOS/Resources/3beepvirus.wav diff --git a/Resources/ArtPadOval.png b/ShiftOS/Resources/ArtPadOval.png Binary files differindex fceec4c..fceec4c 100644 --- a/Resources/ArtPadOval.png +++ b/ShiftOS/Resources/ArtPadOval.png diff --git a/Resources/ArtPadRectangle.png b/ShiftOS/Resources/ArtPadRectangle.png Binary files differindex d9e2aa2..d9e2aa2 100644 --- a/Resources/ArtPadRectangle.png +++ b/ShiftOS/Resources/ArtPadRectangle.png diff --git a/Resources/ArtPadcirclerubber.png b/ShiftOS/Resources/ArtPadcirclerubber.png Binary files differindex f7331e2..f7331e2 100644 --- a/Resources/ArtPadcirclerubber.png +++ b/ShiftOS/Resources/ArtPadcirclerubber.png diff --git a/Resources/ArtPadcirclerubberselected.png b/ShiftOS/Resources/ArtPadcirclerubberselected.png Binary files differindex 17f0416..17f0416 100644 --- a/Resources/ArtPadcirclerubberselected.png +++ b/ShiftOS/Resources/ArtPadcirclerubberselected.png diff --git a/Resources/ArtPaderacer.png b/ShiftOS/Resources/ArtPaderacer.png Binary files differindex 051718c..051718c 100644 --- a/Resources/ArtPaderacer.png +++ b/ShiftOS/Resources/ArtPaderacer.png diff --git a/Resources/ArtPadfloodfill.png b/ShiftOS/Resources/ArtPadfloodfill.png Binary files differindex 487585c..487585c 100644 --- a/Resources/ArtPadfloodfill.png +++ b/ShiftOS/Resources/ArtPadfloodfill.png diff --git a/Resources/ArtPadlinetool.png b/ShiftOS/Resources/ArtPadlinetool.png Binary files differindex eb7329b..eb7329b 100644 --- a/Resources/ArtPadlinetool.png +++ b/ShiftOS/Resources/ArtPadlinetool.png diff --git a/Resources/ArtPadmagnify.png b/ShiftOS/Resources/ArtPadmagnify.png Binary files differindex 1310233..1310233 100644 --- a/Resources/ArtPadmagnify.png +++ b/ShiftOS/Resources/ArtPadmagnify.png diff --git a/Resources/ArtPadnew.png b/ShiftOS/Resources/ArtPadnew.png Binary files differindex e1dc34f..e1dc34f 100644 --- a/Resources/ArtPadnew.png +++ b/ShiftOS/Resources/ArtPadnew.png diff --git a/Resources/ArtPadopen.png b/ShiftOS/Resources/ArtPadopen.png Binary files differindex 9dc232b..9dc232b 100644 --- a/Resources/ArtPadopen.png +++ b/ShiftOS/Resources/ArtPadopen.png diff --git a/Resources/ArtPadpaintbrush.png b/ShiftOS/Resources/ArtPadpaintbrush.png Binary files differindex c26ac3b..c26ac3b 100644 --- a/Resources/ArtPadpaintbrush.png +++ b/ShiftOS/Resources/ArtPadpaintbrush.png diff --git a/Resources/ArtPadpencil.png b/ShiftOS/Resources/ArtPadpencil.png Binary files differindex cf230e2..cf230e2 100644 --- a/Resources/ArtPadpencil.png +++ b/ShiftOS/Resources/ArtPadpencil.png diff --git a/Resources/ArtPadpixelplacer.png b/ShiftOS/Resources/ArtPadpixelplacer.png Binary files differindex 4cc338b..4cc338b 100644 --- a/Resources/ArtPadpixelplacer.png +++ b/ShiftOS/Resources/ArtPadpixelplacer.png diff --git a/Resources/ArtPadredo.png b/ShiftOS/Resources/ArtPadredo.png Binary files differindex ef42439..ef42439 100644 --- a/Resources/ArtPadredo.png +++ b/ShiftOS/Resources/ArtPadredo.png diff --git a/Resources/ArtPadsave.png b/ShiftOS/Resources/ArtPadsave.png Binary files differindex 5a31d05..5a31d05 100644 --- a/Resources/ArtPadsave.png +++ b/ShiftOS/Resources/ArtPadsave.png diff --git a/Resources/ArtPadsquarerubber.png b/ShiftOS/Resources/ArtPadsquarerubber.png Binary files differindex 16391ef..16391ef 100644 --- a/Resources/ArtPadsquarerubber.png +++ b/ShiftOS/Resources/ArtPadsquarerubber.png diff --git a/Resources/ArtPadsquarerubberselected.png b/ShiftOS/Resources/ArtPadsquarerubberselected.png Binary files differindex 5991242..5991242 100644 --- a/Resources/ArtPadsquarerubberselected.png +++ b/ShiftOS/Resources/ArtPadsquarerubberselected.png diff --git a/Resources/ArtPadtexttool.png b/ShiftOS/Resources/ArtPadtexttool.png Binary files differindex a669a6d..a669a6d 100644 --- a/Resources/ArtPadtexttool.png +++ b/ShiftOS/Resources/ArtPadtexttool.png diff --git a/Resources/ArtPadundo.png b/ShiftOS/Resources/ArtPadundo.png Binary files differindex 6484122..6484122 100644 --- a/Resources/ArtPadundo.png +++ b/ShiftOS/Resources/ArtPadundo.png diff --git a/ShiftOS/Resources/AxInterop.WMPLib.dll b/ShiftOS/Resources/AxInterop.WMPLib.dll Binary files differnew file mode 100644 index 0000000..0d8a4ce --- /dev/null +++ b/ShiftOS/Resources/AxInterop.WMPLib.dll diff --git a/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp b/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp Binary files differnew file mode 100644 index 0000000..100bfd1 --- /dev/null +++ b/ShiftOS/Resources/BitnotesAcceptedHereLogo.bmp diff --git a/Resources/DSC01042.JPG b/ShiftOS/Resources/DSC01042.JPG Binary files differindex bebf8a3..bebf8a3 100644 --- a/Resources/DSC01042.JPG +++ b/ShiftOS/Resources/DSC01042.JPG 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/Resources/Gray Shades.png b/ShiftOS/Resources/Gray Shades.png Binary files differindex 70945bc..70945bc 100644 --- a/Resources/Gray Shades.png +++ b/ShiftOS/Resources/Gray Shades.png diff --git a/ShiftOS/Resources/Industrial.skn b/ShiftOS/Resources/Industrial.skn Binary files differnew file mode 100644 index 0000000..680f4e7 --- /dev/null +++ b/ShiftOS/Resources/Industrial.skn diff --git a/ShiftOS/Resources/Interop.WMPLib.dll b/ShiftOS/Resources/Interop.WMPLib.dll Binary files differnew file mode 100644 index 0000000..d53b3b9 --- /dev/null +++ b/ShiftOS/Resources/Interop.WMPLib.dll diff --git a/ShiftOS/Resources/LICENSE.md b/ShiftOS/Resources/LICENSE.md new file mode 100644 index 0000000..ce78dc9 --- /dev/null +++ b/ShiftOS/Resources/LICENSE.md @@ -0,0 +1,31 @@ +*(change this to a more standard open or closed source license in the future)*
+
+ShiftOS temporary license as of 1st December 2014
+
+These terms apply to everyone
+
+## Definitions
+
+- The program, the executable or ShiftOS refers to the distributed ShiftOS binary executable program. (ie: ShiftOS.exe)
+- Source code refers to the decompiled code of ShiftOS (ie: ShiftOSDesktop.vb)
+
+## You can:
+
+- Modify this software
+- Use for any non-commercial purpose that does not restrict users
+
+## You must:
+
+- Include the original copyright notice when redistributing binary copies of this program
+
+## You cannot:
+
+- Use this program commercially
+- Use this program to restrict users (e.g. using this software to implement DRM standards)
+- Redistribute copies of this source code to non-maintainers
+- Decompile the executable or attempt to view/access the source code in any other way without the prior permission of the owner.
+- Sublicense
+
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.
diff --git a/ShiftOS/Resources/Linux Mint 7.skn b/ShiftOS/Resources/Linux Mint 7.skn Binary files differnew file mode 100644 index 0000000..bc275d5 --- /dev/null +++ b/ShiftOS/Resources/Linux Mint 7.skn diff --git a/ShiftOS/Resources/Minimatchbackground.png b/ShiftOS/Resources/Minimatchbackground.png Binary files differnew file mode 100644 index 0000000..ccb8569 --- /dev/null +++ b/ShiftOS/Resources/Minimatchbackground.png diff --git a/Resources/Receive.png b/ShiftOS/Resources/Receive.png Binary files differindex ded20a0..ded20a0 100644 --- a/Resources/Receive.png +++ b/ShiftOS/Resources/Receive.png diff --git a/Resources/ReceiveClicked.png b/ShiftOS/Resources/ReceiveClicked.png Binary files differindex f5f968b..f5f968b 100644 --- a/Resources/ReceiveClicked.png +++ b/ShiftOS/Resources/ReceiveClicked.png diff --git a/Resources/Send.png b/ShiftOS/Resources/Send.png Binary files differindex f4e4302..f4e4302 100644 --- a/Resources/Send.png +++ b/ShiftOS/Resources/Send.png diff --git a/Resources/SendClicked.png b/ShiftOS/Resources/SendClicked.png Binary files differindex 807f785..807f785 100644 --- a/Resources/SendClicked.png +++ b/ShiftOS/Resources/SendClicked.png diff --git a/ShiftOS/Resources/ShiftOS License.txt b/ShiftOS/Resources/ShiftOS License.txt new file mode 100644 index 0000000..7d294a4 --- /dev/null +++ b/ShiftOS/Resources/ShiftOS License.txt @@ -0,0 +1,33 @@ +ShiftOS temporary license
+
+This document is auto-extracted from the ShiftOS executable if version is beta 5.2 or greater
+
+These terms apply to everyone
+
+## Definitions
+
+- The program, the executable or ShiftOS refers to the distributed ShiftOS binary executable program. (ie: ShiftOS.exe)
+- Source code refers to the decompiled code of ShiftOS (ie: ShiftOSDesktop.vb)
+
+## You can:
+
+- Redistribute the executable if this license is also provided and link to orginal forum/website is given (shiftos.net)
+- Use for any non-commercial purpose that does not restrict users
+
+## You must:
+
+- Include the original copyright notice when redistributing binary copies of this program
+
+## You cannot:
+
+- Use this program commercially
+- Use this program to restrict users (e.g. using this software to implement DRM standards)
+- Redistribute copies of this source code to non-maintainers
+- Decompile the executable or attempt to view/access the source code in any other way without the prior permission of a lead developer.
+- Sublicense
+
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.
+
+License last updated 9am 1st December 2014 GMT + 13
diff --git a/Resources/Symbolinfo.png b/ShiftOS/Resources/Symbolinfo.png Binary files differindex 659d9b3..659d9b3 100644 --- a/Resources/Symbolinfo.png +++ b/ShiftOS/Resources/Symbolinfo.png diff --git a/Resources/TotalBalanceClicked.png b/ShiftOS/Resources/TotalBalanceClicked.png Binary files differindex 18ef996..18ef996 100644 --- a/Resources/TotalBalanceClicked.png +++ b/ShiftOS/Resources/TotalBalanceClicked.png diff --git a/Resources/TotalBalanceUnclicked.png b/ShiftOS/Resources/TotalBalanceUnclicked.png Binary files differindex 0968413..0968413 100644 --- a/Resources/TotalBalanceUnclicked.png +++ b/ShiftOS/Resources/TotalBalanceUnclicked.png diff --git a/Resources/anycolourshade.png b/ShiftOS/Resources/anycolourshade.png Binary files differindex 70d12b7..70d12b7 100644 --- a/Resources/anycolourshade.png +++ b/ShiftOS/Resources/anycolourshade.png diff --git a/Resources/anycolourshade2.png b/ShiftOS/Resources/anycolourshade2.png Binary files differindex 9494e3a..9494e3a 100644 --- a/Resources/anycolourshade2.png +++ b/ShiftOS/Resources/anycolourshade2.png diff --git a/Resources/anycolourshade3.png b/ShiftOS/Resources/anycolourshade3.png Binary files differindex a71abb0..a71abb0 100644 --- a/Resources/anycolourshade3.png +++ b/ShiftOS/Resources/anycolourshade3.png diff --git a/Resources/anycolourshade4.png b/ShiftOS/Resources/anycolourshade4.png Binary files differindex b33644b..b33644b 100644 --- a/Resources/anycolourshade4.png +++ b/ShiftOS/Resources/anycolourshade4.png diff --git a/Resources/appscapeaudioplayerbox.png b/ShiftOS/Resources/appscapeaudioplayerbox.png Binary files differindex 1dd4096..1dd4096 100644 --- a/Resources/appscapeaudioplayerbox.png +++ b/ShiftOS/Resources/appscapeaudioplayerbox.png diff --git a/Resources/appscapeaudioplayerprice.png b/ShiftOS/Resources/appscapeaudioplayerprice.png Binary files differindex 5700c24..5700c24 100644 --- a/Resources/appscapeaudioplayerprice.png +++ b/ShiftOS/Resources/appscapeaudioplayerprice.png diff --git a/Resources/appscapeaudioplayerpricepressed.png b/ShiftOS/Resources/appscapeaudioplayerpricepressed.png Binary files differindex d79c687..d79c687 100644 --- a/Resources/appscapeaudioplayerpricepressed.png +++ b/ShiftOS/Resources/appscapeaudioplayerpricepressed.png diff --git a/Resources/appscapecalculator.png b/ShiftOS/Resources/appscapecalculator.png Binary files differindex c08f92d..c08f92d 100644 --- a/Resources/appscapecalculator.png +++ b/ShiftOS/Resources/appscapecalculator.png diff --git a/Resources/appscapecalculatorprice.png b/ShiftOS/Resources/appscapecalculatorprice.png Binary files differindex 36402e4..36402e4 100644 --- a/Resources/appscapecalculatorprice.png +++ b/ShiftOS/Resources/appscapecalculatorprice.png diff --git a/Resources/appscapecalculatorpricepressed.png b/ShiftOS/Resources/appscapecalculatorpricepressed.png Binary files differindex fc815b8..fc815b8 100644 --- a/Resources/appscapecalculatorpricepressed.png +++ b/ShiftOS/Resources/appscapecalculatorpricepressed.png diff --git a/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png b/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png Binary files differnew file mode 100644 index 0000000..6a47f38 --- /dev/null +++ b/ShiftOS/Resources/appscapedepositbitnotewalletscreenshot.png diff --git a/ShiftOS/Resources/appscapedepositinfo.png b/ShiftOS/Resources/appscapedepositinfo.png Binary files differnew file mode 100644 index 0000000..8d5c7ca --- /dev/null +++ b/ShiftOS/Resources/appscapedepositinfo.png diff --git a/Resources/appscapedepositnowbutton.png b/ShiftOS/Resources/appscapedepositnowbutton.png Binary files differindex fc99814..fc99814 100644 --- a/Resources/appscapedepositnowbutton.png +++ b/ShiftOS/Resources/appscapedepositnowbutton.png diff --git a/Resources/appscapedownloadbutton.png b/ShiftOS/Resources/appscapedownloadbutton.png Binary files differindex 1ffaf7f..1ffaf7f 100644 --- a/Resources/appscapedownloadbutton.png +++ b/ShiftOS/Resources/appscapedownloadbutton.png diff --git a/Resources/appscapeinfoaudioplayertext.png b/ShiftOS/Resources/appscapeinfoaudioplayertext.png Binary files differindex 4143b03..4143b03 100644 --- a/Resources/appscapeinfoaudioplayertext.png +++ b/ShiftOS/Resources/appscapeinfoaudioplayertext.png diff --git a/Resources/appscapeinfoaudioplayervisualpreview.png b/ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png Binary files differindex b3bbbed..b3bbbed 100644 --- a/Resources/appscapeinfoaudioplayervisualpreview.png +++ b/ShiftOS/Resources/appscapeinfoaudioplayervisualpreview.png diff --git a/Resources/appscapeinfobackbutton.png b/ShiftOS/Resources/appscapeinfobackbutton.png Binary files differindex 6025099..6025099 100644 --- a/Resources/appscapeinfobackbutton.png +++ b/ShiftOS/Resources/appscapeinfobackbutton.png diff --git a/Resources/appscapeinfobutton.png b/ShiftOS/Resources/appscapeinfobutton.png Binary files differindex 41d9331..41d9331 100644 --- a/Resources/appscapeinfobutton.png +++ b/ShiftOS/Resources/appscapeinfobutton.png diff --git a/Resources/appscapeinfobuttonpressed.png b/ShiftOS/Resources/appscapeinfobuttonpressed.png Binary files differindex 148958c..148958c 100644 --- a/Resources/appscapeinfobuttonpressed.png +++ b/ShiftOS/Resources/appscapeinfobuttonpressed.png diff --git a/Resources/appscapeinfobuybutton.png b/ShiftOS/Resources/appscapeinfobuybutton.png Binary files differindex cbbe4d3..cbbe4d3 100644 --- a/Resources/appscapeinfobuybutton.png +++ b/ShiftOS/Resources/appscapeinfobuybutton.png diff --git a/Resources/appscapeinfocalculatortext.png b/ShiftOS/Resources/appscapeinfocalculatortext.png Binary files differindex 7833187..7833187 100644 --- a/Resources/appscapeinfocalculatortext.png +++ b/ShiftOS/Resources/appscapeinfocalculatortext.png diff --git a/Resources/appscapeinfocalculatorvisualpreview.png b/ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png Binary files differindex 00ad970..00ad970 100644 --- a/Resources/appscapeinfocalculatorvisualpreview.png +++ b/ShiftOS/Resources/appscapeinfocalculatorvisualpreview.png diff --git a/ShiftOS/Resources/appscapeinfoorcwritetext.png b/ShiftOS/Resources/appscapeinfoorcwritetext.png Binary files differnew file mode 100644 index 0000000..fe02672 --- /dev/null +++ b/ShiftOS/Resources/appscapeinfoorcwritetext.png diff --git a/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png b/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png Binary files differnew file mode 100644 index 0000000..5e7fe03 --- /dev/null +++ b/ShiftOS/Resources/appscapeinfoorcwritevisualpreview.png diff --git a/Resources/appscapeinfovideoplayertext.png b/ShiftOS/Resources/appscapeinfovideoplayertext.png Binary files differindex b73d5c9..b73d5c9 100644 --- a/Resources/appscapeinfovideoplayertext.png +++ b/ShiftOS/Resources/appscapeinfovideoplayertext.png diff --git a/Resources/appscapeinfovideoplayervisualpreview.png b/ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png Binary files differindex f22d6cc..f22d6cc 100644 --- a/Resources/appscapeinfovideoplayervisualpreview.png +++ b/ShiftOS/Resources/appscapeinfovideoplayervisualpreview.png diff --git a/Resources/appscapeinfowebbrowsertext.png b/ShiftOS/Resources/appscapeinfowebbrowsertext.png Binary files differindex 27155d4..27155d4 100644 --- a/Resources/appscapeinfowebbrowsertext.png +++ b/ShiftOS/Resources/appscapeinfowebbrowsertext.png diff --git a/Resources/appscapeinfowebbrowservisualpreview.png b/ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png Binary files differindex 008e11e..008e11e 100644 --- a/Resources/appscapeinfowebbrowservisualpreview.png +++ b/ShiftOS/Resources/appscapeinfowebbrowservisualpreview.png diff --git a/Resources/appscapemoresoftware.png b/ShiftOS/Resources/appscapemoresoftware.png Binary files differindex 915ef8c..915ef8c 100644 --- a/Resources/appscapemoresoftware.png +++ b/ShiftOS/Resources/appscapemoresoftware.png diff --git a/ShiftOS/Resources/appscapeorcwrite.png b/ShiftOS/Resources/appscapeorcwrite.png Binary files differnew file mode 100644 index 0000000..0145ef7 --- /dev/null +++ b/ShiftOS/Resources/appscapeorcwrite.png diff --git a/Resources/appscapetitlebanner.png b/ShiftOS/Resources/appscapetitlebanner.png Binary files differindex 4ca5d5f..4ca5d5f 100644 --- a/Resources/appscapetitlebanner.png +++ b/ShiftOS/Resources/appscapetitlebanner.png diff --git a/Resources/appscapeundefinedprice.png b/ShiftOS/Resources/appscapeundefinedprice.png Binary files differindex 80573ef..80573ef 100644 --- a/Resources/appscapeundefinedprice.png +++ b/ShiftOS/Resources/appscapeundefinedprice.png diff --git a/Resources/appscapeundefinedpricepressed.png b/ShiftOS/Resources/appscapeundefinedpricepressed.png Binary files differindex deea443..deea443 100644 --- a/Resources/appscapeundefinedpricepressed.png +++ b/ShiftOS/Resources/appscapeundefinedpricepressed.png diff --git a/Resources/appscapevideoplayer.png b/ShiftOS/Resources/appscapevideoplayer.png Binary files differindex 4b07adc..4b07adc 100644 --- a/Resources/appscapevideoplayer.png +++ b/ShiftOS/Resources/appscapevideoplayer.png diff --git a/Resources/appscapevideoplayerprice.png b/ShiftOS/Resources/appscapevideoplayerprice.png Binary files differindex ef9b139..ef9b139 100644 --- a/Resources/appscapevideoplayerprice.png +++ b/ShiftOS/Resources/appscapevideoplayerprice.png diff --git a/Resources/appscapevideoplayerpricepressed.png b/ShiftOS/Resources/appscapevideoplayerpricepressed.png Binary files differindex 4849f54..4849f54 100644 --- a/Resources/appscapevideoplayerpricepressed.png +++ b/ShiftOS/Resources/appscapevideoplayerpricepressed.png diff --git a/Resources/appscapewebbrowser.png b/ShiftOS/Resources/appscapewebbrowser.png Binary files differindex b469924..b469924 100644 --- a/Resources/appscapewebbrowser.png +++ b/ShiftOS/Resources/appscapewebbrowser.png diff --git a/Resources/appscapewebbrowserprice.png b/ShiftOS/Resources/appscapewebbrowserprice.png Binary files differindex a3cb24c..a3cb24c 100644 --- a/Resources/appscapewebbrowserprice.png +++ b/ShiftOS/Resources/appscapewebbrowserprice.png diff --git a/Resources/appscapewebbrowserpricepressed.png b/ShiftOS/Resources/appscapewebbrowserpricepressed.png Binary files differindex 36ecfb1..36ecfb1 100644 --- a/Resources/appscapewebbrowserpricepressed.png +++ b/ShiftOS/Resources/appscapewebbrowserpricepressed.png diff --git a/Resources/appscapewelcometoappscape.png b/ShiftOS/Resources/appscapewelcometoappscape.png Binary files differindex 92e17c9..92e17c9 100644 --- a/Resources/appscapewelcometoappscape.png +++ b/ShiftOS/Resources/appscapewelcometoappscape.png diff --git a/ShiftOS/Resources/bitnotediggergradetable.png b/ShiftOS/Resources/bitnotediggergradetable.png Binary files differnew file mode 100644 index 0000000..54cbe21 --- /dev/null +++ b/ShiftOS/Resources/bitnotediggergradetable.png diff --git a/ShiftOS/Resources/bitnoteswebsidepnl.png b/ShiftOS/Resources/bitnoteswebsidepnl.png Binary files differnew file mode 100644 index 0000000..2d6e17f --- /dev/null +++ b/ShiftOS/Resources/bitnoteswebsidepnl.png diff --git a/ShiftOS/Resources/bitnotewalletdownload.png b/ShiftOS/Resources/bitnotewalletdownload.png Binary files differnew file mode 100644 index 0000000..71a1f2b --- /dev/null +++ b/ShiftOS/Resources/bitnotewalletdownload.png diff --git a/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png b/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png Binary files differnew file mode 100644 index 0000000..bd8c483 --- /dev/null +++ b/ShiftOS/Resources/bitnotewalletpreviewscreenshot.png diff --git a/ShiftOS/Resources/bitnotewebsitetitle.png b/ShiftOS/Resources/bitnotewebsitetitle.png Binary files differnew file mode 100644 index 0000000..7703382 --- /dev/null +++ b/ShiftOS/Resources/bitnotewebsitetitle.png diff --git a/Resources/centrebutton.png b/ShiftOS/Resources/centrebutton.png Binary files differindex 0578039..0578039 100644 --- a/Resources/centrebutton.png +++ b/ShiftOS/Resources/centrebutton.png diff --git a/Resources/centrebuttonpressed.png b/ShiftOS/Resources/centrebuttonpressed.png Binary files differindex 52c2725..52c2725 100644 --- a/Resources/centrebuttonpressed.png +++ b/ShiftOS/Resources/centrebuttonpressed.png diff --git a/ShiftOS/Resources/christmaseasteregg.png b/ShiftOS/Resources/christmaseasteregg.png Binary files differnew file mode 100644 index 0000000..b15feea --- /dev/null +++ b/ShiftOS/Resources/christmaseasteregg.png diff --git a/ShiftOS/Resources/crash-cheat.png b/ShiftOS/Resources/crash-cheat.png Binary files differnew file mode 100644 index 0000000..5bc6e63 --- /dev/null +++ b/ShiftOS/Resources/crash-cheat.png diff --git a/ShiftOS/Resources/crash-force.png b/ShiftOS/Resources/crash-force.png Binary files differnew file mode 100644 index 0000000..79c135d --- /dev/null +++ b/ShiftOS/Resources/crash-force.png diff --git a/ShiftOS/Resources/crash.png b/ShiftOS/Resources/crash.png Binary files differnew file mode 100644 index 0000000..a90aa4a --- /dev/null +++ b/ShiftOS/Resources/crash.png diff --git a/ShiftOS/Resources/crash_ofm.png b/ShiftOS/Resources/crash_ofm.png Binary files differnew file mode 100644 index 0000000..04f599a --- /dev/null +++ b/ShiftOS/Resources/crash_ofm.png diff --git a/Resources/deletefile.png b/ShiftOS/Resources/deletefile.png Binary files differindex 89bcc65..89bcc65 100644 --- a/Resources/deletefile.png +++ b/ShiftOS/Resources/deletefile.png diff --git a/Resources/deletefolder.png b/ShiftOS/Resources/deletefolder.png Binary files differindex afcf19f..afcf19f 100644 --- a/Resources/deletefolder.png +++ b/ShiftOS/Resources/deletefolder.png diff --git a/Resources/dial-up-modem-02.wav b/ShiftOS/Resources/dial-up-modem-02.wav Binary files differindex f6bb696..f6bb696 100644 --- a/Resources/dial-up-modem-02.wav +++ b/ShiftOS/Resources/dial-up-modem-02.wav diff --git a/ShiftOS/Resources/dodge.png b/ShiftOS/Resources/dodge.png Binary files differnew file mode 100644 index 0000000..d741ad6 --- /dev/null +++ b/ShiftOS/Resources/dodge.png diff --git a/Resources/downarrow.png b/ShiftOS/Resources/downarrow.png Binary files differindex 15d3663..15d3663 100644 --- a/Resources/downarrow.png +++ b/ShiftOS/Resources/downarrow.png diff --git a/ShiftOS/Resources/downloadmanagericon.png b/ShiftOS/Resources/downloadmanagericon.png Binary files differnew file mode 100644 index 0000000..c4cc648 --- /dev/null +++ b/ShiftOS/Resources/downloadmanagericon.png diff --git a/ShiftOS/Resources/fileiconsaa.png b/ShiftOS/Resources/fileiconsaa.png Binary files differnew file mode 100644 index 0000000..291770a --- /dev/null +++ b/ShiftOS/Resources/fileiconsaa.png diff --git a/Resources/fileskimmericon.fw.png b/ShiftOS/Resources/fileskimmericon.fw.png Binary files differindex cb4262b..cb4262b 100644 --- a/Resources/fileskimmericon.fw.png +++ b/ShiftOS/Resources/fileskimmericon.fw.png diff --git a/ShiftOS/Resources/floodgateicn.png b/ShiftOS/Resources/floodgateicn.png Binary files differnew file mode 100644 index 0000000..c243c8c --- /dev/null +++ b/ShiftOS/Resources/floodgateicn.png diff --git a/Resources/iconArtpad.png b/ShiftOS/Resources/iconArtpad.png Binary files differindex 103eef8..103eef8 100644 --- a/Resources/iconArtpad.png +++ b/ShiftOS/Resources/iconArtpad.png diff --git a/Resources/iconAudioPlayer.png b/ShiftOS/Resources/iconAudioPlayer.png Binary files differindex a445af4..a445af4 100644 --- a/Resources/iconAudioPlayer.png +++ b/ShiftOS/Resources/iconAudioPlayer.png diff --git a/Resources/iconBitnoteDigger.png b/ShiftOS/Resources/iconBitnoteDigger.png Binary files differindex 42cbae3..42cbae3 100644 --- a/Resources/iconBitnoteDigger.png +++ b/ShiftOS/Resources/iconBitnoteDigger.png diff --git a/Resources/iconBitnoteWallet.png b/ShiftOS/Resources/iconBitnoteWallet.png Binary files differindex 1f06a17..1f06a17 100644 --- a/Resources/iconBitnoteWallet.png +++ b/ShiftOS/Resources/iconBitnoteWallet.png diff --git a/Resources/iconCalculator.png b/ShiftOS/Resources/iconCalculator.png Binary files differindex 4a15583..4a15583 100644 --- a/Resources/iconCalculator.png +++ b/ShiftOS/Resources/iconCalculator.png diff --git a/Resources/iconClock.png b/ShiftOS/Resources/iconClock.png Binary files differindex 2bcd19a..2bcd19a 100644 --- a/Resources/iconClock.png +++ b/ShiftOS/Resources/iconClock.png diff --git a/Resources/iconColourPicker.fw.png b/ShiftOS/Resources/iconColourPicker.fw.png Binary files differindex ece25ab..ece25ab 100644 --- a/Resources/iconColourPicker.fw.png +++ b/ShiftOS/Resources/iconColourPicker.fw.png diff --git a/ShiftOS/Resources/iconDodge.png b/ShiftOS/Resources/iconDodge.png Binary files differnew file mode 100644 index 0000000..9a23b57 --- /dev/null +++ b/ShiftOS/Resources/iconDodge.png diff --git a/Resources/iconDownloader.png b/ShiftOS/Resources/iconDownloader.png Binary files differindex 9a3ef2b..9a3ef2b 100644 --- a/Resources/iconDownloader.png +++ b/ShiftOS/Resources/iconDownloader.png diff --git a/Resources/iconFileOpener.fw.png b/ShiftOS/Resources/iconFileOpener.fw.png Binary files differindex 578d499..578d499 100644 --- a/Resources/iconFileOpener.fw.png +++ b/ShiftOS/Resources/iconFileOpener.fw.png diff --git a/Resources/iconFileSaver.fw.png b/ShiftOS/Resources/iconFileSaver.fw.png Binary files differindex 351b5d4..351b5d4 100644 --- a/Resources/iconFileSaver.fw.png +++ b/ShiftOS/Resources/iconFileSaver.fw.png diff --git a/Resources/iconFileSkimmer.png b/ShiftOS/Resources/iconFileSkimmer.png Binary files differindex cb4262b..cb4262b 100644 --- a/Resources/iconFileSkimmer.png +++ b/ShiftOS/Resources/iconFileSkimmer.png diff --git a/Resources/iconIconManager.png b/ShiftOS/Resources/iconIconManager.png Binary files differindex 99246e9..99246e9 100644 --- a/Resources/iconIconManager.png +++ b/ShiftOS/Resources/iconIconManager.png diff --git a/Resources/iconInfoBox.fw.png b/ShiftOS/Resources/iconInfoBox.fw.png Binary files differindex 0c9ebbd..0c9ebbd 100644 --- a/Resources/iconInfoBox.fw.png +++ b/ShiftOS/Resources/iconInfoBox.fw.png diff --git a/Resources/iconKnowledgeInput.png b/ShiftOS/Resources/iconKnowledgeInput.png Binary files differindex b5e513f..b5e513f 100644 --- a/Resources/iconKnowledgeInput.png +++ b/ShiftOS/Resources/iconKnowledgeInput.png diff --git a/Resources/iconNameChanger.png b/ShiftOS/Resources/iconNameChanger.png Binary files differindex 7d94b21..7d94b21 100644 --- a/Resources/iconNameChanger.png +++ b/ShiftOS/Resources/iconNameChanger.png diff --git a/Resources/iconPong.png b/ShiftOS/Resources/iconPong.png Binary files differindex c96cd58..c96cd58 100644 --- a/Resources/iconPong.png +++ b/ShiftOS/Resources/iconPong.png diff --git a/Resources/iconShifter.png b/ShiftOS/Resources/iconShifter.png Binary files differindex 07344bf..07344bf 100644 --- a/Resources/iconShifter.png +++ b/ShiftOS/Resources/iconShifter.png diff --git a/Resources/iconShiftnet.png b/ShiftOS/Resources/iconShiftnet.png Binary files differindex 405662d..405662d 100644 --- a/Resources/iconShiftnet.png +++ b/ShiftOS/Resources/iconShiftnet.png diff --git a/Resources/iconShiftorium.png b/ShiftOS/Resources/iconShiftorium.png Binary files differindex a72239e..a72239e 100644 --- a/Resources/iconShiftorium.png +++ b/ShiftOS/Resources/iconShiftorium.png diff --git a/Resources/iconSkinLoader.png b/ShiftOS/Resources/iconSkinLoader.png Binary files differindex 1df8f53..1df8f53 100644 --- a/Resources/iconSkinLoader.png +++ b/ShiftOS/Resources/iconSkinLoader.png diff --git a/Resources/iconSkinShifter.png b/ShiftOS/Resources/iconSkinShifter.png Binary files differindex cccc0d1..cccc0d1 100644 --- a/Resources/iconSkinShifter.png +++ b/ShiftOS/Resources/iconSkinShifter.png diff --git a/ShiftOS/Resources/iconSnakey.png b/ShiftOS/Resources/iconSnakey.png Binary files differnew file mode 100644 index 0000000..469367c --- /dev/null +++ b/ShiftOS/Resources/iconSnakey.png diff --git a/ShiftOS/Resources/iconSysinfo.png b/ShiftOS/Resources/iconSysinfo.png Binary files differnew file mode 100644 index 0000000..0d1146b --- /dev/null +++ b/ShiftOS/Resources/iconSysinfo.png diff --git a/Resources/iconTerminal.png b/ShiftOS/Resources/iconTerminal.png Binary files differindex df5e779..df5e779 100644 --- a/Resources/iconTerminal.png +++ b/ShiftOS/Resources/iconTerminal.png diff --git a/Resources/iconTextPad.png b/ShiftOS/Resources/iconTextPad.png Binary files differindex 0d536ce..0d536ce 100644 --- a/Resources/iconTextPad.png +++ b/ShiftOS/Resources/iconTextPad.png diff --git a/Resources/iconVideoPlayer.png b/ShiftOS/Resources/iconVideoPlayer.png Binary files differindex 17a9043..17a9043 100644 --- a/Resources/iconVideoPlayer.png +++ b/ShiftOS/Resources/iconVideoPlayer.png diff --git a/Resources/iconWebBrowser.png b/ShiftOS/Resources/iconWebBrowser.png Binary files differindex e22117f..e22117f 100644 --- a/Resources/iconWebBrowser.png +++ b/ShiftOS/Resources/iconWebBrowser.png diff --git a/ShiftOS/Resources/iconfloodgate.png b/ShiftOS/Resources/iconfloodgate.png Binary files differnew file mode 100644 index 0000000..2a7c483 --- /dev/null +++ b/ShiftOS/Resources/iconfloodgate.png diff --git a/Resources/icongraphicpicker.png b/ShiftOS/Resources/icongraphicpicker.png Binary files differindex 59ded9f..59ded9f 100644 --- a/Resources/icongraphicpicker.png +++ b/ShiftOS/Resources/icongraphicpicker.png diff --git a/ShiftOS/Resources/iconmaze.png b/ShiftOS/Resources/iconmaze.png Binary files differnew file mode 100644 index 0000000..18c3c3f --- /dev/null +++ b/ShiftOS/Resources/iconmaze.png diff --git a/ShiftOS/Resources/iconorcwrite.png b/ShiftOS/Resources/iconorcwrite.png Binary files differnew file mode 100644 index 0000000..e1c2862 --- /dev/null +++ b/ShiftOS/Resources/iconorcwrite.png diff --git a/Resources/iconshutdown.png b/ShiftOS/Resources/iconshutdown.png Binary files differindex d4959c2..d4959c2 100644 --- a/Resources/iconshutdown.png +++ b/ShiftOS/Resources/iconshutdown.png diff --git a/ShiftOS/Resources/iconunitytoggle.png b/ShiftOS/Resources/iconunitytoggle.png Binary files differnew file mode 100644 index 0000000..450b092 --- /dev/null +++ b/ShiftOS/Resources/iconunitytoggle.png diff --git a/ShiftOS/Resources/iconvirusscanner.png b/ShiftOS/Resources/iconvirusscanner.png Binary files differnew file mode 100644 index 0000000..5fcb50c --- /dev/null +++ b/ShiftOS/Resources/iconvirusscanner.png diff --git a/Resources/infobox.wav b/ShiftOS/Resources/infobox.wav Binary files differindex 3c6f3f2..3c6f3f2 100644 --- a/Resources/infobox.wav +++ b/ShiftOS/Resources/infobox.wav diff --git a/ShiftOS/Resources/installericon.png b/ShiftOS/Resources/installericon.png Binary files differnew file mode 100644 index 0000000..9b567b7 --- /dev/null +++ b/ShiftOS/Resources/installericon.png diff --git a/Resources/loadbutton.png b/ShiftOS/Resources/loadbutton.png Binary files differindex 54ede1c..54ede1c 100644 --- a/Resources/loadbutton.png +++ b/ShiftOS/Resources/loadbutton.png diff --git a/ShiftOS/Resources/minimatchdodgepreviewimage.png b/ShiftOS/Resources/minimatchdodgepreviewimage.png Binary files differnew file mode 100644 index 0000000..d156318 --- /dev/null +++ b/ShiftOS/Resources/minimatchdodgepreviewimage.png diff --git a/ShiftOS/Resources/minimatchlabyrinthpreview.png b/ShiftOS/Resources/minimatchlabyrinthpreview.png Binary files differnew file mode 100644 index 0000000..3bc7a8b --- /dev/null +++ b/ShiftOS/Resources/minimatchlabyrinthpreview.png diff --git a/Resources/newfolder.png b/ShiftOS/Resources/newfolder.png Binary files differindex 61e3d80..61e3d80 100644 --- a/Resources/newfolder.png +++ b/ShiftOS/Resources/newfolder.png diff --git a/Resources/newicon.png b/ShiftOS/Resources/newicon.png Binary files differindex 0d6db34..0d6db34 100644 --- a/Resources/newicon.png +++ b/ShiftOS/Resources/newicon.png diff --git a/Resources/nextbutton.png b/ShiftOS/Resources/nextbutton.png Binary files differindex 2fdb3ff..2fdb3ff 100644 --- a/Resources/nextbutton.png +++ b/ShiftOS/Resources/nextbutton.png diff --git a/Resources/openicon.png b/ShiftOS/Resources/openicon.png Binary files differindex 8239c2e..8239c2e 100644 --- a/Resources/openicon.png +++ b/ShiftOS/Resources/openicon.png diff --git a/Resources/pausebutton.png b/ShiftOS/Resources/pausebutton.png Binary files differindex 7119b30..7119b30 100644 --- a/Resources/pausebutton.png +++ b/ShiftOS/Resources/pausebutton.png diff --git a/Resources/pixelsetter.png b/ShiftOS/Resources/pixelsetter.png Binary files differindex 4dae604..4dae604 100644 --- a/Resources/pixelsetter.png +++ b/ShiftOS/Resources/pixelsetter.png diff --git a/Resources/playbutton.png b/ShiftOS/Resources/playbutton.png Binary files differindex 4b701f4..4b701f4 100644 --- a/Resources/playbutton.png +++ b/ShiftOS/Resources/playbutton.png diff --git a/Resources/previousbutton.png b/ShiftOS/Resources/previousbutton.png Binary files differindex 69a1c93..69a1c93 100644 --- a/Resources/previousbutton.png +++ b/ShiftOS/Resources/previousbutton.png diff --git a/Resources/rolldown.wav b/ShiftOS/Resources/rolldown.wav Binary files differindex ede21d3..ede21d3 100644 --- a/Resources/rolldown.wav +++ b/ShiftOS/Resources/rolldown.wav diff --git a/Resources/rollup.wav b/ShiftOS/Resources/rollup.wav Binary files differindex 3e44e72..3e44e72 100644 --- a/Resources/rollup.wav +++ b/ShiftOS/Resources/rollup.wav diff --git a/Resources/saveicon.png b/ShiftOS/Resources/saveicon.png Binary files differindex 6404b15..6404b15 100644 --- a/Resources/saveicon.png +++ b/ShiftOS/Resources/saveicon.png diff --git a/ShiftOS/Resources/shiftomizericonpreview.png b/ShiftOS/Resources/shiftomizericonpreview.png Binary files differnew file mode 100644 index 0000000..f26aa3d --- /dev/null +++ b/ShiftOS/Resources/shiftomizericonpreview.png diff --git a/ShiftOS/Resources/shiftomizerindustrialskinpreview.png b/ShiftOS/Resources/shiftomizerindustrialskinpreview.png Binary files differnew file mode 100644 index 0000000..fb8d61e --- /dev/null +++ b/ShiftOS/Resources/shiftomizerindustrialskinpreview.png diff --git a/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png b/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png Binary files differnew file mode 100644 index 0000000..8308328 --- /dev/null +++ b/ShiftOS/Resources/shiftomizerlinuxmintskinpreview.png diff --git a/ShiftOS/Resources/shiftomizernamechangerpreview.png b/ShiftOS/Resources/shiftomizernamechangerpreview.png Binary files differnew file mode 100644 index 0000000..dfec30c --- /dev/null +++ b/ShiftOS/Resources/shiftomizernamechangerpreview.png diff --git a/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png b/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png Binary files differnew file mode 100644 index 0000000..2474786 --- /dev/null +++ b/ShiftOS/Resources/shiftomizerskinshifterscreenshot.png diff --git a/ShiftOS/Resources/shiftomizersliderleftarrow.png b/ShiftOS/Resources/shiftomizersliderleftarrow.png Binary files differnew file mode 100644 index 0000000..44eb41d --- /dev/null +++ b/ShiftOS/Resources/shiftomizersliderleftarrow.png diff --git a/ShiftOS/Resources/shiftomizersliderrightarrow.png b/ShiftOS/Resources/shiftomizersliderrightarrow.png Binary files differnew file mode 100644 index 0000000..84b85f0 --- /dev/null +++ b/ShiftOS/Resources/shiftomizersliderrightarrow.png diff --git a/Resources/skindownarrow.png b/ShiftOS/Resources/skindownarrow.png Binary files differindex 2a568d0..2a568d0 100644 --- a/Resources/skindownarrow.png +++ b/ShiftOS/Resources/skindownarrow.png diff --git a/Resources/skinfile.png b/ShiftOS/Resources/skinfile.png Binary files differindex 11048fb..11048fb 100644 --- a/Resources/skinfile.png +++ b/ShiftOS/Resources/skinfile.png diff --git a/Resources/skinuparrow.png b/ShiftOS/Resources/skinuparrow.png Binary files differindex 753dab1..753dab1 100644 --- a/Resources/skinuparrow.png +++ b/ShiftOS/Resources/skinuparrow.png diff --git a/ShiftOS/Resources/snakeyback.bmp b/ShiftOS/Resources/snakeyback.bmp Binary files differnew file mode 100644 index 0000000..19a55e1 --- /dev/null +++ b/ShiftOS/Resources/snakeyback.bmp diff --git a/Resources/stopbutton.png b/ShiftOS/Resources/stopbutton.png Binary files differindex b4df28d..b4df28d 100644 --- a/Resources/stopbutton.png +++ b/ShiftOS/Resources/stopbutton.png diff --git a/Resources/stretchbutton.png b/ShiftOS/Resources/stretchbutton.png Binary files differindex 7c1d3f3..7c1d3f3 100644 --- a/Resources/stretchbutton.png +++ b/ShiftOS/Resources/stretchbutton.png diff --git a/Resources/stretchbuttonpressed.png b/ShiftOS/Resources/stretchbuttonpressed.png Binary files differindex 63ae251..63ae251 100644 --- a/Resources/stretchbuttonpressed.png +++ b/ShiftOS/Resources/stretchbuttonpressed.png diff --git a/Resources/test.png b/ShiftOS/Resources/test.png Binary files differindex 7a391e5..7a391e5 100644 --- a/Resources/test.png +++ b/ShiftOS/Resources/test.png diff --git a/Resources/textpad.fw.png b/ShiftOS/Resources/textpad.fw.png Binary files differindex 0d536ce..0d536ce 100644 --- a/Resources/textpad.fw.png +++ b/ShiftOS/Resources/textpad.fw.png diff --git a/Resources/tilebutton.png b/ShiftOS/Resources/tilebutton.png Binary files differindex 2504be2..2504be2 100644 --- a/Resources/tilebutton.png +++ b/ShiftOS/Resources/tilebutton.png diff --git a/Resources/tilebuttonpressed.png b/ShiftOS/Resources/tilebuttonpressed.png Binary files differindex 6621cb2..6621cb2 100644 --- a/Resources/tilebuttonpressed.png +++ b/ShiftOS/Resources/tilebuttonpressed.png diff --git a/Resources/transactionsClicked.png b/ShiftOS/Resources/transactionsClicked.png Binary files differindex cf78531..cf78531 100644 --- a/Resources/transactionsClicked.png +++ b/ShiftOS/Resources/transactionsClicked.png diff --git a/Resources/transactionsUnclicked.png b/ShiftOS/Resources/transactionsUnclicked.png Binary files differindex 0af55df..0af55df 100644 --- a/Resources/transactionsUnclicked.png +++ b/ShiftOS/Resources/transactionsUnclicked.png diff --git a/Resources/typesound.wav b/ShiftOS/Resources/typesound.wav Binary files differindex d3e381f..d3e381f 100644 --- a/Resources/typesound.wav +++ b/ShiftOS/Resources/typesound.wav diff --git a/Resources/uparrow.png b/ShiftOS/Resources/uparrow.png Binary files differindex 55a1d61..55a1d61 100644 --- a/Resources/uparrow.png +++ b/ShiftOS/Resources/uparrow.png diff --git a/Resources/updatecustomcolourpallets.png b/ShiftOS/Resources/updatecustomcolourpallets.png Binary files differindex 61e7f90..61e7f90 100644 --- a/Resources/updatecustomcolourpallets.png +++ b/ShiftOS/Resources/updatecustomcolourpallets.png diff --git a/Resources/upgradealartpad.png b/ShiftOS/Resources/upgradealartpad.png Binary files differindex fa0e6ce..fa0e6ce 100644 --- a/Resources/upgradealartpad.png +++ b/ShiftOS/Resources/upgradealartpad.png diff --git a/Resources/upgradealclock.png b/ShiftOS/Resources/upgradealclock.png Binary files differindex af944a1..af944a1 100644 --- a/Resources/upgradealclock.png +++ b/ShiftOS/Resources/upgradealclock.png diff --git a/Resources/upgradealfileskimmer.png b/ShiftOS/Resources/upgradealfileskimmer.png Binary files differindex 9cb4a99..9cb4a99 100644 --- a/Resources/upgradealfileskimmer.png +++ b/ShiftOS/Resources/upgradealfileskimmer.png diff --git a/Resources/upgradealpong.png b/ShiftOS/Resources/upgradealpong.png Binary files differindex 0f60a2c..0f60a2c 100644 --- a/Resources/upgradealpong.png +++ b/ShiftOS/Resources/upgradealpong.png diff --git a/Resources/upgradealshifter.png b/ShiftOS/Resources/upgradealshifter.png Binary files differindex a8a7728..a8a7728 100644 --- a/Resources/upgradealshifter.png +++ b/ShiftOS/Resources/upgradealshifter.png diff --git a/Resources/upgradealshiftorium.png b/ShiftOS/Resources/upgradealshiftorium.png Binary files differindex 71fe105..71fe105 100644 --- a/Resources/upgradealshiftorium.png +++ b/ShiftOS/Resources/upgradealshiftorium.png diff --git a/Resources/upgradealtextpad.png b/ShiftOS/Resources/upgradealtextpad.png Binary files differindex 857139f..857139f 100644 --- a/Resources/upgradealtextpad.png +++ b/ShiftOS/Resources/upgradealtextpad.png diff --git a/ShiftOS/Resources/upgradealunitymode.png b/ShiftOS/Resources/upgradealunitymode.png Binary files differnew file mode 100644 index 0000000..871fb52 --- /dev/null +++ b/ShiftOS/Resources/upgradealunitymode.png diff --git a/Resources/upgradeamandpm.png b/ShiftOS/Resources/upgradeamandpm.png Binary files differindex dd6b35d..dd6b35d 100644 --- a/Resources/upgradeamandpm.png +++ b/ShiftOS/Resources/upgradeamandpm.png diff --git a/Resources/upgradeapplaunchermenu.png b/ShiftOS/Resources/upgradeapplaunchermenu.png Binary files differindex ba82af9..ba82af9 100644 --- a/Resources/upgradeapplaunchermenu.png +++ b/ShiftOS/Resources/upgradeapplaunchermenu.png diff --git a/Resources/upgradeapplaunchershutdown.png b/ShiftOS/Resources/upgradeapplaunchershutdown.png Binary files differindex ee5097b..ee5097b 100644 --- a/Resources/upgradeapplaunchershutdown.png +++ b/ShiftOS/Resources/upgradeapplaunchershutdown.png diff --git a/Resources/upgradeartpad.png b/ShiftOS/Resources/upgradeartpad.png Binary files differindex ef66c2c..ef66c2c 100644 --- a/Resources/upgradeartpad.png +++ b/ShiftOS/Resources/upgradeartpad.png diff --git a/Resources/upgradeartpad128colorpallets.png b/ShiftOS/Resources/upgradeartpad128colorpallets.png Binary files differindex 6fbaf99..6fbaf99 100644 --- a/Resources/upgradeartpad128colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad128colorpallets.png diff --git a/Resources/upgradeartpad16colorpallets.png b/ShiftOS/Resources/upgradeartpad16colorpallets.png Binary files differindex b4dfd50..b4dfd50 100644 --- a/Resources/upgradeartpad16colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad16colorpallets.png diff --git a/Resources/upgradeartpad32colorpallets.png b/ShiftOS/Resources/upgradeartpad32colorpallets.png Binary files differindex 1a1eda4..1a1eda4 100644 --- a/Resources/upgradeartpad32colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad32colorpallets.png diff --git a/Resources/upgradeartpad4colorpallets.png b/ShiftOS/Resources/upgradeartpad4colorpallets.png Binary files differindex d18758b..d18758b 100644 --- a/Resources/upgradeartpad4colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad4colorpallets.png diff --git a/Resources/upgradeartpad64colorpallets.png b/ShiftOS/Resources/upgradeartpad64colorpallets.png Binary files differindex ba665ae..ba665ae 100644 --- a/Resources/upgradeartpad64colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad64colorpallets.png diff --git a/Resources/upgradeartpad8colorpallets.png b/ShiftOS/Resources/upgradeartpad8colorpallets.png Binary files differindex f4bf2bd..f4bf2bd 100644 --- a/Resources/upgradeartpad8colorpallets.png +++ b/ShiftOS/Resources/upgradeartpad8colorpallets.png diff --git a/Resources/upgradeartpaderaser.png b/ShiftOS/Resources/upgradeartpaderaser.png Binary files differindex ee6a37c..ee6a37c 100644 --- a/Resources/upgradeartpaderaser.png +++ b/ShiftOS/Resources/upgradeartpaderaser.png diff --git a/Resources/upgradeartpadfilltool.png b/ShiftOS/Resources/upgradeartpadfilltool.png Binary files differindex 6dcead2..6dcead2 100644 --- a/Resources/upgradeartpadfilltool.png +++ b/ShiftOS/Resources/upgradeartpadfilltool.png diff --git a/Resources/upgradeartpadicon.png b/ShiftOS/Resources/upgradeartpadicon.png Binary files differindex a499621..a499621 100644 --- a/Resources/upgradeartpadicon.png +++ b/ShiftOS/Resources/upgradeartpadicon.png diff --git a/Resources/upgradeartpadlimitlesspixels.png b/ShiftOS/Resources/upgradeartpadlimitlesspixels.png Binary files differindex 7163005..7163005 100644 --- a/Resources/upgradeartpadlimitlesspixels.png +++ b/ShiftOS/Resources/upgradeartpadlimitlesspixels.png diff --git a/Resources/upgradeartpadlinetool.png b/ShiftOS/Resources/upgradeartpadlinetool.png Binary files differindex 869b21d..869b21d 100644 --- a/Resources/upgradeartpadlinetool.png +++ b/ShiftOS/Resources/upgradeartpadlinetool.png diff --git a/Resources/upgradeartpadload.png b/ShiftOS/Resources/upgradeartpadload.png Binary files differindex 2c5f061..2c5f061 100644 --- a/Resources/upgradeartpadload.png +++ b/ShiftOS/Resources/upgradeartpadload.png diff --git a/Resources/upgradeartpadnew.png b/ShiftOS/Resources/upgradeartpadnew.png Binary files differindex 2672079..2672079 100644 --- a/Resources/upgradeartpadnew.png +++ b/ShiftOS/Resources/upgradeartpadnew.png diff --git a/Resources/upgradeartpadovaltool.png b/ShiftOS/Resources/upgradeartpadovaltool.png Binary files differindex fa12d60..fa12d60 100644 --- a/Resources/upgradeartpadovaltool.png +++ b/ShiftOS/Resources/upgradeartpadovaltool.png diff --git a/Resources/upgradeartpadpaintbrushtool.png b/ShiftOS/Resources/upgradeartpadpaintbrushtool.png Binary files differindex 330ee32..330ee32 100644 --- a/Resources/upgradeartpadpaintbrushtool.png +++ b/ShiftOS/Resources/upgradeartpadpaintbrushtool.png diff --git a/Resources/upgradeartpadpenciltool.png b/ShiftOS/Resources/upgradeartpadpenciltool.png Binary files differindex d8eae9c..d8eae9c 100644 --- a/Resources/upgradeartpadpenciltool.png +++ b/ShiftOS/Resources/upgradeartpadpenciltool.png diff --git a/Resources/upgradeartpadpixellimit1024.png b/ShiftOS/Resources/upgradeartpadpixellimit1024.png Binary files differindex c40557e..c40557e 100644 --- a/Resources/upgradeartpadpixellimit1024.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit1024.png diff --git a/Resources/upgradeartpadpixellimit16.png b/ShiftOS/Resources/upgradeartpadpixellimit16.png Binary files differindex 7867b43..7867b43 100644 --- a/Resources/upgradeartpadpixellimit16.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit16.png diff --git a/Resources/upgradeartpadpixellimit16384.png b/ShiftOS/Resources/upgradeartpadpixellimit16384.png Binary files differindex 9496f09..9496f09 100644 --- a/Resources/upgradeartpadpixellimit16384.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit16384.png diff --git a/Resources/upgradeartpadpixellimit256.png b/ShiftOS/Resources/upgradeartpadpixellimit256.png Binary files differindex fb3b9d8..fb3b9d8 100644 --- a/Resources/upgradeartpadpixellimit256.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit256.png diff --git a/Resources/upgradeartpadpixellimit4.png b/ShiftOS/Resources/upgradeartpadpixellimit4.png Binary files differindex ddce437..ddce437 100644 --- a/Resources/upgradeartpadpixellimit4.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit4.png diff --git a/Resources/upgradeartpadpixellimit4096.png b/ShiftOS/Resources/upgradeartpadpixellimit4096.png Binary files differindex 6ff819f..6ff819f 100644 --- a/Resources/upgradeartpadpixellimit4096.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit4096.png diff --git a/Resources/upgradeartpadpixellimit64.png b/ShiftOS/Resources/upgradeartpadpixellimit64.png Binary files differindex 29eb05f..29eb05f 100644 --- a/Resources/upgradeartpadpixellimit64.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit64.png diff --git a/Resources/upgradeartpadpixellimit65536.png b/ShiftOS/Resources/upgradeartpadpixellimit65536.png Binary files differindex 5cc23d4..5cc23d4 100644 --- a/Resources/upgradeartpadpixellimit65536.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit65536.png diff --git a/Resources/upgradeartpadpixellimit8.png b/ShiftOS/Resources/upgradeartpadpixellimit8.png Binary files differindex f21e03e..f21e03e 100644 --- a/Resources/upgradeartpadpixellimit8.png +++ b/ShiftOS/Resources/upgradeartpadpixellimit8.png diff --git a/Resources/upgradeartpadpixelplacer.png b/ShiftOS/Resources/upgradeartpadpixelplacer.png Binary files differindex 88f1a9a..88f1a9a 100644 --- a/Resources/upgradeartpadpixelplacer.png +++ b/ShiftOS/Resources/upgradeartpadpixelplacer.png diff --git a/Resources/upgradeartpadpixelplacermovementmode.png b/ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png Binary files differindex 39097dc..39097dc 100644 --- a/Resources/upgradeartpadpixelplacermovementmode.png +++ b/ShiftOS/Resources/upgradeartpadpixelplacermovementmode.png diff --git a/Resources/upgradeartpadrectangletool.png b/ShiftOS/Resources/upgradeartpadrectangletool.png Binary files differindex 0647fa7..0647fa7 100644 --- a/Resources/upgradeartpadrectangletool.png +++ b/ShiftOS/Resources/upgradeartpadrectangletool.png diff --git a/Resources/upgradeartpadredo.png b/ShiftOS/Resources/upgradeartpadredo.png Binary files differindex c574abd..c574abd 100644 --- a/Resources/upgradeartpadredo.png +++ b/ShiftOS/Resources/upgradeartpadredo.png diff --git a/Resources/upgradeartpadsave.png b/ShiftOS/Resources/upgradeartpadsave.png Binary files differindex 5d464a9..5d464a9 100644 --- a/Resources/upgradeartpadsave.png +++ b/ShiftOS/Resources/upgradeartpadsave.png diff --git a/Resources/upgradeartpadtexttool.png b/ShiftOS/Resources/upgradeartpadtexttool.png Binary files differindex acf7d56..acf7d56 100644 --- a/Resources/upgradeartpadtexttool.png +++ b/ShiftOS/Resources/upgradeartpadtexttool.png diff --git a/Resources/upgradeartpadundo.png b/ShiftOS/Resources/upgradeartpadundo.png Binary files differindex e60c686..e60c686 100644 --- a/Resources/upgradeartpadundo.png +++ b/ShiftOS/Resources/upgradeartpadundo.png diff --git a/Resources/upgradeautoscrollterminal.png b/ShiftOS/Resources/upgradeautoscrollterminal.png Binary files differindex 096377d..096377d 100644 --- a/Resources/upgradeautoscrollterminal.png +++ b/ShiftOS/Resources/upgradeautoscrollterminal.png diff --git a/Resources/upgradeblue.png b/ShiftOS/Resources/upgradeblue.png Binary files differindex d611fd7..d611fd7 100644 --- a/Resources/upgradeblue.png +++ b/ShiftOS/Resources/upgradeblue.png diff --git a/Resources/upgradebluecustom.png b/ShiftOS/Resources/upgradebluecustom.png Binary files differindex 15ff419..15ff419 100644 --- a/Resources/upgradebluecustom.png +++ b/ShiftOS/Resources/upgradebluecustom.png diff --git a/Resources/upgradeblueshades.png b/ShiftOS/Resources/upgradeblueshades.png Binary files differindex e24073b..e24073b 100644 --- a/Resources/upgradeblueshades.png +++ b/ShiftOS/Resources/upgradeblueshades.png diff --git a/Resources/upgradeblueshadeset.png b/ShiftOS/Resources/upgradeblueshadeset.png Binary files differindex d1df0a6..d1df0a6 100644 --- a/Resources/upgradeblueshadeset.png +++ b/ShiftOS/Resources/upgradeblueshadeset.png diff --git a/Resources/upgradebrown.png b/ShiftOS/Resources/upgradebrown.png Binary files differindex 26946f1..26946f1 100644 --- a/Resources/upgradebrown.png +++ b/ShiftOS/Resources/upgradebrown.png diff --git a/Resources/upgradebrowncustom.png b/ShiftOS/Resources/upgradebrowncustom.png Binary files differindex 689da23..689da23 100644 --- a/Resources/upgradebrowncustom.png +++ b/ShiftOS/Resources/upgradebrowncustom.png diff --git a/Resources/upgradebrownshades.png b/ShiftOS/Resources/upgradebrownshades.png Binary files differindex 39da965..39da965 100644 --- a/Resources/upgradebrownshades.png +++ b/ShiftOS/Resources/upgradebrownshades.png diff --git a/Resources/upgradebrownshadeset.png b/ShiftOS/Resources/upgradebrownshadeset.png Binary files differindex dcaf86b..dcaf86b 100644 --- a/Resources/upgradebrownshadeset.png +++ b/ShiftOS/Resources/upgradebrownshadeset.png diff --git a/Resources/upgradeclock.png b/ShiftOS/Resources/upgradeclock.png Binary files differindex c89ffeb..c89ffeb 100644 --- a/Resources/upgradeclock.png +++ b/ShiftOS/Resources/upgradeclock.png diff --git a/Resources/upgradeclockicon.png b/ShiftOS/Resources/upgradeclockicon.png Binary files differindex d31ab31..d31ab31 100644 --- a/Resources/upgradeclockicon.png +++ b/ShiftOS/Resources/upgradeclockicon.png diff --git a/Resources/upgradeclosebutton.gif b/ShiftOS/Resources/upgradeclosebutton.gif Binary files differindex eb45ea6..eb45ea6 100644 --- a/Resources/upgradeclosebutton.gif +++ b/ShiftOS/Resources/upgradeclosebutton.gif diff --git a/Resources/upgradecolourpickericon.png b/ShiftOS/Resources/upgradecolourpickericon.png Binary files differindex a9a1e2d..a9a1e2d 100644 --- a/Resources/upgradecolourpickericon.png +++ b/ShiftOS/Resources/upgradecolourpickericon.png diff --git a/Resources/upgradecustomusername.png b/ShiftOS/Resources/upgradecustomusername.png Binary files differindex d2ee85c..d2ee85c 100644 --- a/Resources/upgradecustomusername.png +++ b/ShiftOS/Resources/upgradecustomusername.png diff --git a/Resources/upgradedesktoppanel.png b/ShiftOS/Resources/upgradedesktoppanel.png Binary files differindex db142d4..db142d4 100644 --- a/Resources/upgradedesktoppanel.png +++ b/ShiftOS/Resources/upgradedesktoppanel.png diff --git a/Resources/upgradedesktoppanelclock.png b/ShiftOS/Resources/upgradedesktoppanelclock.png Binary files differindex 1d417ce..1d417ce 100644 --- a/Resources/upgradedesktoppanelclock.png +++ b/ShiftOS/Resources/upgradedesktoppanelclock.png diff --git a/Resources/upgradedraggablewindows.gif b/ShiftOS/Resources/upgradedraggablewindows.gif Binary files differindex c91bbd1..c91bbd1 100644 --- a/Resources/upgradedraggablewindows.gif +++ b/ShiftOS/Resources/upgradedraggablewindows.gif diff --git a/Resources/upgradefileskimmer.png b/ShiftOS/Resources/upgradefileskimmer.png Binary files differindex 8559818..8559818 100644 --- a/Resources/upgradefileskimmer.png +++ b/ShiftOS/Resources/upgradefileskimmer.png diff --git a/Resources/upgradefileskimmerdelete.png b/ShiftOS/Resources/upgradefileskimmerdelete.png Binary files differindex f0ec7d6..f0ec7d6 100644 --- a/Resources/upgradefileskimmerdelete.png +++ b/ShiftOS/Resources/upgradefileskimmerdelete.png diff --git a/Resources/upgradefileskimmericon.png b/ShiftOS/Resources/upgradefileskimmericon.png Binary files differindex 5c3501e..5c3501e 100644 --- a/Resources/upgradefileskimmericon.png +++ b/ShiftOS/Resources/upgradefileskimmericon.png diff --git a/Resources/upgradefileskimmernew.png b/ShiftOS/Resources/upgradefileskimmernew.png Binary files differindex 0c519d6..0c519d6 100644 --- a/Resources/upgradefileskimmernew.png +++ b/ShiftOS/Resources/upgradefileskimmernew.png diff --git a/Resources/upgradegray.png b/ShiftOS/Resources/upgradegray.png Binary files differindex ffe4632..ffe4632 100644 --- a/Resources/upgradegray.png +++ b/ShiftOS/Resources/upgradegray.png diff --git a/Resources/upgradegraycustom.png b/ShiftOS/Resources/upgradegraycustom.png Binary files differindex adcc04c..adcc04c 100644 --- a/Resources/upgradegraycustom.png +++ b/ShiftOS/Resources/upgradegraycustom.png diff --git a/Resources/upgradegrayshades.png b/ShiftOS/Resources/upgradegrayshades.png Binary files differindex 70945bc..70945bc 100644 --- a/Resources/upgradegrayshades.png +++ b/ShiftOS/Resources/upgradegrayshades.png diff --git a/Resources/upgradegrayshadeset.png b/ShiftOS/Resources/upgradegrayshadeset.png Binary files differindex 8899401..8899401 100644 --- a/Resources/upgradegrayshadeset.png +++ b/ShiftOS/Resources/upgradegrayshadeset.png diff --git a/Resources/upgradegreen.png b/ShiftOS/Resources/upgradegreen.png Binary files differindex 775eb4d..775eb4d 100644 --- a/Resources/upgradegreen.png +++ b/ShiftOS/Resources/upgradegreen.png diff --git a/Resources/upgradegreencustom.png b/ShiftOS/Resources/upgradegreencustom.png Binary files differindex cca44c8..cca44c8 100644 --- a/Resources/upgradegreencustom.png +++ b/ShiftOS/Resources/upgradegreencustom.png diff --git a/Resources/upgradegreenshades.png b/ShiftOS/Resources/upgradegreenshades.png Binary files differindex 1e9c2ef..1e9c2ef 100644 --- a/Resources/upgradegreenshades.png +++ b/ShiftOS/Resources/upgradegreenshades.png diff --git a/Resources/upgradegreenshadeset.png b/ShiftOS/Resources/upgradegreenshadeset.png Binary files differindex d52e8ee..d52e8ee 100644 --- a/Resources/upgradegreenshadeset.png +++ b/ShiftOS/Resources/upgradegreenshadeset.png diff --git a/Resources/upgradehoursssincemidnight.png b/ShiftOS/Resources/upgradehoursssincemidnight.png Binary files differindex 506d970..506d970 100644 --- a/Resources/upgradehoursssincemidnight.png +++ b/ShiftOS/Resources/upgradehoursssincemidnight.png diff --git a/ShiftOS/Resources/upgradeiconunitymode.png b/ShiftOS/Resources/upgradeiconunitymode.png Binary files differnew file mode 100644 index 0000000..ca61f46 --- /dev/null +++ b/ShiftOS/Resources/upgradeiconunitymode.png diff --git a/Resources/upgradeinfoboxicon.png b/ShiftOS/Resources/upgradeinfoboxicon.png Binary files differindex 22db5b2..22db5b2 100644 --- a/Resources/upgradeinfoboxicon.png +++ b/ShiftOS/Resources/upgradeinfoboxicon.png diff --git a/Resources/upgradekiaddons.png b/ShiftOS/Resources/upgradekiaddons.png Binary files differindex c7e618b..c7e618b 100644 --- a/Resources/upgradekiaddons.png +++ b/ShiftOS/Resources/upgradekiaddons.png diff --git a/Resources/upgradekielements.png b/ShiftOS/Resources/upgradekielements.png Binary files differindex 5c5b398..5c5b398 100644 --- a/Resources/upgradekielements.png +++ b/ShiftOS/Resources/upgradekielements.png diff --git a/Resources/upgradeknowledgeinput.png b/ShiftOS/Resources/upgradeknowledgeinput.png Binary files differindex 74ec0d0..74ec0d0 100644 --- a/Resources/upgradeknowledgeinput.png +++ b/ShiftOS/Resources/upgradeknowledgeinput.png diff --git a/Resources/upgradeknowledgeinputicon.png b/ShiftOS/Resources/upgradeknowledgeinputicon.png Binary files differindex d5b5b42..d5b5b42 100644 --- a/Resources/upgradeknowledgeinputicon.png +++ b/ShiftOS/Resources/upgradeknowledgeinputicon.png diff --git a/Resources/upgrademinimizebutton.png b/ShiftOS/Resources/upgrademinimizebutton.png Binary files differindex 4068564..4068564 100644 --- a/Resources/upgrademinimizebutton.png +++ b/ShiftOS/Resources/upgrademinimizebutton.png diff --git a/Resources/upgrademinimizecommand.png b/ShiftOS/Resources/upgrademinimizecommand.png Binary files differindex c268e68..c268e68 100644 --- a/Resources/upgrademinimizecommand.png +++ b/ShiftOS/Resources/upgrademinimizecommand.png diff --git a/Resources/upgrademinuteaccuracytime.png b/ShiftOS/Resources/upgrademinuteaccuracytime.png Binary files differindex 697a60b..697a60b 100644 --- a/Resources/upgrademinuteaccuracytime.png +++ b/ShiftOS/Resources/upgrademinuteaccuracytime.png diff --git a/Resources/upgrademinutesssincemidnight.png b/ShiftOS/Resources/upgrademinutesssincemidnight.png Binary files differindex 45b7889..45b7889 100644 --- a/Resources/upgrademinutesssincemidnight.png +++ b/ShiftOS/Resources/upgrademinutesssincemidnight.png diff --git a/Resources/upgrademoveablewindows.gif b/ShiftOS/Resources/upgrademoveablewindows.gif Binary files differindex 3e657a8..3e657a8 100644 --- a/Resources/upgrademoveablewindows.gif +++ b/ShiftOS/Resources/upgrademoveablewindows.gif diff --git a/Resources/upgrademultitasking.png b/ShiftOS/Resources/upgrademultitasking.png Binary files differindex 536c40a..536c40a 100644 --- a/Resources/upgrademultitasking.png +++ b/ShiftOS/Resources/upgrademultitasking.png diff --git a/Resources/upgradeorange.png b/ShiftOS/Resources/upgradeorange.png Binary files differindex b45f890..b45f890 100644 --- a/Resources/upgradeorange.png +++ b/ShiftOS/Resources/upgradeorange.png diff --git a/Resources/upgradeorangecustom.png b/ShiftOS/Resources/upgradeorangecustom.png Binary files differindex 84bf020..84bf020 100644 --- a/Resources/upgradeorangecustom.png +++ b/ShiftOS/Resources/upgradeorangecustom.png diff --git a/Resources/upgradeorangeshades.png b/ShiftOS/Resources/upgradeorangeshades.png Binary files differindex bfe5683..bfe5683 100644 --- a/Resources/upgradeorangeshades.png +++ b/ShiftOS/Resources/upgradeorangeshades.png diff --git a/Resources/upgradeorangeshadeset.png b/ShiftOS/Resources/upgradeorangeshadeset.png Binary files differindex e30a466..e30a466 100644 --- a/Resources/upgradeorangeshadeset.png +++ b/ShiftOS/Resources/upgradeorangeshadeset.png diff --git a/ShiftOS/Resources/upgradeosname.png b/ShiftOS/Resources/upgradeosname.png Binary files differnew file mode 100644 index 0000000..bb0db4f --- /dev/null +++ b/ShiftOS/Resources/upgradeosname.png diff --git a/Resources/upgradepanelbuttons.png b/ShiftOS/Resources/upgradepanelbuttons.png Binary files differindex 451058a..451058a 100644 --- a/Resources/upgradepanelbuttons.png +++ b/ShiftOS/Resources/upgradepanelbuttons.png diff --git a/Resources/upgradepink.png b/ShiftOS/Resources/upgradepink.png Binary files differindex 6312fa1..6312fa1 100644 --- a/Resources/upgradepink.png +++ b/ShiftOS/Resources/upgradepink.png diff --git a/Resources/upgradepinkcustom.png b/ShiftOS/Resources/upgradepinkcustom.png Binary files differindex 60ed53a..60ed53a 100644 --- a/Resources/upgradepinkcustom.png +++ b/ShiftOS/Resources/upgradepinkcustom.png diff --git a/Resources/upgradepinkshades.png b/ShiftOS/Resources/upgradepinkshades.png Binary files differindex cf715e4..cf715e4 100644 --- a/Resources/upgradepinkshades.png +++ b/ShiftOS/Resources/upgradepinkshades.png diff --git a/Resources/upgradepinkshadeset.png b/ShiftOS/Resources/upgradepinkshadeset.png Binary files differindex dc83681..dc83681 100644 --- a/Resources/upgradepinkshadeset.png +++ b/ShiftOS/Resources/upgradepinkshadeset.png diff --git a/Resources/upgradepong.png b/ShiftOS/Resources/upgradepong.png Binary files differindex d17c5c7..d17c5c7 100644 --- a/Resources/upgradepong.png +++ b/ShiftOS/Resources/upgradepong.png diff --git a/Resources/upgradepongicon.png b/ShiftOS/Resources/upgradepongicon.png Binary files differindex 61dffe3..61dffe3 100644 --- a/Resources/upgradepongicon.png +++ b/ShiftOS/Resources/upgradepongicon.png diff --git a/Resources/upgradepurple.png b/ShiftOS/Resources/upgradepurple.png Binary files differindex 7ac8ce5..7ac8ce5 100644 --- a/Resources/upgradepurple.png +++ b/ShiftOS/Resources/upgradepurple.png diff --git a/Resources/upgradepurplecustom.png b/ShiftOS/Resources/upgradepurplecustom.png Binary files differindex eae2523..eae2523 100644 --- a/Resources/upgradepurplecustom.png +++ b/ShiftOS/Resources/upgradepurplecustom.png diff --git a/Resources/upgradepurpleshades.png b/ShiftOS/Resources/upgradepurpleshades.png Binary files differindex 52323a6..52323a6 100644 --- a/Resources/upgradepurpleshades.png +++ b/ShiftOS/Resources/upgradepurpleshades.png diff --git a/Resources/upgradepurpleshadeset.png b/ShiftOS/Resources/upgradepurpleshadeset.png Binary files differindex 4e0fc5e..4e0fc5e 100644 --- a/Resources/upgradepurpleshadeset.png +++ b/ShiftOS/Resources/upgradepurpleshadeset.png diff --git a/Resources/upgradered.png b/ShiftOS/Resources/upgradered.png Binary files differindex 0337b5e..0337b5e 100644 --- a/Resources/upgradered.png +++ b/ShiftOS/Resources/upgradered.png diff --git a/Resources/upgraderedcustom.png b/ShiftOS/Resources/upgraderedcustom.png Binary files differindex e2e37b3..e2e37b3 100644 --- a/Resources/upgraderedcustom.png +++ b/ShiftOS/Resources/upgraderedcustom.png diff --git a/Resources/upgraderedshades.png b/ShiftOS/Resources/upgraderedshades.png Binary files differindex 3f6afb3..3f6afb3 100644 --- a/Resources/upgraderedshades.png +++ b/ShiftOS/Resources/upgraderedshades.png diff --git a/Resources/upgraderedshadeset.png b/ShiftOS/Resources/upgraderedshadeset.png Binary files differindex 7ad2ffe..7ad2ffe 100644 --- a/Resources/upgraderedshadeset.png +++ b/ShiftOS/Resources/upgraderedshadeset.png diff --git a/ShiftOS/Resources/upgraderemoveth1.png b/ShiftOS/Resources/upgraderemoveth1.png Binary files differnew file mode 100644 index 0000000..0b63d2a --- /dev/null +++ b/ShiftOS/Resources/upgraderemoveth1.png diff --git a/ShiftOS/Resources/upgraderemoveth2.png b/ShiftOS/Resources/upgraderemoveth2.png Binary files differnew file mode 100644 index 0000000..c9f45e4 --- /dev/null +++ b/ShiftOS/Resources/upgraderemoveth2.png diff --git a/ShiftOS/Resources/upgraderemoveth3.png b/ShiftOS/Resources/upgraderemoveth3.png Binary files differnew file mode 100644 index 0000000..68c6e33 --- /dev/null +++ b/ShiftOS/Resources/upgraderemoveth3.png diff --git a/ShiftOS/Resources/upgraderemoveth4.png b/ShiftOS/Resources/upgraderemoveth4.png Binary files differnew file mode 100644 index 0000000..ecedb19 --- /dev/null +++ b/ShiftOS/Resources/upgraderemoveth4.png diff --git a/ShiftOS/Resources/upgraderesize.png b/ShiftOS/Resources/upgraderesize.png Binary files differnew file mode 100644 index 0000000..f57d4b4 --- /dev/null +++ b/ShiftOS/Resources/upgraderesize.png diff --git a/Resources/upgraderollupbutton.gif b/ShiftOS/Resources/upgraderollupbutton.gif Binary files differindex 4157203..4157203 100644 --- a/Resources/upgraderollupbutton.gif +++ b/ShiftOS/Resources/upgraderollupbutton.gif diff --git a/Resources/upgraderollupcommand.png b/ShiftOS/Resources/upgraderollupcommand.png Binary files differindex 330adb0..330adb0 100644 --- a/Resources/upgraderollupcommand.png +++ b/ShiftOS/Resources/upgraderollupcommand.png diff --git a/Resources/upgradesecondssincemidnight.png b/ShiftOS/Resources/upgradesecondssincemidnight.png Binary files differindex 0bd8ae0..0bd8ae0 100644 --- a/Resources/upgradesecondssincemidnight.png +++ b/ShiftOS/Resources/upgradesecondssincemidnight.png diff --git a/Resources/upgradesgameconsoles.png b/ShiftOS/Resources/upgradesgameconsoles.png Binary files differindex a52fffb..a52fffb 100644 --- a/Resources/upgradesgameconsoles.png +++ b/ShiftOS/Resources/upgradesgameconsoles.png diff --git a/Resources/upgradeshiftapplauncher.png b/ShiftOS/Resources/upgradeshiftapplauncher.png Binary files differindex db97f08..db97f08 100644 --- a/Resources/upgradeshiftapplauncher.png +++ b/ShiftOS/Resources/upgradeshiftapplauncher.png diff --git a/Resources/upgradeshiftborders.png b/ShiftOS/Resources/upgradeshiftborders.png Binary files differindex 58f00b3..58f00b3 100644 --- a/Resources/upgradeshiftborders.png +++ b/ShiftOS/Resources/upgradeshiftborders.png diff --git a/Resources/upgradeshiftbuttons.png b/ShiftOS/Resources/upgradeshiftbuttons.png Binary files differindex a678d21..a678d21 100644 --- a/Resources/upgradeshiftbuttons.png +++ b/ShiftOS/Resources/upgradeshiftbuttons.png diff --git a/Resources/upgradeshiftdesktop.png b/ShiftOS/Resources/upgradeshiftdesktop.png Binary files differindex f48296f..f48296f 100644 --- a/Resources/upgradeshiftdesktop.png +++ b/ShiftOS/Resources/upgradeshiftdesktop.png diff --git a/Resources/upgradeshiftdesktoppanel.png b/ShiftOS/Resources/upgradeshiftdesktoppanel.png Binary files differindex 421bae5..421bae5 100644 --- a/Resources/upgradeshiftdesktoppanel.png +++ b/ShiftOS/Resources/upgradeshiftdesktoppanel.png diff --git a/Resources/upgradeshifter.png b/ShiftOS/Resources/upgradeshifter.png Binary files differindex d1b507f..d1b507f 100644 --- a/Resources/upgradeshifter.png +++ b/ShiftOS/Resources/upgradeshifter.png diff --git a/Resources/upgradeshiftericon.png b/ShiftOS/Resources/upgradeshiftericon.png Binary files differindex 4c04dc1..4c04dc1 100644 --- a/Resources/upgradeshiftericon.png +++ b/ShiftOS/Resources/upgradeshiftericon.png diff --git a/ShiftOS/Resources/upgradeshiftitems.png b/ShiftOS/Resources/upgradeshiftitems.png Binary files differnew file mode 100644 index 0000000..8528d3c --- /dev/null +++ b/ShiftOS/Resources/upgradeshiftitems.png diff --git a/Resources/upgradeshiftoriumicon.png b/ShiftOS/Resources/upgradeshiftoriumicon.png Binary files differindex 61247df..61247df 100644 --- a/Resources/upgradeshiftoriumicon.png +++ b/ShiftOS/Resources/upgradeshiftoriumicon.png diff --git a/Resources/upgradeshiftpanelbuttons.png b/ShiftOS/Resources/upgradeshiftpanelbuttons.png Binary files differindex 36fc82a..36fc82a 100644 --- a/Resources/upgradeshiftpanelbuttons.png +++ b/ShiftOS/Resources/upgradeshiftpanelbuttons.png diff --git a/Resources/upgradeshiftpanelclock.png b/ShiftOS/Resources/upgradeshiftpanelclock.png Binary files differindex cbe4cf8..cbe4cf8 100644 --- a/Resources/upgradeshiftpanelclock.png +++ b/ShiftOS/Resources/upgradeshiftpanelclock.png diff --git a/Resources/upgradeshifttitlebar.png b/ShiftOS/Resources/upgradeshifttitlebar.png Binary files differindex 91c8090..91c8090 100644 --- a/Resources/upgradeshifttitlebar.png +++ b/ShiftOS/Resources/upgradeshifttitlebar.png diff --git a/Resources/upgradeshifttitletext.png b/ShiftOS/Resources/upgradeshifttitletext.png Binary files differindex 9242d9a..9242d9a 100644 --- a/Resources/upgradeshifttitletext.png +++ b/ShiftOS/Resources/upgradeshifttitletext.png diff --git a/Resources/upgradeshutdownicon.png b/ShiftOS/Resources/upgradeshutdownicon.png Binary files differindex 4ada5ca..4ada5ca 100644 --- a/Resources/upgradeshutdownicon.png +++ b/ShiftOS/Resources/upgradeshutdownicon.png diff --git a/Resources/upgradeskicarbrands.png b/ShiftOS/Resources/upgradeskicarbrands.png Binary files differindex a73d5cc..a73d5cc 100644 --- a/Resources/upgradeskicarbrands.png +++ b/ShiftOS/Resources/upgradeskicarbrands.png diff --git a/Resources/upgradeskinning.png b/ShiftOS/Resources/upgradeskinning.png Binary files differindex 020de14..020de14 100644 --- a/Resources/upgradeskinning.png +++ b/ShiftOS/Resources/upgradeskinning.png diff --git a/Resources/upgradesplitsecondaccuracy.png b/ShiftOS/Resources/upgradesplitsecondaccuracy.png Binary files differindex eff89a5..eff89a5 100644 --- a/Resources/upgradesplitsecondaccuracy.png +++ b/ShiftOS/Resources/upgradesplitsecondaccuracy.png diff --git a/ShiftOS/Resources/upgradesysinfo.png b/ShiftOS/Resources/upgradesysinfo.png Binary files differnew file mode 100644 index 0000000..42c9c13 --- /dev/null +++ b/ShiftOS/Resources/upgradesysinfo.png diff --git a/Resources/upgradeterminalicon.png b/ShiftOS/Resources/upgradeterminalicon.png Binary files differindex 5c65a13..5c65a13 100644 --- a/Resources/upgradeterminalicon.png +++ b/ShiftOS/Resources/upgradeterminalicon.png diff --git a/Resources/upgradeterminalscrollbar.png b/ShiftOS/Resources/upgradeterminalscrollbar.png Binary files differindex ffa3dea..ffa3dea 100644 --- a/Resources/upgradeterminalscrollbar.png +++ b/ShiftOS/Resources/upgradeterminalscrollbar.png diff --git a/Resources/upgradetextpad.png b/ShiftOS/Resources/upgradetextpad.png Binary files differindex 03958e8..03958e8 100644 --- a/Resources/upgradetextpad.png +++ b/ShiftOS/Resources/upgradetextpad.png diff --git a/Resources/upgradetextpadicon.png b/ShiftOS/Resources/upgradetextpadicon.png Binary files differindex f144a8b..f144a8b 100644 --- a/Resources/upgradetextpadicon.png +++ b/ShiftOS/Resources/upgradetextpadicon.png diff --git a/Resources/upgradetextpadnew.png b/ShiftOS/Resources/upgradetextpadnew.png Binary files differindex 8dad0ce..8dad0ce 100644 --- a/Resources/upgradetextpadnew.png +++ b/ShiftOS/Resources/upgradetextpadnew.png diff --git a/Resources/upgradetextpadopen.png b/ShiftOS/Resources/upgradetextpadopen.png Binary files differindex c29190c..c29190c 100644 --- a/Resources/upgradetextpadopen.png +++ b/ShiftOS/Resources/upgradetextpadopen.png diff --git a/Resources/upgradetextpadsave.png b/ShiftOS/Resources/upgradetextpadsave.png Binary files differindex d62d369..d62d369 100644 --- a/Resources/upgradetextpadsave.png +++ b/ShiftOS/Resources/upgradetextpadsave.png diff --git a/Resources/upgradetitlebar.png b/ShiftOS/Resources/upgradetitlebar.png Binary files differindex 722b60e..722b60e 100644 --- a/Resources/upgradetitlebar.png +++ b/ShiftOS/Resources/upgradetitlebar.png diff --git a/Resources/upgradetitletext.png b/ShiftOS/Resources/upgradetitletext.png Binary files differindex e29d7d3..e29d7d3 100644 --- a/Resources/upgradetitletext.png +++ b/ShiftOS/Resources/upgradetitletext.png diff --git a/ShiftOS/Resources/upgradetrm.png b/ShiftOS/Resources/upgradetrm.png Binary files differnew file mode 100644 index 0000000..bc6f02c --- /dev/null +++ b/ShiftOS/Resources/upgradetrm.png diff --git a/Resources/upgradeunitymode.png b/ShiftOS/Resources/upgradeunitymode.png Binary files differindex 24fa057..24fa057 100644 --- a/Resources/upgradeunitymode.png +++ b/ShiftOS/Resources/upgradeunitymode.png diff --git a/Resources/upgradeusefulpanelbuttons.png b/ShiftOS/Resources/upgradeusefulpanelbuttons.png Binary files differindex 6308051..6308051 100644 --- a/Resources/upgradeusefulpanelbuttons.png +++ b/ShiftOS/Resources/upgradeusefulpanelbuttons.png diff --git a/ShiftOS/Resources/upgradevirusscanner.png b/ShiftOS/Resources/upgradevirusscanner.png Binary files differnew file mode 100644 index 0000000..37e548e --- /dev/null +++ b/ShiftOS/Resources/upgradevirusscanner.png diff --git a/Resources/upgradewindowborders.png b/ShiftOS/Resources/upgradewindowborders.png Binary files differindex fb7e876..fb7e876 100644 --- a/Resources/upgradewindowborders.png +++ b/ShiftOS/Resources/upgradewindowborders.png diff --git a/Resources/upgradewindowedterminal.png b/ShiftOS/Resources/upgradewindowedterminal.png Binary files differindex 2f87ce0..2f87ce0 100644 --- a/Resources/upgradewindowedterminal.png +++ b/ShiftOS/Resources/upgradewindowedterminal.png diff --git a/Resources/upgradewindowsanywhere.png b/ShiftOS/Resources/upgradewindowsanywhere.png Binary files differindex 9fa307c..9fa307c 100644 --- a/Resources/upgradewindowsanywhere.png +++ b/ShiftOS/Resources/upgradewindowsanywhere.png diff --git a/Resources/upgradeyellow.png b/ShiftOS/Resources/upgradeyellow.png Binary files differindex 1e4e13d..1e4e13d 100644 --- a/Resources/upgradeyellow.png +++ b/ShiftOS/Resources/upgradeyellow.png diff --git a/Resources/upgradeyellowcustom.png b/ShiftOS/Resources/upgradeyellowcustom.png Binary files differindex 641b40f..641b40f 100644 --- a/Resources/upgradeyellowcustom.png +++ b/ShiftOS/Resources/upgradeyellowcustom.png diff --git a/Resources/upgradeyellowshades.png b/ShiftOS/Resources/upgradeyellowshades.png Binary files differindex 9052945..9052945 100644 --- a/Resources/upgradeyellowshades.png +++ b/ShiftOS/Resources/upgradeyellowshades.png diff --git a/Resources/upgradeyellowshadeset.png b/ShiftOS/Resources/upgradeyellowshadeset.png Binary files differindex 05c9ada..05c9ada 100644 --- a/Resources/upgradeyellowshadeset.png +++ b/ShiftOS/Resources/upgradeyellowshadeset.png diff --git a/Resources/webback.png b/ShiftOS/Resources/webback.png Binary files differindex 6e52ffc..6e52ffc 100644 --- a/Resources/webback.png +++ b/ShiftOS/Resources/webback.png diff --git a/Resources/webforward.png b/ShiftOS/Resources/webforward.png Binary files differindex eea3e76..eea3e76 100644 --- a/Resources/webforward.png +++ b/ShiftOS/Resources/webforward.png diff --git a/Resources/webhome.png b/ShiftOS/Resources/webhome.png Binary files differindex 5bb886f..5bb886f 100644 --- a/Resources/webhome.png +++ b/ShiftOS/Resources/webhome.png diff --git a/Resources/writesound.wav b/ShiftOS/Resources/writesound.wav Binary files differindex 84092d0..84092d0 100644 --- a/Resources/writesound.wav +++ b/ShiftOS/Resources/writesound.wav diff --git a/Resources/zoombutton.png b/ShiftOS/Resources/zoombutton.png Binary files differindex 32e5da9..32e5da9 100644 --- a/Resources/zoombutton.png +++ b/ShiftOS/Resources/zoombutton.png diff --git a/Resources/zoombuttonpressed.png b/ShiftOS/Resources/zoombuttonpressed.png Binary files differindex d82d2be..d82d2be 100644 --- a/Resources/zoombuttonpressed.png +++ b/ShiftOS/Resources/zoombuttonpressed.png 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 Save File Converter.Designer.vb b/ShiftOS/ShiftOS Save File Converter.Designer.vb index d6d8478..6dc846b 100644 --- a/ShiftOS Save File Converter.Designer.vb +++ b/ShiftOS/ShiftOS Save File Converter.Designer.vb @@ -47,7 +47,7 @@ Partial Class ShiftOS_Save_File_Converter Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(189, 33) Me.Label2.TabIndex = 1 - Me.Label2.Text = "0.0.6 > 0.0.7" + Me.Label2.Text = "0.0.7 > 0.0.8" ' 'btnconvert ' diff --git a/ShiftOS Save File Converter.resx b/ShiftOS/ShiftOS Save File Converter.resx index cfd5e7a..0b57e5f 100644 --- a/ShiftOS Save File Converter.resx +++ b/ShiftOS/ShiftOS Save File Converter.resx @@ -118,8 +118,8 @@ <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.6 save files into ShiftOS 0.0.7 save files. + <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.6 please cancel this conversion process. This converter will only convert 0.0.6 save files into files compatible with ShiftOS 0.0.7.</value> +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.vbproj b/ShiftOS/ShiftOS.vbproj index 0039b12..feb32d7 100644 --- a/ShiftOS.vbproj +++ b/ShiftOS/ShiftOS.vbproj @@ -8,12 +8,12 @@ <OutputType>WinExe</OutputType> <StartupObject>ShiftOS.My.MyApplication</StartupObject> <RootNamespace>ShiftOS</RootNamespace> - <AssemblyName>ShiftOS 0.0.8 Beta 1.1</AssemblyName> + <AssemblyName>ShiftOS 0.0.8 RC2</AssemblyName> <FileAlignment>512</FileAlignment> <MyType>WindowsForms</MyType> <TargetFrameworkVersion>v4.5</TargetFrameworkVersion> <IsWebBootstrapper>false</IsWebBootstrapper> - <PublishUrl>publish\</PublishUrl> + <PublishUrl>C:\Users\William\Desktop\</PublishUrl> <Install>true</Install> <InstallFrom>Disk</InstallFrom> <UpdateEnabled>false</UpdateEnabled> @@ -23,7 +23,7 @@ <UpdatePeriodically>false</UpdatePeriodically> <UpdateRequired>false</UpdateRequired> <MapFileExtensions>true</MapFileExtensions> - <ApplicationRevision>97</ApplicationRevision> + <ApplicationRevision>98</ApplicationRevision> <ApplicationVersion>0.0.7.%2a</ApplicationVersion> <UseApplicationTrust>false</UseApplicationTrust> <PublishWizardCompleted>true</PublishWizardCompleted> @@ -35,8 +35,9 @@ <DebugType>full</DebugType> <DefineDebug>true</DefineDebug> <DefineTrace>true</DefineTrace> - <OutputPath>bin\Debug\</OutputPath> - <DocumentationFile>ShiftOS 0.0.8 Beta 1.1.xml</DocumentationFile> + <OutputPath>..\..\ShiftOS 0.0.8 RCs\</OutputPath> + <DocumentationFile> + </DocumentationFile> <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> </PropertyGroup> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> @@ -45,8 +46,9 @@ <DefineDebug>false</DefineDebug> <DefineTrace>true</DefineTrace> <Optimize>true</Optimize> - <OutputPath>bin\Release\</OutputPath> - <DocumentationFile>ShiftOS 0.0.8 Beta 1.1.xml</DocumentationFile> + <OutputPath>bin\Debug\</OutputPath> + <DocumentationFile> + </DocumentationFile> <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn> </PropertyGroup> <PropertyGroup> @@ -87,7 +89,9 @@ <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.Windows.Forms" /> <Reference Include="System.Xml" /> <Reference Include="System.Core" /> @@ -140,6 +144,25 @@ <Compile Include="Calculator.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> @@ -153,36 +176,123 @@ <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="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="Video Player.Designer.vb"> <DependentUpon>Video Player.vb</DependentUpon> </Compile> @@ -228,7 +338,6 @@ <Compile Include="infobox.vb"> <SubType>Form</SubType> </Compile> - <Compile Include="integer.vb" /> <Compile Include="Knowledge Input.Designer.vb"> <DependentUpon>Knowledge Input.vb</DependentUpon> </Compile> @@ -309,6 +418,12 @@ </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> @@ -339,21 +454,70 @@ <EmbeddedResource Include="Colour Picker.resx"> <DependentUpon>Colour Picker.vb</DependentUpon> </EmbeddedResource> + <EmbeddedResource Include="coherencemodeform.resx"> + <DependentUpon>coherencemodeform.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="Video Player.resx"> <DependentUpon>Video Player.vb</DependentUpon> </EmbeddedResource> @@ -411,6 +575,9 @@ <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> @@ -428,6 +595,11 @@ <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> @@ -727,6 +899,61 @@ <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" /> <Content Include="ShiftOSLogo.ico" /> </ItemGroup> <ItemGroup> diff --git a/ShiftOSDesktop.Designer.vb b/ShiftOS/ShiftOSDesktop.Designer.vb index e8b0888..1e8809b 100644 --- a/ShiftOSDesktop.Designer.vb +++ b/ShiftOS/ShiftOSDesktop.Designer.vb @@ -28,6 +28,9 @@ Partial Class ShiftOSDesktop 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() @@ -49,12 +52,6 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonshiftorium = New System.Windows.Forms.Panel() Me.tbshiftoriumicon = New System.Windows.Forms.PictureBox() Me.tbshiftoriumtext = 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.pnlpanelbuttonpong = New System.Windows.Forms.Panel() Me.tbpongicon = New System.Windows.Forms.PictureBox() Me.tbpongtext = New System.Windows.Forms.Label() @@ -76,12 +73,12 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonaudioplayer = New System.Windows.Forms.Panel() Me.tbaudioplayericon = New System.Windows.Forms.PictureBox() Me.tbaudioplayertext = 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.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() @@ -97,45 +94,111 @@ Partial Class ShiftOSDesktop 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.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.KnowledgeInputToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ShiftoriumToolStripMenuItem = 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.TerminalToolStripMenuItem = 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.TextPadToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ShifterToolStripMenuItem = 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.ShiftnetToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShiftoriumToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SkinLoaderToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ArtpadToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.CalculatorToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.AudioplayerToolStripMenuItem = 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.NameChangerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.IconManagerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.BitnoteWalletToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.BitnoteDiggerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.SkinShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.VirusScannerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripSeparator1 = 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.pnlpanelbuttonshiftnet = New System.Windows.Forms.Panel() - Me.tbshiftneticon = New System.Windows.Forms.PictureBox() - Me.tbshiftnettext = 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.ShiftnetToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + 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.IconViewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TileViewToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripSeparator() + Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() 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() @@ -150,10 +213,6 @@ Partial Class ShiftOSDesktop CType(Me.tbcolourpickericon, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlpanelbuttonshiftorium.SuspendLayout() CType(Me.tbshiftoriumicon, 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.pnlpanelbuttonpong.SuspendLayout() CType(Me.tbpongicon, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlpanelbuttonterminal.SuspendLayout() @@ -168,10 +227,10 @@ Partial Class ShiftOSDesktop CType(Me.tbcalculatoricon, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlpanelbuttonaudioplayer.SuspendLayout() CType(Me.tbaudioplayericon, System.ComponentModel.ISupportInitialize).BeginInit() - Me.pnlpanelbuttonwebbrowser.SuspendLayout() - CType(Me.tbwebbrowsericon, 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() @@ -182,13 +241,36 @@ Partial Class ShiftOSDesktop 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.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.pnlpanelbuttonshiftnet.SuspendLayout() - CType(Me.tbshiftneticon, System.ComponentModel.ISupportInitialize).BeginInit() - Me.pnlpanelbuttondownloader.SuspendLayout() - CType(Me.tbdownloadericon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlpanelbuttonfloatybird.SuspendLayout() + CType(Me.tbfloatybirdicon, System.ComponentModel.ISupportInitialize).BeginInit() + Me.ContextMenuStrip1.SuspendLayout() Me.SuspendLayout() ' 'desktoppanel @@ -200,7 +282,7 @@ Partial Class ShiftOSDesktop 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(1745, 24) + Me.desktoppanel.Size = New System.Drawing.Size(1268, 24) Me.desktoppanel.TabIndex = 0 Me.desktoppanel.Visible = False ' @@ -208,6 +290,7 @@ Partial Class ShiftOSDesktop ' 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) @@ -215,8 +298,6 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonknowledgeinput) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoncolourpicker) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonshiftorium) - Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonfilesaver) - Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonshifter) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonpong) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonterminal) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttontextpad) @@ -224,20 +305,31 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonartpad) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttoncalculator) Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonaudioplayer) - Me.pnlpanelbuttonholder.Controls.Add(Me.pnlpanelbuttonwebbrowser) 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.pnlpanelbuttonshiftnet) 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.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(1518, 24) + Me.pnlpanelbuttonholder.Size = New System.Drawing.Size(1041, 24) Me.pnlpanelbuttonholder.TabIndex = 1 ' 'pnlpanelbuttonclock @@ -247,7 +339,7 @@ Partial Class ShiftOSDesktop 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(52, 20) + Me.pnlpanelbuttonclock.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonclock.TabIndex = 5 Me.pnlpanelbuttonclock.Visible = False ' @@ -275,14 +367,49 @@ Partial Class ShiftOSDesktop 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(63, 3) + Me.pnlpanelbuttonskinloader.Location = New System.Drawing.Point(37, 3) Me.pnlpanelbuttonskinloader.Name = "pnlpanelbuttonskinloader" - Me.pnlpanelbuttonskinloader.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonskinloader.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonskinloader.TabIndex = 7 Me.pnlpanelbuttonskinloader.Visible = False ' @@ -315,9 +442,9 @@ Partial Class ShiftOSDesktop 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(121, 3) + Me.pnlpanelbuttonfileskimmer.Location = New System.Drawing.Point(53, 3) Me.pnlpanelbuttonfileskimmer.Name = "pnlpanelbuttonfileskimmer" - Me.pnlpanelbuttonfileskimmer.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonfileskimmer.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonfileskimmer.TabIndex = 6 Me.pnlpanelbuttonfileskimmer.Visible = False ' @@ -350,9 +477,9 @@ Partial Class ShiftOSDesktop 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(179, 3) + Me.pnlpanelbuttonfileopener.Location = New System.Drawing.Point(69, 3) Me.pnlpanelbuttonfileopener.Name = "pnlpanelbuttonfileopener" - Me.pnlpanelbuttonfileopener.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonfileopener.Size = New System.Drawing.Size(12, 20) Me.pnlpanelbuttonfileopener.TabIndex = 6 Me.pnlpanelbuttonfileopener.Visible = False ' @@ -385,9 +512,9 @@ Partial Class ShiftOSDesktop 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(237, 3) + Me.pnlpanelbuttoninfobox.Location = New System.Drawing.Point(87, 3) Me.pnlpanelbuttoninfobox.Name = "pnlpanelbuttoninfobox" - Me.pnlpanelbuttoninfobox.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttoninfobox.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttoninfobox.TabIndex = 6 Me.pnlpanelbuttoninfobox.Visible = False ' @@ -420,9 +547,9 @@ Partial Class ShiftOSDesktop 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(295, 3) + Me.pnlpanelbuttonknowledgeinput.Location = New System.Drawing.Point(103, 3) Me.pnlpanelbuttonknowledgeinput.Name = "pnlpanelbuttonknowledgeinput" - Me.pnlpanelbuttonknowledgeinput.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonknowledgeinput.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonknowledgeinput.TabIndex = 6 Me.pnlpanelbuttonknowledgeinput.Visible = False ' @@ -455,9 +582,9 @@ Partial Class ShiftOSDesktop 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(353, 3) + Me.pnlpanelbuttoncolourpicker.Location = New System.Drawing.Point(119, 3) Me.pnlpanelbuttoncolourpicker.Name = "pnlpanelbuttoncolourpicker" - Me.pnlpanelbuttoncolourpicker.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttoncolourpicker.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttoncolourpicker.TabIndex = 6 Me.pnlpanelbuttoncolourpicker.Visible = False ' @@ -490,9 +617,9 @@ Partial Class ShiftOSDesktop 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(411, 3) + Me.pnlpanelbuttonshiftorium.Location = New System.Drawing.Point(135, 3) Me.pnlpanelbuttonshiftorium.Name = "pnlpanelbuttonshiftorium" - Me.pnlpanelbuttonshiftorium.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonshiftorium.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonshiftorium.TabIndex = 7 Me.pnlpanelbuttonshiftorium.Visible = False ' @@ -520,84 +647,14 @@ Partial Class ShiftOSDesktop Me.tbshiftoriumtext.TabIndex = 0 Me.tbshiftoriumtext.Text = "Shiftorium" ' - '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(469, 3) - Me.pnlpanelbuttonfilesaver.Name = "pnlpanelbuttonfilesaver" - Me.pnlpanelbuttonfilesaver.Size = New System.Drawing.Size(52, 20) - Me.pnlpanelbuttonfilesaver.TabIndex = 6 - 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(527, 3) - Me.pnlpanelbuttonshifter.Name = "pnlpanelbuttonshifter" - Me.pnlpanelbuttonshifter.Size = New System.Drawing.Size(52, 20) - Me.pnlpanelbuttonshifter.TabIndex = 6 - 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" - ' '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(585, 3) + Me.pnlpanelbuttonpong.Location = New System.Drawing.Point(151, 3) Me.pnlpanelbuttonpong.Name = "pnlpanelbuttonpong" - Me.pnlpanelbuttonpong.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonpong.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonpong.TabIndex = 6 Me.pnlpanelbuttonpong.Visible = False ' @@ -630,9 +687,9 @@ Partial Class ShiftOSDesktop 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(643, 3) + Me.pnlpanelbuttonterminal.Location = New System.Drawing.Point(167, 3) Me.pnlpanelbuttonterminal.Name = "pnlpanelbuttonterminal" - Me.pnlpanelbuttonterminal.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonterminal.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonterminal.TabIndex = 8 Me.pnlpanelbuttonterminal.Visible = False ' @@ -665,9 +722,9 @@ Partial Class ShiftOSDesktop 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(701, 3) + Me.pnlpanelbuttontextpad.Location = New System.Drawing.Point(183, 3) Me.pnlpanelbuttontextpad.Name = "pnlpanelbuttontextpad" - Me.pnlpanelbuttontextpad.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttontextpad.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttontextpad.TabIndex = 4 Me.pnlpanelbuttontextpad.Visible = False ' @@ -700,9 +757,9 @@ Partial Class ShiftOSDesktop 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(759, 3) + Me.pnlpanelbuttongraphicpicker.Location = New System.Drawing.Point(199, 3) Me.pnlpanelbuttongraphicpicker.Name = "pnlpanelbuttongraphicpicker" - Me.pnlpanelbuttongraphicpicker.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttongraphicpicker.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttongraphicpicker.TabIndex = 6 Me.pnlpanelbuttongraphicpicker.Visible = False ' @@ -735,9 +792,9 @@ Partial Class ShiftOSDesktop 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(817, 3) + Me.pnlpanelbuttonartpad.Location = New System.Drawing.Point(215, 3) Me.pnlpanelbuttonartpad.Name = "pnlpanelbuttonartpad" - Me.pnlpanelbuttonartpad.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonartpad.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonartpad.TabIndex = 9 Me.pnlpanelbuttonartpad.Visible = False ' @@ -770,9 +827,9 @@ Partial Class ShiftOSDesktop 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(875, 3) + Me.pnlpanelbuttoncalculator.Location = New System.Drawing.Point(231, 3) Me.pnlpanelbuttoncalculator.Name = "pnlpanelbuttoncalculator" - Me.pnlpanelbuttoncalculator.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttoncalculator.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttoncalculator.TabIndex = 10 Me.pnlpanelbuttoncalculator.Visible = False ' @@ -805,9 +862,9 @@ Partial Class ShiftOSDesktop 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(933, 3) + Me.pnlpanelbuttonaudioplayer.Location = New System.Drawing.Point(247, 3) Me.pnlpanelbuttonaudioplayer.Name = "pnlpanelbuttonaudioplayer" - Me.pnlpanelbuttonaudioplayer.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonaudioplayer.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonaudioplayer.TabIndex = 11 Me.pnlpanelbuttonaudioplayer.Visible = False ' @@ -835,49 +892,14 @@ Partial Class ShiftOSDesktop Me.tbaudioplayertext.TabIndex = 0 Me.tbaudioplayertext.Text = "Audio 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(991, 3) - Me.pnlpanelbuttonwebbrowser.Name = "pnlpanelbuttonwebbrowser" - Me.pnlpanelbuttonwebbrowser.Size = New System.Drawing.Size(52, 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" - ' '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(1049, 3) + Me.pnlpanelbuttonvideoplayer.Location = New System.Drawing.Point(263, 3) Me.pnlpanelbuttonvideoplayer.Name = "pnlpanelbuttonvideoplayer" - Me.pnlpanelbuttonvideoplayer.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonvideoplayer.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonvideoplayer.TabIndex = 13 Me.pnlpanelbuttonvideoplayer.Visible = False ' @@ -905,14 +927,49 @@ Partial Class ShiftOSDesktop 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(1107, 3) + Me.pnlpanelbuttonnamechanger.Location = New System.Drawing.Point(295, 3) Me.pnlpanelbuttonnamechanger.Name = "pnlpanelbuttonnamechanger" - Me.pnlpanelbuttonnamechanger.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonnamechanger.Size = New System.Drawing.Size(36, 20) Me.pnlpanelbuttonnamechanger.TabIndex = 14 Me.pnlpanelbuttonnamechanger.Visible = False ' @@ -945,9 +1002,9 @@ Partial Class ShiftOSDesktop 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(1165, 3) + Me.pnlpanelbuttoniconmanager.Location = New System.Drawing.Point(337, 3) Me.pnlpanelbuttoniconmanager.Name = "pnlpanelbuttoniconmanager" - Me.pnlpanelbuttoniconmanager.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttoniconmanager.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttoniconmanager.TabIndex = 15 Me.pnlpanelbuttoniconmanager.Visible = False ' @@ -980,9 +1037,9 @@ Partial Class ShiftOSDesktop 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(1223, 3) + Me.pnlpanelbuttonbitnotewallet.Location = New System.Drawing.Point(353, 3) Me.pnlpanelbuttonbitnotewallet.Name = "pnlpanelbuttonbitnotewallet" - Me.pnlpanelbuttonbitnotewallet.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonbitnotewallet.Size = New System.Drawing.Size(10, 20) Me.pnlpanelbuttonbitnotewallet.TabIndex = 16 Me.pnlpanelbuttonbitnotewallet.Visible = False ' @@ -1015,9 +1072,9 @@ Partial Class ShiftOSDesktop 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(1281, 3) + Me.pnlpanelbuttonbitnotedigger.Location = New System.Drawing.Point(369, 3) Me.pnlpanelbuttonbitnotedigger.Name = "pnlpanelbuttonbitnotedigger" - Me.pnlpanelbuttonbitnotedigger.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonbitnotedigger.Size = New System.Drawing.Size(15, 20) Me.pnlpanelbuttonbitnotedigger.TabIndex = 17 Me.pnlpanelbuttonbitnotedigger.Visible = False ' @@ -1050,9 +1107,9 @@ Partial Class ShiftOSDesktop 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(1339, 3) + Me.pnlpanelbuttonskinshifter.Location = New System.Drawing.Point(390, 3) Me.pnlpanelbuttonskinshifter.Name = "pnlpanelbuttonskinshifter" - Me.pnlpanelbuttonskinshifter.Size = New System.Drawing.Size(52, 20) + Me.pnlpanelbuttonskinshifter.Size = New System.Drawing.Size(19, 20) Me.pnlpanelbuttonskinshifter.TabIndex = 18 Me.pnlpanelbuttonskinshifter.Visible = False ' @@ -1080,6 +1137,437 @@ Partial Class ShiftOSDesktop 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" + ' + '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(543, 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(581, 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(619, 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(657, 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(663, 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(701, 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(739, 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(777, 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(835, 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) @@ -1110,7 +1598,7 @@ Partial Class ShiftOSDesktop 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.KnowledgeInputToolStripMenuItem, Me.ShiftoriumToolStripMenuItem, Me.ClockToolStripMenuItem, Me.TerminalToolStripMenuItem, Me.FileSkimmerToolStripMenuItem, Me.TextPadToolStripMenuItem, Me.ShifterToolStripMenuItem, Me.PongToolStripMenuItem, Me.SkinLoaderToolStripMenuItem, Me.ArtpadToolStripMenuItem, Me.CalculatorToolStripMenuItem, Me.AudioplayerToolStripMenuItem, Me.WebBrowserToolStripMenuItem, Me.VideoplayerToolStripMenuItem, Me.NameChangerToolStripMenuItem, Me.IconManagerToolStripMenuItem, Me.BitnoteWalletToolStripMenuItem, Me.BitnoteDiggerToolStripMenuItem, Me.SkinShifterToolStripMenuItem, Me.ShiftnetToolStripMenuItem, Me.ToolStripSeparator1, Me.ShutdownToolStripMenuItem}) + Me.ApplicationsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ArtpadToolStripMenuItem, Me.AudioplayerToolStripMenuItem, Me.BitnoteDiggerToolStripMenuItem, Me.BitnoteWalletToolStripMenuItem, Me.CalculatorToolStripMenuItem, 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.ToolStripSeparator1, 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) @@ -1120,148 +1608,214 @@ Partial Class ShiftOSDesktop Me.ApplicationsToolStripMenuItem.TextDirection = System.Windows.Forms.ToolStripTextDirection.Horizontal Me.ApplicationsToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage ' - 'KnowledgeInputToolStripMenuItem + 'ArtpadToolStripMenuItem ' - 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" + Me.ArtpadToolStripMenuItem.Name = "ArtpadToolStripMenuItem" + Me.ArtpadToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.ArtpadToolStripMenuItem.Text = "ArtPad" ' - 'ShiftoriumToolStripMenuItem + 'AudioplayerToolStripMenuItem ' - 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" + 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(181, 22) + Me.ClockToolStripMenuItem.Size = New System.Drawing.Size(214, 22) Me.ClockToolStripMenuItem.Text = "Clock" ' - 'TerminalToolStripMenuItem + 'DodgeToolStripMenuItem ' - 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" + 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(181, 22) + Me.FileSkimmerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) Me.FileSkimmerToolStripMenuItem.Text = "File Skimmer" ' - 'TextPadToolStripMenuItem + 'FloodGateToolStripMenuItem ' - Me.TextPadToolStripMenuItem.Name = "TextPadToolStripMenuItem" - Me.TextPadToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.TextPadToolStripMenuItem.Text = "TextPad" + 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(181, 22) + Me.ShifterToolStripMenuItem.Size = New System.Drawing.Size(214, 22) Me.ShifterToolStripMenuItem.Text = "Shifter" ' - 'PongToolStripMenuItem + 'ShiftnetToolStripMenuItem ' - Me.PongToolStripMenuItem.Name = "PongToolStripMenuItem" - Me.PongToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.PongToolStripMenuItem.Text = "Pong" + 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(181, 22) + Me.SkinLoaderToolStripMenuItem.Size = New System.Drawing.Size(214, 22) Me.SkinLoaderToolStripMenuItem.Text = "Skin Loader" ' - 'ArtpadToolStripMenuItem + 'SkinShifterToolStripMenuItem ' - Me.ArtpadToolStripMenuItem.Name = "ArtpadToolStripMenuItem" - Me.ArtpadToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.ArtpadToolStripMenuItem.Text = "ArtPad" + Me.SkinShifterToolStripMenuItem.Name = "SkinShifterToolStripMenuItem" + Me.SkinShifterToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.SkinShifterToolStripMenuItem.Text = "Skin Shifter" ' - 'CalculatorToolStripMenuItem + 'SnakeyToolStripMenuItem ' - Me.CalculatorToolStripMenuItem.Name = "CalculatorToolStripMenuItem" - Me.CalculatorToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.CalculatorToolStripMenuItem.Text = "Calculator" + Me.SnakeyToolStripMenuItem.Name = "SnakeyToolStripMenuItem" + Me.SnakeyToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.SnakeyToolStripMenuItem.Text = "Snakey" ' - 'AudioplayerToolStripMenuItem + 'sysinfoToolStripMenuItem ' - Me.AudioplayerToolStripMenuItem.Name = "AudioplayerToolStripMenuItem" - Me.AudioplayerToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.AudioplayerToolStripMenuItem.Text = "Audio Player" + 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(181, 22) + 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(181, 22) + Me.VideoplayerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) Me.VideoplayerToolStripMenuItem.Text = "Video Player" ' - 'NameChangerToolStripMenuItem - ' - Me.NameChangerToolStripMenuItem.Name = "NameChangerToolStripMenuItem" - Me.NameChangerToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.NameChangerToolStripMenuItem.Text = "Name Changer" - ' - 'IconManagerToolStripMenuItem - ' - Me.IconManagerToolStripMenuItem.Name = "IconManagerToolStripMenuItem" - Me.IconManagerToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.IconManagerToolStripMenuItem.Text = "Icon Manager" - ' - 'BitnoteWalletToolStripMenuItem - ' - Me.BitnoteWalletToolStripMenuItem.Name = "BitnoteWalletToolStripMenuItem" - Me.BitnoteWalletToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.BitnoteWalletToolStripMenuItem.Text = "Bitnote Wallet" - ' - 'BitnoteDiggerToolStripMenuItem - ' - Me.BitnoteDiggerToolStripMenuItem.Name = "BitnoteDiggerToolStripMenuItem" - Me.BitnoteDiggerToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.BitnoteDiggerToolStripMenuItem.Text = "Bitnote Digger" - ' - 'SkinShifterToolStripMenuItem + 'VirusScannerToolStripMenuItem ' - Me.SkinShifterToolStripMenuItem.Name = "SkinShifterToolStripMenuItem" - Me.SkinShifterToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.SkinShifterToolStripMenuItem.Text = "Skin Shifter" + Me.VirusScannerToolStripMenuItem.Name = "VirusScannerToolStripMenuItem" + Me.VirusScannerToolStripMenuItem.Size = New System.Drawing.Size(214, 22) + Me.VirusScannerToolStripMenuItem.Text = "Virus Scanner" ' '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) + Me.ToolStripSeparator1.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(181, 22) + 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(1648, 0) + 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 @@ -1278,6 +1832,47 @@ Partial Class ShiftOSDesktop 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 @@ -1288,88 +1883,124 @@ Partial Class ShiftOSDesktop Me.autosave.Enabled = True Me.autosave.Interval = 60000 ' - 'pnlpanelbuttonshiftnet + 'nocheat ' - 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(1397, 3) - Me.pnlpanelbuttonshiftnet.Name = "pnlpanelbuttonshiftnet" - Me.pnlpanelbuttonshiftnet.Size = New System.Drawing.Size(52, 20) - Me.pnlpanelbuttonshiftnet.TabIndex = 19 - Me.pnlpanelbuttonshiftnet.Visible = False ' - 'tbshiftneticon + 'desktopicons ' - 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 + 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 ' - 'tbshiftnettext + 'ContextMenuStrip1 ' - 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" + Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NewToolStripMenuItem, Me.ToolStripMenuItem3, Me.IconViewToolStripMenuItem, Me.TileViewToolStripMenuItem, Me.ToolStripMenuItem4, Me.AboutToolStripMenuItem}) + Me.ContextMenuStrip1.Name = "ContextMenuStrip1" + Me.ContextMenuStrip1.Size = New System.Drawing.Size(170, 104) ' - 'pnlpanelbuttondownloader + 'NewToolStripMenuItem ' - 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(1455, 3) - Me.pnlpanelbuttondownloader.Name = "pnlpanelbuttondownloader" - Me.pnlpanelbuttondownloader.Size = New System.Drawing.Size(52, 20) - Me.pnlpanelbuttondownloader.TabIndex = 20 - Me.pnlpanelbuttondownloader.Visible = False + 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" ' - 'tbdownloadericon + 'FolderToolStripMenuItem ' - 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 + Me.FolderToolStripMenuItem.Name = "FolderToolStripMenuItem" + Me.FolderToolStripMenuItem.Size = New System.Drawing.Size(216, 22) + Me.FolderToolStripMenuItem.Text = "Folder" ' - 'tbdownloadertext + 'ToolStripMenuItem2 ' - 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" + Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2" + Me.ToolStripMenuItem2.Size = New System.Drawing.Size(213, 6) ' - 'ShiftnetToolStripMenuItem + 'ArtpadPictureToolStripMenuItem ' - Me.ShiftnetToolStripMenuItem.Name = "ShiftnetToolStripMenuItem" - Me.ShiftnetToolStripMenuItem.Size = New System.Drawing.Size(181, 22) - Me.ShiftnetToolStripMenuItem.Text = "Shiftnet" + 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) + ' + 'IconViewToolStripMenuItem + ' + Me.IconViewToolStripMenuItem.Name = "IconViewToolStripMenuItem" + Me.IconViewToolStripMenuItem.Size = New System.Drawing.Size(169, 22) + Me.IconViewToolStripMenuItem.Text = "Icon View" + ' + 'TileViewToolStripMenuItem + ' + Me.TileViewToolStripMenuItem.Name = "TileViewToolStripMenuItem" + Me.TileViewToolStripMenuItem.Size = New System.Drawing.Size(169, 22) + Me.TileViewToolStripMenuItem.Text = "Tile View" + ' + 'ToolStripMenuItem4 + ' + Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" + Me.ToolStripMenuItem4.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++" ' '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(1745, 805) + Me.ClientSize = New System.Drawing.Size(1268, 685) + Me.Controls.Add(Me.desktopicons) Me.Controls.Add(Me.desktoppanel) Me.KeyPreview = True Me.MainMenuStrip = Me.desktopappmenu @@ -1377,9 +2008,13 @@ Partial Class 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() @@ -1401,12 +2036,6 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonshiftorium.ResumeLayout(False) Me.pnlpanelbuttonshiftorium.PerformLayout() CType(Me.tbshiftoriumicon, 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.pnlpanelbuttonpong.ResumeLayout(False) Me.pnlpanelbuttonpong.PerformLayout() CType(Me.tbpongicon, System.ComponentModel.ISupportInitialize).EndInit() @@ -1428,12 +2057,12 @@ Partial Class ShiftOSDesktop Me.pnlpanelbuttonaudioplayer.ResumeLayout(False) Me.pnlpanelbuttonaudioplayer.PerformLayout() CType(Me.tbaudioplayericon, System.ComponentModel.ISupportInitialize).EndInit() - Me.pnlpanelbuttonwebbrowser.ResumeLayout(False) - Me.pnlpanelbuttonwebbrowser.PerformLayout() - CType(Me.tbwebbrowsericon, 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() @@ -1449,17 +2078,51 @@ Partial Class ShiftOSDesktop 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.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.pnlpanelbuttonshiftnet.ResumeLayout(False) - Me.pnlpanelbuttonshiftnet.PerformLayout() - CType(Me.tbshiftneticon, System.ComponentModel.ISupportInitialize).EndInit() - Me.pnlpanelbuttondownloader.ResumeLayout(False) - Me.pnlpanelbuttondownloader.PerformLayout() - CType(Me.tbdownloadericon, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlpanelbuttonfloatybird.ResumeLayout(False) + Me.pnlpanelbuttonfloatybird.PerformLayout() + CType(Me.tbfloatybirdicon, System.ComponentModel.ISupportInitialize).EndInit() + Me.ContextMenuStrip1.ResumeLayout(False) Me.ResumeLayout(False) End Sub @@ -1491,9 +2154,6 @@ Partial Class ShiftOSDesktop 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 pnlpanelbuttonfilesaver As System.Windows.Forms.Panel - Friend WithEvents tbfilesavericon As System.Windows.Forms.PictureBox - Friend WithEvents tbfilesavertext 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 @@ -1509,9 +2169,6 @@ Partial Class ShiftOSDesktop 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 pnlpanelbuttonshifter As System.Windows.Forms.Panel - Friend WithEvents tbshiftericon As System.Windows.Forms.PictureBox - Friend WithEvents tbshiftertext 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 @@ -1572,4 +2229,71 @@ Partial Class ShiftOSDesktop 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 IconViewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents TileViewToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripMenuItem4 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents AboutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents NewSkin As System.Windows.Forms.ToolStripMenuItem End Class diff --git a/ShiftOSDesktop.resx b/ShiftOS/ShiftOSDesktop.resx index 4a27da5..82aec9c 100644 --- a/ShiftOSDesktop.resx +++ b/ShiftOS/ShiftOSDesktop.resx @@ -126,4 +126,16 @@ <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="$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/ShiftOSDesktop.vb b/ShiftOS/ShiftOSDesktop.vb index c0be181..efb3808 100644 --- a/ShiftOSDesktop.vb +++ b/ShiftOS/ShiftOSDesktop.vb @@ -1,4 +1,8 @@ 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 @@ -11,7 +15,43 @@ Public newgame As Boolean = False Public lastcolourpick As Color = Color.Gray Public programsopen As Integer = 0 - Private actualshiftversion As String = "0.0.7" + Public ShiftOSPath As String = "C:\ShiftOS\" + Private actualshiftversion As String = "0.0.8" + Public ingameversion As String = "0.0.1.0" + + 'Corruptions + 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 @@ -164,21 +204,50 @@ Public boughtartpadsave As Boolean = False Public boughtartpadload As Boolean = False 'new 0.0.8 features - Public boughtresizablewindows As Boolean = True - Public boughtcalculator As Boolean = True - Public boughtaudioplayer As Boolean = True - Public boughtchangeosnamecommand As Boolean = True - Public boughtwebbrowser As Boolean = True - Public boughtvideoplayer As Boolean = True - Public boughtnamechanger As Boolean = True - Public boughticonmanager As Boolean = True - Public boughtbitnotewallet As Boolean = True - Public boughtbitnotedigger As Boolean = True - Public boughtskinshifter As Boolean = True - Public boughtshiftnet As Boolean = True - Public boughtdownloader As Boolean = True - Public boughtshiftneticon As Boolean = True - Public boughtalshiftnet As Boolean = True + 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 + + '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 @@ -277,39 +346,39 @@ '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 + '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 @@ -324,10 +393,14 @@ Public iconmanagericondatalines(50) As String - Public bitnotebalance As Decimal = 2.64028 + 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 @@ -359,6 +432,15 @@ 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 @@ -391,6 +473,15 @@ 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 @@ -418,6 +509,15 @@ 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 @@ -445,8 +545,18 @@ 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 @@ -820,19 +930,163 @@ 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 - - IO.File.WriteAllLines("C:\ShiftOS\Shiftum42\Drivers\HDD.dri", savelines) - File_Crypt.EncryptFile("C:\ShiftOS\Shiftum42\Drivers\HDD.dri", "C:/ShiftOS/Shiftum42/SKernal.sft", sSecretKey) + '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) + + IO.File.WriteAllLines(ShiftOSPath + "Shiftum42\Drivers\HDD.dri", savelines) + File_Crypt.EncryptFile(ShiftOSPath + "Shiftum42\Drivers\HDD.dri", "C:/ShiftOS/Shiftum42/SKernal.sft", sSecretKey) + Try + Dim sw As New IO.StreamWriter(ShiftOSPath & "SoftwareData\DownloadManager\Downloadhistory.lst") + sw.Write(downloadmanagerhistory) + sw.Close() + Catch ex As Exception + End Try Dim objWriter As New System.IO.StreamWriter("C:/ShiftOS/Shiftum42/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("C:/ShiftOS/Shiftum42/SKernal.sft", "C:\ShiftOS\Shiftum42\Drivers\HDD.dri", sSecretKey) - loadlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Drivers\HDD.dri") + 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 boughttitlebar = True Else boughttitlebar = False If loadlines(1) = 11 Then boughtgray = True Else boughtgray = False @@ -1192,27 +1446,160 @@ 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 - - If IO.File.Exists("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat") Then loadcurrentskin() - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Icons") Then setupicons() + '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) + + Viruses.startactiveviruses() + If IO.File.Exists(ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat") Then loadcurrentskin() + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Then setupicons() + If IO.File.Exists(ShiftOSPath & "SoftwareData\DownloadManager\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 - If newgame = True Then + FloodRegistry.registerItems() + If newgame = True Or justconverted = True Then savegame() Else loadgame() + Terminal.runterminalfile(ShiftOSPath + "Shiftum42\autorun.trm") End If ToolStripManager.Renderer = New MyToolStripRenderer() Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None Me.WindowState = FormWindowState.Maximized - loadskinfiles() - setupdesktop() - setupskins() + 'loadskinfiles() + 'setupdesktop() + 'setupskins() + Skins.loadimages() + desktopicons.AllowDrop = True + desktopicons.AutoArrange = False End Sub Public Sub loadcurrentskin() - skinlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat") + skinlines = IO.File.ReadAllLines(ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat") titlebarcolour = Color.FromArgb(skinlines(0)) windowbordercolour = Color.FromArgb(skinlines(1)) windowbordersize = skinlines(2) @@ -1288,526 +1675,58 @@ If skinlines(72) = "" Then Else minimizebuttonside = skinlines(72) If skinlines(73) = "" Then Else minimizebuttontop = skinlines(73) - 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 - - - Public Sub disposeoldskindata(ByVal fromwhere As String) - - 'mostly disabled due to issues with disposing causing red X's - - Select Case fromwhere - Case "skinloaderapplyskin" - shortdisposecode(Skin_Loader.skinloaderskinclosebutton, Me.skinclosebutton, Shifter.skinclosebutton, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebar, Me.skintitlebar, Shifter.shifterskintitlebar, True) - shortdisposecode(Skin_Loader.skinloaderskindesktopbackground, Me.skindesktopbackground, Shifter.skindesktopbackground, True) - shortdisposecode(Skin_Loader.skinloaderskinrollupbutton, Me.skinrollupbutton, Shifter.skinrollupbutton, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebarrightcorner, Me.skintitlebarrightcorner, Shifter.skintitlebarrightcorner, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebarleftcorner, Me.skintitlebarleftcorner, Shifter.skintitlebarleftcorner, True) - shortdisposecode(Skin_Loader.skinloaderskindesktoppanel, Me.skindesktoppanel, Shifter.skindesktoppanel, True) - shortdisposecode(Skin_Loader.skinloaderskindesktoppaneltime, Me.skindesktoppaneltime, Shifter.skindesktoppaneltime, True) - shortdisposecode(Skin_Loader.skinloaderskinapplauncherbutton, Me.skinapplauncherbutton, Shifter.skinapplauncherbutton, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderleft, Me.skinwindowborderleft, Shifter.skinwindowborderleft, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderright, Me.skinwindowborderright, Shifter.skinwindowborderright, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottom, Me.skinwindowborderbottom, Shifter.skinwindowborderbottom, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomright, Me.skinwindowborderbottomright, Shifter.skinwindowborderbottomright, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomleft, Me.skinwindowborderbottomleft, Shifter.skinwindowborderbottomleft, True) - shortdisposecode(Skin_Loader.skinloaderskinpanelbutton, Me.skinpanelbutton, Shifter.skinpanelbutton, True) - shortdisposecode(Skin_Loader.skinloaderskinminimizebutton, Me.skinminimizebutton, Shifter.skinminimizebutton, True) - - 'If Me.BackgroundImage Is Nothing Then Else Me.BackgroundImage.Dispose() - 'If Me.ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then Else Me.ApplicationsToolStripMenuItem.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonholder.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonholder.BackgroundImage.Dispose() - 'If Me.desktoppanel.BackgroundImage Is Nothing Then Else Me.desktoppanel.BackgroundImage.Dispose() - 'If Me.timepanel.BackgroundImage Is Nothing Then Else Me.timepanel.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonclock.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonclock.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonskinloader.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonskinloader.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfileskimmer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfileskimmer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfileopener.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfileopener.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoninfobox.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoninfobox.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonknowledgeinput.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonknowledgeinput.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoncolourpicker.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoncolourpicker.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonshiftorium.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonshiftorium.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfilesaver.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfilesaver.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonshifter.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonshifter.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonpong.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonpong.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonterminal.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonterminal.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttontextpad.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttontextpad.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttongraphicpicker.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttongraphicpicker.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonartpad.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonartpad.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoncalculator.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoncalculator.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonaudioplayer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonaudioplayer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonwebbrowser.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonwebbrowser.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonvideoplayer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonvideoplayer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonnamechanger.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonnamechanger.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoniconmanager.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoniconmanager.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonbitnotewallet.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonbitnotewallet.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonbitnotedigger.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonbitnotedigger.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonskinshifter.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonskinshifter.BackgroundImage.Dispose() - 'If Me.tbclockicon.BackgroundImage Is Nothing Then Else Me.tbclockicon.BackgroundImage.Dispose() - 'If Me.tbskinloadericon.BackgroundImage Is Nothing Then Else Me.tbskinloadericon.BackgroundImage.Dispose() - 'If Me.tbfileskimmericon.BackgroundImage Is Nothing Then Else Me.tbfileskimmericon.BackgroundImage.Dispose() - 'If Me.tbfileopenericon.BackgroundImage Is Nothing Then Else Me.tbfileopenericon.BackgroundImage.Dispose() - 'If Me.tbinfoboxicon.BackgroundImage Is Nothing Then Else Me.tbinfoboxicon.BackgroundImage.Dispose() - 'If Me.tbknowledgeinputicon.BackgroundImage Is Nothing Then Else Me.tbknowledgeinputicon.BackgroundImage.Dispose() - 'If Me.tbcolourpickericon.BackgroundImage Is Nothing Then Else Me.tbcolourpickericon.BackgroundImage.Dispose() - 'If Me.tbshiftoriumicon.BackgroundImage Is Nothing Then Else Me.tbshiftoriumicon.BackgroundImage.Dispose() - 'If Me.tbfilesavericon.BackgroundImage Is Nothing Then Else Me.tbfilesavericon.BackgroundImage.Dispose() - 'If Me.tbshiftericon.BackgroundImage Is Nothing Then Else Me.tbshiftericon.BackgroundImage.Dispose() - 'If Me.tbpongicon.BackgroundImage Is Nothing Then Else Me.tbpongicon.BackgroundImage.Dispose() - 'If Me.tbterminalicon.BackgroundImage Is Nothing Then Else Me.tbterminalicon.BackgroundImage.Dispose() - 'If Me.tbtextpadicon.BackgroundImage Is Nothing Then Else Me.tbtextpadicon.BackgroundImage.Dispose() - 'If Me.tbgraphicpickericon.BackgroundImage Is Nothing Then Else Me.tbgraphicpickericon.BackgroundImage.Dispose() - 'If Me.tbartpadicon.BackgroundImage Is Nothing Then Else Me.tbartpadicon.BackgroundImage.Dispose() - 'If Me.tbcalculatoricon.BackgroundImage Is Nothing Then Else Me.tbcalculatoricon.BackgroundImage.Dispose() - 'If Me.tbaudioplayericon.BackgroundImage Is Nothing Then Else Me.tbaudioplayericon.BackgroundImage.Dispose() - 'If Me.tbwebbrowsericon.BackgroundImage Is Nothing Then Else Me.tbwebbrowsericon.BackgroundImage.Dispose() - 'If Me.tbvideoplayericon.BackgroundImage Is Nothing Then Else Me.tbvideoplayericon.BackgroundImage.Dispose() - 'If Me.tbnamechangericon.BackgroundImage Is Nothing Then Else Me.tbnamechangericon.BackgroundImage.Dispose() - 'If Me.tbiconmanagericon.BackgroundImage Is Nothing Then Else Me.tbiconmanagericon.BackgroundImage.Dispose() - 'If Me.tbbitnotewalleticon.BackgroundImage Is Nothing Then Else Me.tbbitnotewalleticon.BackgroundImage.Dispose() - 'If Me.tbbitnotediggericon.BackgroundImage Is Nothing Then Else Me.tbbitnotediggericon.BackgroundImage.Dispose() - 'If Me.tbskinshiftericon.BackgroundImage Is Nothing Then Else Me.tbskinshiftericon.BackgroundImage.Dispose() - - Me.BackgroundImage = Nothing - Me.ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Me.pnlpanelbuttonholder.BackgroundImage = Nothing - Me.desktoppanel.BackgroundImage = Nothing - Me.timepanel.BackgroundImage = Nothing - Me.pnlpanelbuttonclock.BackgroundImage = Nothing - Me.pnlpanelbuttonskinloader.BackgroundImage = Nothing - Me.pnlpanelbuttonfileskimmer.BackgroundImage = Nothing - Me.pnlpanelbuttonfileopener.BackgroundImage = Nothing - Me.pnlpanelbuttoninfobox.BackgroundImage = Nothing - Me.pnlpanelbuttonknowledgeinput.BackgroundImage = Nothing - Me.pnlpanelbuttoncolourpicker.BackgroundImage = Nothing - Me.pnlpanelbuttonshiftorium.BackgroundImage = Nothing - Me.pnlpanelbuttonfilesaver.BackgroundImage = Nothing - Me.pnlpanelbuttonshifter.BackgroundImage = Nothing - Me.pnlpanelbuttonpong.BackgroundImage = Nothing - Me.pnlpanelbuttonterminal.BackgroundImage = Nothing - Me.pnlpanelbuttontextpad.BackgroundImage = Nothing - Me.pnlpanelbuttongraphicpicker.BackgroundImage = Nothing - Me.pnlpanelbuttonartpad.BackgroundImage = Nothing - Me.pnlpanelbuttoncalculator.BackgroundImage = Nothing - Me.pnlpanelbuttonaudioplayer.BackgroundImage = Nothing - Me.pnlpanelbuttonwebbrowser.BackgroundImage = Nothing - Me.pnlpanelbuttonvideoplayer.BackgroundImage = Nothing - Me.pnlpanelbuttonnamechanger.BackgroundImage = Nothing - Me.pnlpanelbuttoniconmanager.BackgroundImage = Nothing - Me.pnlpanelbuttonbitnotewallet.BackgroundImage = Nothing - Me.pnlpanelbuttonbitnotedigger.BackgroundImage = Nothing - Me.pnlpanelbuttonskinshifter.BackgroundImage = Nothing - Me.pnlpanelbuttonshiftnet.BackgroundImage = Nothing - Me.pnlpanelbuttondownloader.BackgroundImage = Nothing - Me.tbclockicon.BackgroundImage = Nothing - Me.tbskinloadericon.BackgroundImage = Nothing - Me.tbfileskimmericon.BackgroundImage = Nothing - Me.tbfileopenericon.BackgroundImage = Nothing - Me.tbinfoboxicon.BackgroundImage = Nothing - Me.tbknowledgeinputicon.BackgroundImage = Nothing - Me.tbcolourpickericon.BackgroundImage = Nothing - Me.tbshiftoriumicon.BackgroundImage = Nothing - Me.tbfilesavericon.BackgroundImage = Nothing - Me.tbshiftericon.BackgroundImage = Nothing - Me.tbpongicon.BackgroundImage = Nothing - Me.tbterminalicon.BackgroundImage = Nothing - Me.tbtextpadicon.BackgroundImage = Nothing - Me.tbgraphicpickericon.BackgroundImage = Nothing - Me.tbartpadicon.BackgroundImage = Nothing - Me.tbcalculatoricon.BackgroundImage = Nothing - Me.tbaudioplayericon.BackgroundImage = Nothing - Me.tbwebbrowsericon.BackgroundImage = Nothing - Me.tbvideoplayericon.BackgroundImage = Nothing - Me.tbnamechangericon.BackgroundImage = Nothing - Me.tbiconmanagericon.BackgroundImage = Nothing - Me.tbbitnotewalleticon.BackgroundImage = Nothing - Me.tbbitnotediggericon.BackgroundImage = Nothing - Me.tbskinshiftericon.BackgroundImage = Nothing - Me.tbshiftneticon.BackgroundImage = Nothing - Me.tbdownloadericon.BackgroundImage = Nothing - - 'For i = 0 To 50 - ' skinimages(i) = "" - 'Next - - 'If Skin_Loader.pgleft.BackgroundImage Is Nothing Then Else Skin_Loader.pgleft.BackgroundImage.Dispose() - 'If Skin_Loader.pgright.BackgroundImage Is Nothing Then Else Skin_Loader.pgright.BackgroundImage.Dispose() - 'If Skin_Loader.pgbottom.BackgroundImage Is Nothing Then Else Skin_Loader.pgbottom.BackgroundImage.Dispose() - 'If Skin_Loader.pgbottomlcorner.BackgroundImage Is Nothing Then Else Skin_Loader.pgbottomlcorner.BackgroundImage.Dispose() - 'If Skin_Loader.pgbottomrcorner.BackgroundImage Is Nothing Then Else Skin_Loader.pgbottomrcorner.BackgroundImage.Dispose() - - 'If Clock.Visible = True Then - ' If Clock.titlebar.BackgroundImage Is Nothing Then Else Clock.titlebar.BackgroundImage.Dispose() - ' Clock.titlebar.BackgroundImage = Nothing - 'End If - - Skin_Loader.pgleft.BackgroundImage = Nothing - Skin_Loader.pgright.BackgroundImage = Nothing - Skin_Loader.pgbottom.BackgroundImage = Nothing - Skin_Loader.pgbottomlcorner.BackgroundImage = Nothing - Skin_Loader.pgbottomrcorner.BackgroundImage = Nothing - - GC.Collect() - - While My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Current\") - Try - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Current\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Current\", FileIO.DeleteDirectoryOption.DeleteAllContents) - Catch ex As Exception - End Try - End While - - My.Computer.FileSystem.CreateDirectory("C:\ShiftOS\Shiftum42\Skins\Current\") - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.CopyDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\", "C:\ShiftOS\Shiftum42\Skins\Current\") - My.Computer.FileSystem.WriteAllText("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat", My.Computer.FileSystem.ReadAllText("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat").Replace("\Preview", "\Current"), False) - - Case "shifterapply" - shortdisposecode(Skin_Loader.skinloaderskinclosebutton, Me.skinclosebutton, Shifter.skinclosebutton, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebar, Me.skintitlebar, Shifter.shifterskintitlebar, True) - shortdisposecode(Skin_Loader.skinloaderskindesktopbackground, Me.skindesktopbackground, Shifter.skindesktopbackground, True) - shortdisposecode(Skin_Loader.skinloaderskinrollupbutton, Me.skinrollupbutton, Shifter.skinrollupbutton, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebarrightcorner, Me.skintitlebarrightcorner, Shifter.skintitlebarrightcorner, True) - shortdisposecode(Skin_Loader.skinloaderskintitlebarleftcorner, Me.skintitlebarleftcorner, Shifter.skintitlebarleftcorner, True) - shortdisposecode(Skin_Loader.skinloaderskindesktoppanel, Me.skindesktoppanel, Shifter.skindesktoppanel, True) - shortdisposecode(Skin_Loader.skinloaderskindesktoppaneltime, Me.skindesktoppaneltime, Shifter.skindesktoppaneltime, True) - shortdisposecode(Skin_Loader.skinloaderskinapplauncherbutton, Me.skinapplauncherbutton, Shifter.skinapplauncherbutton, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderleft, Me.skinwindowborderleft, Shifter.skinwindowborderleft, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderright, Me.skinwindowborderright, Shifter.skinwindowborderright, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottom, Me.skinwindowborderbottom, Shifter.skinwindowborderbottom, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomright, Me.skinwindowborderbottomright, Shifter.skinwindowborderbottomright, True) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomleft, Me.skinwindowborderbottomleft, Shifter.skinwindowborderbottomleft, True) - shortdisposecode(Skin_Loader.skinloaderskinpanelbutton, Me.skinpanelbutton, Shifter.skinpanelbutton, True) - shortdisposecode(Skin_Loader.skinloaderskinminimizebutton, Me.skinminimizebutton, Shifter.skinminimizebutton, True) - - 'If Skin_Loader.Visible Then - ' If Skin_Loader.preclosebutton.BackgroundImage Is Nothing Then Else Skin_Loader.preclosebutton.BackgroundImage.Dispose() - ' If Skin_Loader.pretitlebar.BackgroundImage Is Nothing Then Else Skin_Loader.pretitlebar.BackgroundImage.Dispose() - ' If Skin_Loader.pnldesktoppreview.BackgroundImage Is Nothing Then Else Skin_Loader.pnldesktoppreview.BackgroundImage.Dispose() - ' If Skin_Loader.prerollupbutton.BackgroundImage Is Nothing Then Else Skin_Loader.prerollupbutton.BackgroundImage.Dispose() - ' If Skin_Loader.prepgtoprcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgtoprcorner.BackgroundImage.Dispose() - ' If Skin_Loader.prepgtoplcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgtoplcorner.BackgroundImage.Dispose() - ' If Skin_Loader.predesktoppanel.BackgroundImage Is Nothing Then Else Skin_Loader.predesktoppanel.BackgroundImage.Dispose() - ' If Skin_Loader.prepnlpanelbuttonholder.BackgroundImage Is Nothing Then Else Skin_Loader.prepnlpanelbuttonholder.BackgroundImage.Dispose() - ' If Skin_Loader.pretimepanel.BackgroundImage Is Nothing Then Else Skin_Loader.pretimepanel.BackgroundImage.Dispose() - ' If Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then Else Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage.Dispose() - ' If Skin_Loader.prepgleft.BackgroundImage Is Nothing Then Else Skin_Loader.prepgleft.BackgroundImage.Dispose() - ' If Skin_Loader.prepgright.BackgroundImage Is Nothing Then Else Skin_Loader.prepgright.BackgroundImage.Dispose() - ' If Skin_Loader.prepgbottom.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottom.BackgroundImage.Dispose() - ' If Skin_Loader.prepgbottomrcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottomrcorner.BackgroundImage.Dispose() - ' If Skin_Loader.prepgbottomlcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottomlcorner.BackgroundImage.Dispose() - ' If Skin_Loader.prepnlpanelbutton.BackgroundImage Is Nothing Then Else Skin_Loader.prepnlpanelbutton.BackgroundImage.Dispose() - ' If Skin_Loader.preminimizebutton.BackgroundImage Is Nothing Then Else Skin_Loader.preminimizebutton.BackgroundImage.Dispose() - - Skin_Loader.preclosebutton.BackgroundImage = Nothing - Skin_Loader.pretitlebar.BackgroundImage = Nothing - Skin_Loader.pnldesktoppreview.BackgroundImage = Nothing - Skin_Loader.prerollupbutton.BackgroundImage = Nothing - Skin_Loader.prepgtoprcorner.BackgroundImage = Nothing - Skin_Loader.prepgtoplcorner.BackgroundImage = Nothing - Skin_Loader.predesktoppanel.BackgroundImage = Nothing - Skin_Loader.prepnlpanelbuttonholder.BackgroundImage = Nothing - Skin_Loader.pretimepanel.BackgroundImage = Nothing - Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Skin_Loader.prepgleft.BackgroundImage = Nothing - Skin_Loader.prepgright.BackgroundImage = Nothing - Skin_Loader.prepgbottom.BackgroundImage = Nothing - Skin_Loader.prepgbottomrcorner.BackgroundImage = Nothing - Skin_Loader.prepgbottomlcorner.BackgroundImage = Nothing - Skin_Loader.prepnlpanelbutton.BackgroundImage = Nothing - Skin_Loader.preminimizebutton.BackgroundImage = Nothing - 'End If - - 'If Shifter.preclosebutton.BackgroundImage Is Nothing Then Else Shifter.preclosebutton.BackgroundImage.Dispose() - 'If Shifter.pretitlebar.BackgroundImage Is Nothing Then Else Shifter.pretitlebar.BackgroundImage.Dispose() - 'If Shifter.pnldesktoppreview.BackgroundImage Is Nothing Then Else Shifter.pnldesktoppreview.BackgroundImage.Dispose() - 'If Shifter.prerollupbutton.BackgroundImage Is Nothing Then Else Shifter.prerollupbutton.BackgroundImage.Dispose() - 'If Shifter.prepgtoprcorner.BackgroundImage Is Nothing Then Else Shifter.prepgtoprcorner.BackgroundImage.Dispose() - 'If Shifter.prepgtoplcorner.BackgroundImage Is Nothing Then Else Shifter.prepgtoplcorner.BackgroundImage.Dispose() - 'If Shifter.predesktoppanel.BackgroundImage Is Nothing Then Else Shifter.predesktoppanel.BackgroundImage.Dispose() - 'If Shifter.prepnlpanelbuttonholder.BackgroundImage Is Nothing Then Else Shifter.prepnlpanelbuttonholder.BackgroundImage.Dispose() - 'If Shifter.pretimepanel.BackgroundImage Is Nothing Then Else Shifter.pretimepanel.BackgroundImage.Dispose() - 'If Shifter.ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then Else Shifter.ApplicationsToolStripMenuItem.BackgroundImage.Dispose() - 'If Shifter.prepgleft.BackgroundImage Is Nothing Then Else Shifter.prepgleft.BackgroundImage.Dispose() - 'If Shifter.prepgright.BackgroundImage Is Nothing Then Else Shifter.prepgright.BackgroundImage.Dispose() - 'If Shifter.prepgbottom.BackgroundImage Is Nothing Then Else Shifter.prepgbottom.BackgroundImage.Dispose() - 'If Shifter.prepgbottomrcorner.BackgroundImage Is Nothing Then Else Shifter.prepgbottomrcorner.BackgroundImage.Dispose() - 'If Shifter.prepgbottomlcorner.BackgroundImage Is Nothing Then Else Shifter.prepgbottomlcorner.BackgroundImage.Dispose() - 'If Shifter.prepnlpanelbutton.BackgroundImage Is Nothing Then Else Shifter.prepnlpanelbutton.BackgroundImage.Dispose() - 'If Shifter.preminimizebutton.BackgroundImage Is Nothing Then Else Shifter.preminimizebutton.BackgroundImage.Dispose() - - Shifter.preclosebutton.BackgroundImage = Nothing - Shifter.pretitlebar.BackgroundImage = Nothing - Shifter.pnldesktoppreview.BackgroundImage = Nothing - Shifter.prerollupbutton.BackgroundImage = Nothing - Shifter.prepgtoprcorner.BackgroundImage = Nothing - Shifter.prepgtoplcorner.BackgroundImage = Nothing - Shifter.predesktoppanel.BackgroundImage = Nothing - Shifter.prepnlpanelbuttonholder.BackgroundImage = Nothing - Shifter.pretimepanel.BackgroundImage = Nothing - Shifter.ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Shifter.prepgleft.BackgroundImage = Nothing - Shifter.prepgright.BackgroundImage = Nothing - Shifter.prepgbottom.BackgroundImage = Nothing - Shifter.prepgbottomrcorner.BackgroundImage = Nothing - Shifter.prepgbottomlcorner.BackgroundImage = Nothing - Shifter.prepnlpanelbutton.BackgroundImage = Nothing - Shifter.preminimizebutton.BackgroundImage = Nothing - - ''prevent shifter red x images appearing - If Shifter.titlebar.BackgroundImage Is Nothing Then Else Shifter.titlebar.BackgroundImage.Dispose() : Shifter.titlebar.BackgroundImage = Nothing - If Shifter.pgtoplcorner.BackgroundImage Is Nothing Then Else Shifter.pgtoplcorner.BackgroundImage.Dispose() : Shifter.pgtoplcorner.BackgroundImage = Nothing - If Shifter.pgtoprcorner.BackgroundImage Is Nothing Then Else Shifter.pgtoprcorner.BackgroundImage.Dispose() : Shifter.pgtoprcorner.BackgroundImage = Nothing - If Shifter.closebutton.BackgroundImage Is Nothing Then Else Shifter.closebutton.BackgroundImage.Dispose() : Shifter.closebutton.BackgroundImage = Nothing - If Shifter.minimizebutton.BackgroundImage Is Nothing Then Else Shifter.minimizebutton.BackgroundImage.Dispose() : Shifter.minimizebutton.BackgroundImage = Nothing - If Shifter.rollupbutton.BackgroundImage Is Nothing Then Else Shifter.rollupbutton.BackgroundImage.Dispose() : Shifter.rollupbutton.BackgroundImage = Nothing - - 'If Clock.Visible = True Then - ' If Clock.titlebar.BackgroundImage Is Nothing Then Else Clock.titlebar.BackgroundImage.Dispose() - ' Clock.titlebar.BackgroundImage = Nothing - 'End If - - 'If Me.BackgroundImage Is Nothing Then Else Me.BackgroundImage.Dispose() - 'If Me.ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then Else Me.ApplicationsToolStripMenuItem.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonholder.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonholder.BackgroundImage.Dispose() - 'If Me.desktoppanel.BackgroundImage Is Nothing Then Else Me.desktoppanel.BackgroundImage.Dispose() - 'If Me.timepanel.BackgroundImage Is Nothing Then Else Me.timepanel.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonclock.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonclock.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonskinloader.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonskinloader.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfileskimmer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfileskimmer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfileopener.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfileopener.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoninfobox.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoninfobox.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonknowledgeinput.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonknowledgeinput.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoncolourpicker.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoncolourpicker.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonshiftorium.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonshiftorium.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonfilesaver.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonfilesaver.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonshifter.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonshifter.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonpong.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonpong.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonterminal.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonterminal.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttontextpad.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttontextpad.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttongraphicpicker.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttongraphicpicker.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonartpad.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonartpad.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoncalculator.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoncalculator.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonaudioplayer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonaudioplayer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonwebbrowser.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonwebbrowser.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonvideoplayer.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonvideoplayer.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonnamechanger.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonnamechanger.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttoniconmanager.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttoniconmanager.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonbitnotewallet.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonbitnotewallet.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonbitnotedigger.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonbitnotedigger.BackgroundImage.Dispose() - 'If Me.pnlpanelbuttonskinshifter.BackgroundImage Is Nothing Then Else Me.pnlpanelbuttonskinshifter.BackgroundImage.Dispose() - 'If Me.tbclockicon.BackgroundImage Is Nothing Then Else Me.tbclockicon.BackgroundImage.Dispose() - 'If Me.tbskinloadericon.BackgroundImage Is Nothing Then Else Me.tbskinloadericon.BackgroundImage.Dispose() - 'If Me.tbfileskimmericon.BackgroundImage Is Nothing Then Else Me.tbfileskimmericon.BackgroundImage.Dispose() - 'If Me.tbfileopenericon.BackgroundImage Is Nothing Then Else Me.tbfileopenericon.BackgroundImage.Dispose() - 'If Me.tbinfoboxicon.BackgroundImage Is Nothing Then Else Me.tbinfoboxicon.BackgroundImage.Dispose() - 'If Me.tbknowledgeinputicon.BackgroundImage Is Nothing Then Else Me.tbknowledgeinputicon.BackgroundImage.Dispose() - 'If Me.tbcolourpickericon.BackgroundImage Is Nothing Then Else Me.tbcolourpickericon.BackgroundImage.Dispose() - 'If Me.tbshiftoriumicon.BackgroundImage Is Nothing Then Else Me.tbshiftoriumicon.BackgroundImage.Dispose() - 'If Me.tbfilesavericon.BackgroundImage Is Nothing Then Else Me.tbfilesavericon.BackgroundImage.Dispose() - 'If Me.tbshiftericon.BackgroundImage Is Nothing Then Else Me.tbshiftericon.BackgroundImage.Dispose() - 'If Me.tbpongicon.BackgroundImage Is Nothing Then Else Me.tbpongicon.BackgroundImage.Dispose() - 'If Me.tbterminalicon.BackgroundImage Is Nothing Then Else Me.tbterminalicon.BackgroundImage.Dispose() - 'If Me.tbtextpadicon.BackgroundImage Is Nothing Then Else Me.tbtextpadicon.BackgroundImage.Dispose() - 'If Me.tbgraphicpickericon.BackgroundImage Is Nothing Then Else Me.tbgraphicpickericon.BackgroundImage.Dispose() - 'If Me.tbartpadicon.BackgroundImage Is Nothing Then Else Me.tbartpadicon.BackgroundImage.Dispose() - 'If Me.tbcalculatoricon.BackgroundImage Is Nothing Then Else Me.tbcalculatoricon.BackgroundImage.Dispose() - 'If Me.tbaudioplayericon.BackgroundImage Is Nothing Then Else Me.tbaudioplayericon.BackgroundImage.Dispose() - 'If Me.tbwebbrowsericon.BackgroundImage Is Nothing Then Else Me.tbwebbrowsericon.BackgroundImage.Dispose() - 'If Me.tbvideoplayericon.BackgroundImage Is Nothing Then Else Me.tbvideoplayericon.BackgroundImage.Dispose() - 'If Me.tbnamechangericon.BackgroundImage Is Nothing Then Else Me.tbnamechangericon.BackgroundImage.Dispose() - 'If Me.tbiconmanagericon.BackgroundImage Is Nothing Then Else Me.tbiconmanagericon.BackgroundImage.Dispose() - 'If Me.tbbitnotewalleticon.BackgroundImage Is Nothing Then Else Me.tbbitnotewalleticon.BackgroundImage.Dispose() - 'If Me.tbbitnotediggericon.BackgroundImage Is Nothing Then Else Me.tbbitnotediggericon.BackgroundImage.Dispose() - 'If Me.tbskinshiftericon.BackgroundImage Is Nothing Then Else Me.tbskinshiftericon.BackgroundImage.Dispose() - - Me.BackgroundImage = Nothing - Me.ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Me.pnlpanelbuttonholder.BackgroundImage = Nothing - Me.desktoppanel.BackgroundImage = Nothing - Me.timepanel.BackgroundImage = Nothing - Me.pnlpanelbuttonclock.BackgroundImage = Nothing - Me.pnlpanelbuttonskinloader.BackgroundImage = Nothing - Me.pnlpanelbuttonfileskimmer.BackgroundImage = Nothing - Me.pnlpanelbuttonfileopener.BackgroundImage = Nothing - Me.pnlpanelbuttoninfobox.BackgroundImage = Nothing - Me.pnlpanelbuttonknowledgeinput.BackgroundImage = Nothing - Me.pnlpanelbuttoncolourpicker.BackgroundImage = Nothing - Me.pnlpanelbuttonshiftorium.BackgroundImage = Nothing - Me.pnlpanelbuttonfilesaver.BackgroundImage = Nothing - Me.pnlpanelbuttonshifter.BackgroundImage = Nothing - Me.pnlpanelbuttonpong.BackgroundImage = Nothing - Me.pnlpanelbuttonterminal.BackgroundImage = Nothing - Me.pnlpanelbuttontextpad.BackgroundImage = Nothing - Me.pnlpanelbuttongraphicpicker.BackgroundImage = Nothing - Me.pnlpanelbuttonartpad.BackgroundImage = Nothing - Me.pnlpanelbuttoncalculator.BackgroundImage = Nothing - Me.pnlpanelbuttonaudioplayer.BackgroundImage = Nothing - Me.pnlpanelbuttonwebbrowser.BackgroundImage = Nothing - Me.pnlpanelbuttonvideoplayer.BackgroundImage = Nothing - Me.pnlpanelbuttonnamechanger.BackgroundImage = Nothing - Me.pnlpanelbuttoniconmanager.BackgroundImage = Nothing - Me.pnlpanelbuttonbitnotewallet.BackgroundImage = Nothing - Me.pnlpanelbuttonbitnotedigger.BackgroundImage = Nothing - Me.pnlpanelbuttonskinshifter.BackgroundImage = Nothing - Me.pnlpanelbuttonshiftnet.BackgroundImage = Nothing - Me.pnlpanelbuttondownloader.BackgroundImage = Nothing - Me.tbclockicon.BackgroundImage = Nothing - Me.tbskinloadericon.BackgroundImage = Nothing - Me.tbfileskimmericon.BackgroundImage = Nothing - Me.tbfileopenericon.BackgroundImage = Nothing - Me.tbinfoboxicon.BackgroundImage = Nothing - Me.tbknowledgeinputicon.BackgroundImage = Nothing - Me.tbcolourpickericon.BackgroundImage = Nothing - Me.tbshiftoriumicon.BackgroundImage = Nothing - Me.tbfilesavericon.BackgroundImage = Nothing - Me.tbshiftericon.BackgroundImage = Nothing - Me.tbpongicon.BackgroundImage = Nothing - Me.tbterminalicon.BackgroundImage = Nothing - Me.tbtextpadicon.BackgroundImage = Nothing - Me.tbgraphicpickericon.BackgroundImage = Nothing - Me.tbartpadicon.BackgroundImage = Nothing - Me.tbcalculatoricon.BackgroundImage = Nothing - Me.tbaudioplayericon.BackgroundImage = Nothing - Me.tbwebbrowsericon.BackgroundImage = Nothing - Me.tbvideoplayericon.BackgroundImage = Nothing - Me.tbnamechangericon.BackgroundImage = Nothing - Me.tbiconmanagericon.BackgroundImage = Nothing - Me.tbbitnotewalleticon.BackgroundImage = Nothing - Me.tbbitnotediggericon.BackgroundImage = Nothing - Me.tbskinshiftericon.BackgroundImage = Nothing - Me.tbshiftneticon.BackgroundImage = Nothing - Me.tbdownloadericon.BackgroundImage = Nothing - - GC.Collect() - - While My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Current\") - Try - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Current\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Current\", FileIO.DeleteDirectoryOption.DeleteAllContents) - Catch ex As Exception - End Try - End While - My.Computer.FileSystem.CreateDirectory("C:\ShiftOS\Shiftum42\Skins\Current\") - - Case "skinloaderemovepreview" - shortdisposecode(Skin_Loader.skinloaderskinclosebutton, Me.skinclosebutton, Shifter.skinclosebutton, False) - shortdisposecode(Skin_Loader.skinloaderskintitlebar, Me.skintitlebar, Shifter.shifterskintitlebar, False) - shortdisposecode(Skin_Loader.skinloaderskindesktopbackground, Me.skindesktopbackground, Shifter.skindesktopbackground, False) - shortdisposecode(Skin_Loader.skinloaderskinrollupbutton, Me.skinrollupbutton, Shifter.skinrollupbutton, False) - shortdisposecode(Skin_Loader.skinloaderskintitlebarrightcorner, Me.skintitlebarrightcorner, Shifter.skintitlebarrightcorner, False) - shortdisposecode(Skin_Loader.skinloaderskintitlebarleftcorner, Me.skintitlebarleftcorner, Shifter.skintitlebarleftcorner, False) - shortdisposecode(Skin_Loader.skinloaderskindesktoppanel, Me.skindesktoppanel, Shifter.skindesktoppanel, False) - shortdisposecode(Skin_Loader.skinloaderskindesktoppaneltime, Me.skindesktoppaneltime, Shifter.skindesktoppaneltime, False) - shortdisposecode(Skin_Loader.skinloaderskinapplauncherbutton, Me.skinapplauncherbutton, Shifter.skinapplauncherbutton, False) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderleft, Me.skinwindowborderleft, Shifter.skinwindowborderleft, False) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderright, Me.skinwindowborderright, Shifter.skinwindowborderright, False) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottom, Me.skinwindowborderbottom, Shifter.skinwindowborderbottom, False) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomright, Me.skinwindowborderbottomright, Shifter.skinwindowborderbottomright, False) - shortdisposecode(Skin_Loader.skinloaderskinwindowborderbottomleft, Me.skinwindowborderbottomleft, Shifter.skinwindowborderbottomleft, False) - shortdisposecode(Skin_Loader.skinloaderskinpanelbutton, Me.skinpanelbutton, Shifter.skinpanelbutton, False) - shortdisposecode(Skin_Loader.skinloaderskinminimizebutton, Me.skinminimizebutton, Shifter.skinminimizebutton, False) - - 'If Skin_Loader.preclosebutton.BackgroundImage Is Nothing Then Else Skin_Loader.preclosebutton.BackgroundImage.Dispose() - 'If Skin_Loader.pretitlebar.BackgroundImage Is Nothing Then Else Skin_Loader.pretitlebar.BackgroundImage.Dispose() - 'If Skin_Loader.pnldesktoppreview.BackgroundImage Is Nothing Then Else Skin_Loader.pnldesktoppreview.BackgroundImage.Dispose() - 'If Skin_Loader.prerollupbutton.BackgroundImage Is Nothing Then Else Skin_Loader.prerollupbutton.BackgroundImage.Dispose() - 'If Skin_Loader.prepgtoprcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgtoprcorner.BackgroundImage.Dispose() - 'If Skin_Loader.prepgtoplcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgtoplcorner.BackgroundImage.Dispose() - 'If Skin_Loader.predesktoppanel.BackgroundImage Is Nothing Then Else Skin_Loader.predesktoppanel.BackgroundImage.Dispose() - 'If Skin_Loader.prepnlpanelbuttonholder.BackgroundImage Is Nothing Then Else Skin_Loader.prepnlpanelbuttonholder.BackgroundImage.Dispose() - 'If Skin_Loader.pretimepanel.BackgroundImage Is Nothing Then Else Skin_Loader.pretimepanel.BackgroundImage.Dispose() - 'If Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage Is Nothing Then Else Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage.Dispose() - 'If Skin_Loader.prepgleft.BackgroundImage Is Nothing Then Else Skin_Loader.prepgleft.BackgroundImage.Dispose() - 'If Skin_Loader.prepgright.BackgroundImage Is Nothing Then Else Skin_Loader.prepgright.BackgroundImage.Dispose() - 'If Skin_Loader.prepgbottom.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottom.BackgroundImage.Dispose() - 'If Skin_Loader.prepgbottomrcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottomrcorner.BackgroundImage.Dispose() - 'If Skin_Loader.prepgbottomlcorner.BackgroundImage Is Nothing Then Else Skin_Loader.prepgbottomlcorner.BackgroundImage.Dispose() - 'If Skin_Loader.prepnlpanelbutton.BackgroundImage Is Nothing Then Else Skin_Loader.prepnlpanelbutton.BackgroundImage.Dispose() - 'If Skin_Loader.preminimizebutton.BackgroundImage Is Nothing Then Else Skin_Loader.preminimizebutton.BackgroundImage.Dispose() - - Skin_Loader.preclosebutton.BackgroundImage = Nothing - Skin_Loader.pretitlebar.BackgroundImage = Nothing - Skin_Loader.pnldesktoppreview.BackgroundImage = Nothing - Skin_Loader.prerollupbutton.BackgroundImage = Nothing - Skin_Loader.prepgtoprcorner.BackgroundImage = Nothing - Skin_Loader.prepgtoplcorner.BackgroundImage = Nothing - Skin_Loader.predesktoppanel.BackgroundImage = Nothing - Skin_Loader.prepnlpanelbuttonholder.BackgroundImage = Nothing - Skin_Loader.pretimepanel.BackgroundImage = Nothing - Skin_Loader.ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Skin_Loader.prepgleft.BackgroundImage = Nothing - Skin_Loader.prepgright.BackgroundImage = Nothing - Skin_Loader.prepgbottom.BackgroundImage = Nothing - Skin_Loader.prepgbottomrcorner.BackgroundImage = Nothing - Skin_Loader.prepgbottomlcorner.BackgroundImage = Nothing - Skin_Loader.prepnlpanelbutton.BackgroundImage = Nothing - Skin_Loader.preminimizebutton.BackgroundImage = Nothing - - For i = 0 To 50 - Skin_Loader.skinloaderskinimages(i) = "" - Next - - GC.Collect() - - While My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") - Try - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) - Catch ex As Exception - MessageBox.Show(ex.Message) - End Try - End While - My.Computer.FileSystem.CreateDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\") - End Select - + ' 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) @@ -1838,14 +1757,60 @@ 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 - Me.BackColor = desktopbackgroundcolour - If skindesktopbackground(0) Is Nothing Then Me.BackgroundImage = Nothing Else Me.BackgroundImage = skindesktopbackground(0) - Me.BackgroundImageLayout = skindesktopbackgroundstyle + 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 Else Me.BackColor = globaltransparencycolour Me.BackgroundImage = Nothing + desktopicons.Visible = False Me.TransparencyKey = globaltransparencycolour End If @@ -1853,17 +1818,17 @@ ToolStripManager.Renderer = New MyToolStripRenderer() If boughtdesktoppanel = True Then - If skindesktoppanel(0) Is Nothing Then - desktoppanel.BackColor = desktoppanelcolour + If Skins.desktoppanel Is Nothing Then + desktoppanel.BackColor = Skins.desktoppanelcolour desktoppanel.BackgroundImage = Nothing Else - desktoppanel.BackgroundImage = skindesktoppanel(0) - desktoppanel.BackgroundImageLayout = skindesktoppanelstyle + desktoppanel.BackgroundImage = Skins.desktoppanel + desktoppanel.BackgroundImageLayout = Skins.desktoppanellayout desktoppanel.BackColor = Color.Transparent End If - desktoppanel.Size = New Size(desktoppanel.Size.Width, desktoppanelheight) - Select Case desktoppanelposition + desktoppanel.Size = New Size(desktoppanel.Size.Width, Skins.desktoppanelheight) + Select Case Skins.desktoppanelposition Case "Top" desktoppanel.Dock = DockStyle.Top desktopappmenu.Dock = DockStyle.Top @@ -1878,29 +1843,39 @@ If boughtapplaunchermenu = True Then - ApplicationsToolStripMenuItem.Font = New Font(applicationbuttontextfont, applicationbuttontextsize, applicationbuttontextstyle) + ApplicationsToolStripMenuItem.Font = New Font(Skins.applicationbuttontextfont, Skins.applicationbuttontextsize, Skins.applicationbuttontextstyle) ApplicationsToolStripMenuItem.Text = applicationlaunchername - KnowledgeInputToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ShiftoriumToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ClockToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ShifterToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - TerminalToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - PongToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - FileSkimmerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - TextPadToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - SkinLoaderToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ArtpadToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - CalculatorToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - AudioplayerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - WebBrowserToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - VideoplayerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - NameChangerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - IconManagerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - BitnoteWalletToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - BitnoteDiggerToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - SkinShifterToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ShiftnetToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) - ShutdownToolStripMenuItem.Font = New Font("Byington", 10, FontStyle.Bold) + 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 @@ -1922,51 +1897,74 @@ BitnoteDiggerToolStripMenuItem.Text = bitnotediggername SkinShifterToolStripMenuItem.Text = skinshiftername ShiftnetToolStripMenuItem.Text = shiftnetname - KnowledgeInputToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ShiftoriumToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ClockToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ShiftoriumToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ShifterToolStripMenuItem.ForeColor = applicationsbuttontextcolour - TerminalToolStripMenuItem.ForeColor = applicationsbuttontextcolour - PongToolStripMenuItem.ForeColor = applicationsbuttontextcolour - FileSkimmerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - TextPadToolStripMenuItem.ForeColor = applicationsbuttontextcolour - SkinLoaderToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ArtpadToolStripMenuItem.ForeColor = applicationsbuttontextcolour - CalculatorToolStripMenuItem.ForeColor = applicationsbuttontextcolour - AudioplayerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - WebBrowserToolStripMenuItem.ForeColor = applicationsbuttontextcolour - VideoplayerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - NameChangerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - IconManagerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - BitnoteWalletToolStripMenuItem.ForeColor = applicationsbuttontextcolour - BitnoteDiggerToolStripMenuItem.ForeColor = applicationsbuttontextcolour - SkinShifterToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ShiftnetToolStripMenuItem.ForeColor = applicationsbuttontextcolour - ShutdownToolStripMenuItem.ForeColor = applicationsbuttontextcolour + 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 = applicationsbuttontextcolour - ApplicationsToolStripMenuItem.BackColor = applauncherbuttoncolour - applaunchermenuholder.Height = applicationbuttonheight - desktopappmenu.Height = applicationbuttonheight - ApplicationsToolStripMenuItem.Height = applicationbuttonheight + 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 - applaunchermenuholder.Width = applaunchermenuholderwidth - desktopappmenu.Width = applaunchermenuholderwidth - ApplicationsToolStripMenuItem.Width = applaunchermenuholderwidth - If skinapplauncherbutton(0) Is Nothing Then - ApplicationsToolStripMenuItem.BackColor = applauncherbuttoncolour - ApplicationsToolStripMenuItem.BackgroundImage = Nothing - Else - ApplicationsToolStripMenuItem.BackColor = Color.Transparent - desktopappmenu.BackColor = Color.Transparent - ApplicationsToolStripMenuItem.BackgroundImage = skinapplauncherbutton(0) + + + 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 @@ -2016,6 +2014,12 @@ 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 @@ -2050,7 +2054,7 @@ ArtpadToolStripMenuItem.Visible = False End If - If boughtcalculator = True Then + If installedcalculator = True Then CalculatorToolStripMenuItem.Visible = True If boughtknowledgeinputicon = True Then CalculatorToolStripMenuItem.Image = calculatoriconlauncher @@ -2059,7 +2063,7 @@ CalculatorToolStripMenuItem.Visible = False End If - If boughtaudioplayer = True Then + If installedaudioplayer = True Then AudioplayerToolStripMenuItem.Visible = True If boughtknowledgeinputicon = True Then AudioplayerToolStripMenuItem.Image = audioplayericonlauncher @@ -2068,7 +2072,7 @@ AudioplayerToolStripMenuItem.Visible = False End If - If boughtwebbrowser = True Then + If installedwebbrowser = True Then WebBrowserToolStripMenuItem.Visible = True If boughtknowledgeinputicon = True Then WebBrowserToolStripMenuItem.Image = webbrowsericonlauncher @@ -2077,7 +2081,7 @@ WebBrowserToolStripMenuItem.Visible = False End If - If boughtvideoplayer = True Then + If installedvideoplayer = True Then VideoplayerToolStripMenuItem.Visible = True If boughtknowledgeinputicon = True Then VideoplayerToolStripMenuItem.Image = videoplayericonlauncher @@ -2132,7 +2136,7 @@ End If If boughtshiftnet = True Then - SkinShifterToolStripMenuItem.Visible = True + ShiftnetToolStripMenuItem.Visible = True If boughtshiftneticon = True Then ShiftnetToolStripMenuItem.Image = shiftneticonlauncher End If @@ -2140,21 +2144,102 @@ 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 = clocktextcolour + paneltimetext.ForeColor = Skins.clocktextcolour - If skindesktoppaneltime(0) Is Nothing Then - timepanel.BackColor = clockbackgroundcolor + If Skins.panelclock Is Nothing Then + timepanel.BackColor = Skins.clockbackgroundcolor timepanel.BackgroundImage = Nothing Else timepanel.BackColor = Color.Transparent - timepanel.BackgroundImage = skindesktoppaneltime(0) - timepanel.BackgroundImageLayout = skindesktoppaneltimestyle + timepanel.BackgroundImage = panelclock + timepanel.BackgroundImageLayout = panelclocklayout End If - paneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle) + paneltimetext.Font = New Font(Skins.panelclocktextfont, Skins.panelclocktextsize, Skins.panelclocktextstyle) timepanel.Size = New Size(paneltimetext.Width + 3, timepanel.Height) - paneltimetext.Location = New Point(0, panelclocktexttop) + paneltimetext.Location = New Point(0, Skins.panelclocktexttop) timepanel.Show() Else timepanel.Hide() @@ -2171,22 +2256,35 @@ ToolStripSeparator1.Visible = False End If + If boughtunitymodetoggle = True Then + UnityToolStripMenuItem.Visible = True + ToolStripSeparator1.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 - titlebarheight = 0 + Skins.titlebarheight = 0 End If If boughtwindowborders = False Then - windowbordersize = 0 + Skins.borderwidth = 0 End If setuppanelbuttons() + ApplicationsToolStripMenuItem.BackColor = Skins.applauncherbuttoncolour End Sub + + Public Sub setuppanelbuttons() If boughtpanelbuttons Then If Knowledge_Input.Visible Then pnlpanelbuttonknowledgeinput.Show() Else pnlpanelbuttonknowledgeinput.Hide() @@ -2214,6 +2312,15 @@ 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 @@ -2242,34 +2349,52 @@ 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, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonshiftorium.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonclock.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonshifter.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttoncolourpicker.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttoninfobox.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonpong.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonfileskimmer.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonfileopener.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonfilesaver.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttontextpad.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttongraphicpicker.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonskinloader.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonartpad.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttoncalculator.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonaudioplayer.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonwebbrowser.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonvideoplayer.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonnamechanger.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttoniconmanager.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonbitnotewallet.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonbitnotedigger.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonskinshifter.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonshiftnet.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttondownloader.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) - pnlpanelbuttonterminal.Margin = New Padding(0, panelbuttonfromtop, panelbuttongap, 0) + 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) @@ -2296,6 +2421,15 @@ 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) @@ -2323,29 +2457,38 @@ 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(panelbuttoninitialgap, 0, 0, 0) + 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(panelbuttoniconsize, panelbuttoniconsize) + 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(panelbuttoniconside, panelbuttonicontop) - icon.Size = New Size(panelbuttoniconsize, panelbuttoniconsize) - panelbutton.Size = New Size(panelbuttonwidth, panelbuttonheight) - panelbutton.BackColor = panelbuttoncolour - panelbutton.BackgroundImage = skinpanelbutton(0) - If skinpanelbutton(0) Is Nothing Then Else panelbutton.BackColor = Color.Transparent - panelbutton.BackgroundImageLayout = skinpanelbuttonstyle - text.ForeColor = panelbuttontextcolour - text.Font = New Font(panelbuttontextfont, panelbuttontextsize, panelbuttontextstyle) - text.Location = New Point(panelbuttontextside, panelbuttontexttop) + 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 @@ -2359,33 +2502,6 @@ Public Sub closeeverything() If boughtmultitasking = False Then - 'Knowledge_Input.Close() - 'Shiftorium.Close() - 'Clock.Close() - 'Shifter.Close() - 'Colour_Picker.Close() - 'infobox.Close() - 'Pong.Close() - 'File_Skimmer.Close() - 'File_Opener.Close() - 'File_Saver.Close() - 'TextPad.Close() - 'Graphic_Picker.Close() - 'Skin_Loader.Close() - 'ArtPad.Close() - 'Calculator.Close() - 'Audio_Player.Close() - 'Web_Browser.Close() - 'Video_Player.Close() - 'Name_Changer.Close() - 'Icon_Manager.Close() - 'Bitnote_Wallet.Close() - 'Bitnote_Digger.Close() - 'Skinshifter.Close() - 'Shiftnet.Close() - 'Downloader.Close() - 'template.Close() - For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray() Select Case f.Name Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter" @@ -2398,33 +2514,6 @@ End If If forceclose = True Then - 'Knowledge_Input.Close() - 'Shiftorium.Close() - 'Clock.Close() - 'Shifter.Close() - 'Colour_Picker.Close() - 'infobox.Close() - 'Pong.Close() - 'File_Skimmer.Close() - 'TextPad.Close() - 'File_Opener.Close() - 'File_Saver.Close() - 'Graphic_Picker.Close() - 'Skin_Loader.Close() - 'ArtPad.Close() - 'Calculator.Close() - 'Audio_Player.Close() - 'Web_Browser.Close() - 'Video_Player.Close() - 'Name_Changer.Close() - 'Icon_Manager.Close() - 'Bitnote_Wallet.Close() - 'Bitnote_Digger.Close() - 'Skinshifter.Close() - 'Shiftnet.Close() - 'Downloader.Close() - 'template.Close() - For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray() Select Case f.Name Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter" @@ -2433,7 +2522,6 @@ f.Close() End Select Next - End If forceclose = False End Sub @@ -2463,163 +2551,212 @@ ' End Select 'Next - 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 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 + '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() @@ -2773,6 +2910,54 @@ 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() @@ -2788,68 +2973,9 @@ End If End Sub - Public Sub setupalltitlebars() - Knowledge_Input.setuptitlebar() - Shiftorium.setuptitlebar() - Clock.setuptitlebar() - Shifter.setuptitlebar() - Colour_Picker.setuptitlebar() - infobox.setuptitlebar() - Pong.setuptitlebar() - File_Skimmer.setuptitlebar() - TextPad.setuptitlebar() - File_Opener.setuptitlebar() - File_Saver.setuptitlebar() - Graphic_Picker.setuptitlebar() - Skin_Loader.setuptitlebar() - ArtPad.setuptitlebar() - Calculator.setuptitlebar() - Audio_Player.setuptitlebar() - Web_Browser.setuptitlebar() - Video_Player.setuptitlebar() - Name_Changer.setuptitlebar() - Icon_Manager.setuptitlebar() - Bitnote_Wallet.setuptitlebar() - Bitnote_Digger.setuptitlebar() - Skinshifter.setuptitlebar() - Shiftnet.setuptitlebar() - Downloader.setuptitlebar() - template.setuptitlebar() - If terminalfullscreen = False Then Terminal.setuptitlebar() - End Sub - - Public Sub setupskins() - Knowledge_Input.setskin() - Shiftorium.setskin() - Clock.setskin() - Shifter.setskin() - Colour_Picker.setskin() - infobox.setskin() - Pong.setskin() - File_Skimmer.setskin() - TextPad.setskin() - File_Opener.setskin() - File_Saver.setskin() - Graphic_Picker.setskin() - Skin_Loader.setskin() - ArtPad.setskin() - Calculator.setskin() - Audio_Player.setskin() - Web_Browser.setskin() - Video_Player.setskin() - Name_Changer.setskin() - Icon_Manager.setskin() - Bitnote_Wallet.setskin() - Bitnote_Digger.setskin() - Skinshifter.setskin() - Shiftnet.setskin() - Downloader.setskin() - template.setskin() - If terminalfullscreen = False Then Terminal.setskin() - End Sub - Public Sub shiftwindowsontop() If unitymode = True Then + Me.TopMost = True Knowledge_Input.TopMost = False Shiftorium.TopMost = False Clock.TopMost = False @@ -2875,10 +3001,19 @@ 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 @@ -2904,60 +3039,69 @@ 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() - 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)) + ' 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 @@ -2968,693 +3112,893 @@ Return ret End Function - Public Sub setcolours() - 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 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 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("C:\ShiftOS\Shiftum42\Icons\" & location & ".pic") Then - imagetochange = GetImage("C:\ShiftOS\Shiftum42\Icons\" & location & ".pic") + 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("C:\ShiftOS\Shiftum42\Icons\icondata.dat") + iconmanagericondatalines = IO.File.ReadAllLines(ShiftOSPath + "Shiftum42\Icons\icondata.dat") titlebariconsize = iconmanagericondatalines(0) panelbuttoniconsize = iconmanagericondatalines(1) launchericonsize = iconmanagericondatalines(2) @@ -3682,7 +4026,16 @@ setupiconprocess("titlebariconmanagericon", iconmanagericontitlebar) setupiconprocess("titlebarbitnotewalleticon", bitnotewalleticontitlebar) setupiconprocess("titlebarbitnotediggericon", bitnotediggericontitlebar) - 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) @@ -3707,7 +4060,16 @@ setupiconprocess("panelbuttoniconmanagericon", iconmanagericonpanelbutton) setupiconprocess("panelbuttonbitnotewalleticon", bitnotewalleticonpanelbutton) setupiconprocess("panelbuttonbitnotediggericon", bitnotediggericonpanelbutton) - 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) @@ -3732,9 +4094,19 @@ setupiconprocess("launchericonmanagericon", iconmanagericonlauncher) setupiconprocess("launcherbitnotewalleticon", bitnotewalleticonlauncher) setupiconprocess("launcherbitnotediggericon", bitnotediggericonlauncher) - 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 @@ -3914,179 +4286,453 @@ 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 skinapplauncherbutton(0) Is Nothing Then + If Skins.applauncher Is Nothing Then Else - e.Graphics.DrawImage(skinapplauncherbutton(0), 0, 0, skinapplauncherbutton(0).Width, skinapplauncherbutton(0).Height) + e.Graphics.DrawImage(Skins.applauncher, 0, 0, Skins.applauncher.Width, Skins.applauncher.Height) End If End Sub - Public Sub minimizeprogram(ByVal whatprogram As Form) + 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) + 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) + 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) + minimizeprogram(File_Opener, False) End If End Sub - Private Sub pnlpanelbuttonfilesaver_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfilesaver.Click, tbfilesavericon.Click, tbfilesavertext.Click + Private Sub pnlpanelbuttonfilesaver_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfilesaver.Click If boughtusefulpanelbuttons = True Then - minimizeprogram(File_Saver) + 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) + 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) + 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) + 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) + 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) + minimizeprogram(Pong, True) End If End Sub - Private Sub pnlpanelbuttonshifter_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshifter.Click, tbshiftericon.Click, tbshiftertext.Click + Private Sub pnlpanelbuttonshifter_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshifter.Click If boughtusefulpanelbuttons = True Then - minimizeprogram(Shifter) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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) + 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.LargeImageList = File_Skimmer.ImageList1 + desktopicons.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 + + 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 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) Handles IconViewToolStripMenuItem.Click + 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 desktopicons_SelectedIndexChanged(sender As Object, e As EventArgs) Handles desktopicons.SelectedIndexChanged + + 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 End Class
\ No newline at end of file diff --git a/ShiftOSLogo.ico b/ShiftOS/ShiftOSLogo.ico Binary files differindex 5840b3c..5840b3c 100644 --- a/ShiftOSLogo.ico +++ b/ShiftOS/ShiftOSLogo.ico diff --git a/Shifter.Designer.vb b/ShiftOS/Shifter.Designer.vb index ce5fe1e..9c1af98 100644 --- a/Shifter.Designer.vb +++ b/ShiftOS/Shifter.Designer.vb @@ -55,6 +55,60 @@ Partial Class Shifter 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() @@ -100,32 +154,6 @@ Partial Class Shifter Me.Label48 = New System.Windows.Forms.Label() Me.pnldesktoppanelcolour = New System.Windows.Forms.Panel() Me.Label49 = New System.Windows.Forms.Label() - Me.pnlapplauncheroptions = New System.Windows.Forms.Panel() - 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.pnldesktopintro = New System.Windows.Forms.Panel() Me.Label69 = New System.Windows.Forms.Label() Me.Label70 = New System.Windows.Forms.Label() @@ -152,24 +180,6 @@ Partial Class Shifter Me.btnpanelclock = New System.Windows.Forms.Button() Me.btnapplauncher = New System.Windows.Forms.Button() Me.btndesktoppanel = 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.txtpanelbuttoniconheight = New System.Windows.Forms.TextBox() Me.pnlwindowsoptions = New System.Windows.Forms.Panel() Me.pnlbuttonoptions = New System.Windows.Forms.Panel() @@ -305,6 +315,7 @@ Partial Class Shifter Me.Label111 = New System.Windows.Forms.Label() Me.pgcontents = New System.Windows.Forms.Panel() 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() @@ -312,13 +323,8 @@ Partial Class Shifter Me.catholder.SuspendLayout() Me.pnlshifterintro.SuspendLayout() Me.pnldesktopoptions.SuspendLayout() - Me.pnlpanelbuttonsoptions.SuspendLayout() - Me.pnldesktoppaneloptions.SuspendLayout() Me.pnlapplauncheroptions.SuspendLayout() - Me.pnldesktopintro.SuspendLayout() - Me.pnlpanelclockoptions.SuspendLayout() - Me.pnldesktopbackgroundoptions.SuspendLayout() - Me.Panel10.SuspendLayout() + Me.pnllauncheritems.SuspendLayout() Me.pnldesktoppreview.SuspendLayout() Me.predesktoppanel.SuspendLayout() Me.prepnlpanelbuttonholder.SuspendLayout() @@ -327,6 +333,12 @@ Partial Class Shifter 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() @@ -465,10 +477,10 @@ Partial Class Shifter ' 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.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(74, 18) + Me.lbtitletext.Size = New System.Drawing.Size(57, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Shifter" ' @@ -653,20 +665,570 @@ Partial Class 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.pnlapplauncheroptions) 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.Controls.Add(Me.pnldesktoppreview) 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) @@ -1161,277 +1723,6 @@ Partial Class Shifter Me.Label49.TabIndex = 0 Me.Label49.Text = "Panel Colour:" ' - 'pnlapplauncheroptions - ' - 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(178, 253) - Me.pnlapplauncheroptions.Name = "pnlapplauncheroptions" - Me.pnlapplauncheroptions.Size = New System.Drawing.Size(145, 37) - Me.pnlapplauncheroptions.TabIndex = 10 - Me.pnlapplauncheroptions.Visible = False - ' - '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(280, 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(210, 106) - Me.txtapplauncherwidth.Name = "txtapplauncherwidth" - Me.txtapplauncherwidth.Size = New System.Drawing.Size(68, 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(164, 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(136, 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(112, 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(108, 16) - Me.Label36.TabIndex = 12 - Me.Label36.Text = "Launcher 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:" - ' 'pnldesktopintro ' Me.pnldesktopintro.Controls.Add(Me.Label69) @@ -1705,179 +1996,6 @@ Partial Class Shifter Me.btndesktoppanel.Text = "Desktop Panel" Me.btndesktoppanel.UseVisualStyleBackColor = False ' - '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" - ' 'txtpanelbuttoniconheight ' Me.txtpanelbuttoniconheight.Location = New System.Drawing.Point(0, 0) @@ -3230,10 +3348,10 @@ Partial Class Shifter ' Me.pretitletext.AutoSize = True Me.pretitletext.BackColor = System.Drawing.Color.Transparent - Me.pretitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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(89, 18) + Me.pretitletext.Size = New System.Drawing.Size(77, 18) Me.pretitletext.TabIndex = 19 Me.pretitletext.Text = "Template" ' @@ -3329,6 +3447,9 @@ Partial Class Shifter ' Me.tmrfix.Interval = 5000 ' + 'tmrdelay + ' + ' 'Shifter ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -3352,19 +3473,10 @@ Partial Class Shifter Me.pnlshifterintro.ResumeLayout(False) Me.pnlshifterintro.PerformLayout() Me.pnldesktopoptions.ResumeLayout(False) - Me.pnlpanelbuttonsoptions.ResumeLayout(False) - Me.pnlpanelbuttonsoptions.PerformLayout() - Me.pnldesktoppaneloptions.ResumeLayout(False) - Me.pnldesktoppaneloptions.PerformLayout() Me.pnlapplauncheroptions.ResumeLayout(False) Me.pnlapplauncheroptions.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.pnllauncheritems.ResumeLayout(False) + Me.pnllauncheritems.PerformLayout() Me.pnldesktoppreview.ResumeLayout(False) Me.predesktoppanel.ResumeLayout(False) Me.prepnlpanelbuttonholder.ResumeLayout(False) @@ -3376,6 +3488,17 @@ Partial Class Shifter 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() @@ -3687,4 +3810,15 @@ Partial Class Shifter 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 End Class diff --git a/Shifter.resx b/ShiftOS/Shifter.resx index 4ef3078..7314e90 100644 --- a/Shifter.resx +++ b/ShiftOS/Shifter.resx @@ -139,17 +139,14 @@ 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> - <metadata name="predesktopappmenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> - <value>680, 17</value> - </metadata> - <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="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! @@ -163,4 +160,7 @@ The preview window above will track your modifications live until you click "App <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/Shifter.vb b/ShiftOS/Shifter.vb index 097129c..61be36c 100644 --- a/Shifter.vb +++ b/ShiftOS/Shifter.vb @@ -6,6 +6,7 @@ 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 @@ -125,21 +126,21 @@ Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + 'ShiftOSDesktop.setcolours() setupbuttons() initialsetup() determinevisibleobjects() - setuppreshifterstuff() AddFonts() + If ShiftOSDesktop.ShifterCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonshifter.SendToBack() + setuppreshifterstuff() + + ShiftOSDesktop.pnlpanelbuttonshifter.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshifter, ShiftOSDesktop.tbshiftericon, ShiftOSDesktop.tbshiftertext, True) + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshifter, ShiftOSDesktop.tbshiftericon, ShiftOSDesktop.tbshiftertext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 'Display the shifter intro @@ -159,12 +160,19 @@ 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() + 'ShiftOSDesktop.setcolours() setskin() setupbuttons() initialsetup() @@ -173,9 +181,7 @@ AddFonts() End Sub - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown, btnapplauncher.KeyDown, btnapply.KeyDown, btnborders.KeyDown, btnbuttons.KeyDown, btndesktop.KeyDown, btndesktopitself.KeyDown, btndesktoppanel.KeyDown, btnicons.KeyDown, btnpanelclock.KeyDown, btnprograms.KeyDown, btntitlebar.KeyDown, btntitletext.KeyDown, btnwindows.KeyDown - - + 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() @@ -239,80 +245,82 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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_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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + 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 ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -326,67 +334,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.shiftername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtshiftericon = True Then + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftericon = True Then ' Change to program's icon pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + 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. + pnlicon.Image = ShiftOSDesktop.shiftericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -408,27 +414,100 @@ 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -442,163 +521,181 @@ 'end of general setup Private Sub initialsetup() - titlebarcolour = ShiftOSDesktop.titlebarcolour - windowbordercolour = ShiftOSDesktop.windowbordercolour - windowbordersize = ShiftOSDesktop.windowbordersize - titlebarheight = ShiftOSDesktop.titlebarheight - closebuttoncolour = ShiftOSDesktop.closebuttoncolour - closebuttonheight = ShiftOSDesktop.closebuttonheight - closebuttonwidth = ShiftOSDesktop.closebuttonwidth - closebuttontop = ShiftOSDesktop.closebuttontop - closebuttonside = ShiftOSDesktop.closebuttonside - titletextcolour = ShiftOSDesktop.titletextcolour - titletexttop = ShiftOSDesktop.titletexttop - titletextside = ShiftOSDesktop.titletextside - titletextsize = ShiftOSDesktop.titletextsize - titletextfont = ShiftOSDesktop.titletextfont - titletextstyle = ShiftOSDesktop.titletextstyle - desktoppanelcolour = ShiftOSDesktop.desktoppanelcolour - desktopbackgroundcolour = ShiftOSDesktop.desktopbackgroundcolour - desktoppanelheight = ShiftOSDesktop.desktoppanelheight - desktoppanelposition = ShiftOSDesktop.desktoppanelposition - clocktextcolour = ShiftOSDesktop.clocktextcolour - clockbackgroundcolor = ShiftOSDesktop.clockbackgroundcolor - panelclocktexttop = ShiftOSDesktop.panelclocktexttop - panelclocktextsize = ShiftOSDesktop.panelclocktextsize - panelclocktextfont = ShiftOSDesktop.panelclocktextfont - panelclocktextstyle = ShiftOSDesktop.panelclocktextstyle - applauncherbuttoncolour = ShiftOSDesktop.applauncherbuttoncolour - applauncherbuttonclickedcolour = ShiftOSDesktop.applauncherbuttonclickedcolour - applauncherbackgroundcolour = ShiftOSDesktop.applauncherbackgroundcolour - applaunchermouseovercolour = ShiftOSDesktop.applaunchermouseovercolour - applicationsbuttontextcolour = ShiftOSDesktop.applicationsbuttontextcolour - applicationbuttonheight = ShiftOSDesktop.applicationbuttonheight - applicationbuttontextsize = ShiftOSDesktop.applicationbuttontextsize - applicationbuttontextfont = ShiftOSDesktop.applicationbuttontextfont - applicationbuttontextstyle = ShiftOSDesktop.applicationbuttontextstyle - applicationlaunchername = ShiftOSDesktop.applicationlaunchername - titletextposition = ShiftOSDesktop.titletextposition - rollupbuttoncolour = ShiftOSDesktop.rollupbuttoncolour - rollupbuttonheight = ShiftOSDesktop.rollupbuttonheight - rollupbuttonwidth = ShiftOSDesktop.rollupbuttonwidth - rollupbuttonside = ShiftOSDesktop.rollupbuttonside - rollupbuttontop = ShiftOSDesktop.rollupbuttontop - titlebariconside = ShiftOSDesktop.titlebariconside - titlebaricontop = ShiftOSDesktop.titlebaricontop - titlebarcornerwidth = ShiftOSDesktop.titlebarcornerwidth - titlebarrightcornercolour = ShiftOSDesktop.titlebarrightcornercolour - titlebarleftcornercolour = ShiftOSDesktop.titlebarleftcornercolour - showwindowcorners = ShiftOSDesktop.showwindowcorners - applaunchermenuholderwidth = ShiftOSDesktop.applaunchermenuholderwidth - windowborderleftcolour = ShiftOSDesktop.windowborderleftcolour - windowborderrightcolour = ShiftOSDesktop.windowborderrightcolour - windowborderbottomcolour = ShiftOSDesktop.windowborderbottomcolour - windowborderbottomrightcolour = ShiftOSDesktop.windowborderbottomrightcolour - windowborderbottomleftcolour = ShiftOSDesktop.windowborderbottomleftcolour - panelbuttonicontop = ShiftOSDesktop.panelbuttonicontop - panelbuttoniconside = ShiftOSDesktop.panelbuttoniconside - panelbuttoniconsize = ShiftOSDesktop.panelbuttoniconsize - panelbuttoniconsize = ShiftOSDesktop.panelbuttoniconsize - panelbuttonheight = ShiftOSDesktop.panelbuttonheight - panelbuttonwidth = ShiftOSDesktop.panelbuttonwidth - panelbuttoncolour = ShiftOSDesktop.panelbuttoncolour - panelbuttontextcolour = ShiftOSDesktop.panelbuttontextcolour - panelbuttontextsize = ShiftOSDesktop.panelbuttontextsize - panelbuttontextfont = ShiftOSDesktop.panelbuttontextfont - panelbuttontextstyle = ShiftOSDesktop.panelbuttontextstyle - panelbuttontextside = ShiftOSDesktop.panelbuttontextside - panelbuttontexttop = ShiftOSDesktop.panelbuttontexttop - panelbuttongap = ShiftOSDesktop.panelbuttongap - panelbuttonfromtop = ShiftOSDesktop.panelbuttonfromtop - panelbuttoninitialgap = ShiftOSDesktop.panelbuttoninitialgap - minimizebuttoncolour = ShiftOSDesktop.minimizebuttoncolour - minimizebuttonheight = ShiftOSDesktop.minimizebuttonheight - minimizebuttonwidth = ShiftOSDesktop.minimizebuttonwidth - minimizebuttonside = ShiftOSDesktop.minimizebuttonside - minimizebuttontop = ShiftOSDesktop.minimizebuttontop + 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 'skins - Array.Copy(ShiftOSDesktop.skinimages, shifterskinimages, shifterskinimages.Length) - - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else skinclosebutton(0) = ShiftOSDesktop.skinclosebutton(0).Clone - If ShiftOSDesktop.skinclosebutton(1) Is Nothing Then Else skinclosebutton(1) = ShiftOSDesktop.skinclosebutton(1).Clone - If ShiftOSDesktop.skinclosebutton(2) Is Nothing Then Else skinclosebutton(2) = ShiftOSDesktop.skinclosebutton(2).Clone - skinclosebuttonstyle = ShiftOSDesktop.skinclosebuttonstyle - - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else shifterskintitlebar(0) = ShiftOSDesktop.skintitlebar(0).Clone - 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 = ShiftOSDesktop.skintitlebarstyle - - If ShiftOSDesktop.skindesktopbackground(0) Is Nothing Then Else skindesktopbackground(0) = ShiftOSDesktop.skindesktopbackground(0).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 = ShiftOSDesktop.skindesktopbackgroundstyle - - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else skinrollupbutton(0) = ShiftOSDesktop.skinrollupbutton(0).Clone - If ShiftOSDesktop.skinrollupbutton(1) Is Nothing Then Else skinrollupbutton(1) = ShiftOSDesktop.skinrollupbutton(1).Clone - If ShiftOSDesktop.skinrollupbutton(2) Is Nothing Then Else skinrollupbutton(2) = ShiftOSDesktop.skinrollupbutton(2).Clone - skinrollupbuttonstyle = ShiftOSDesktop.skinrollupbuttonstyle - - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else skintitlebarrightcorner(0) = ShiftOSDesktop.skintitlebarrightcorner(0).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 = ShiftOSDesktop.skintitlebarrightcornerstyle - - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else skintitlebarleftcorner(0) = ShiftOSDesktop.skintitlebarleftcorner(0).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 = ShiftOSDesktop.skintitlebarleftcornerstyle - - If ShiftOSDesktop.skindesktoppanel(0) Is Nothing Then Else skindesktoppanel(0) = ShiftOSDesktop.skindesktoppanel(0).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 = ShiftOSDesktop.skindesktoppanelstyle - - If ShiftOSDesktop.skindesktoppaneltime(0) Is Nothing Then Else skindesktoppaneltime(0) = ShiftOSDesktop.skindesktoppaneltime(0).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 = ShiftOSDesktop.skindesktoppaneltimestyle - - If ShiftOSDesktop.skinapplauncherbutton(0) Is Nothing Then Else skinapplauncherbutton(0) = ShiftOSDesktop.skinapplauncherbutton(0).Clone - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then Else skinapplauncherbutton(1) = ShiftOSDesktop.skinapplauncherbutton(1).Clone - If ShiftOSDesktop.skinapplauncherbutton(2) Is Nothing Then Else skinapplauncherbutton(2) = ShiftOSDesktop.skinapplauncherbutton(2).Clone - skinapplauncherbuttonstyle = ShiftOSDesktop.skinapplauncherbuttonstyle - - If ShiftOSDesktop.skinwindowborderleft(0) Is Nothing Then Else skinwindowborderleft(0) = ShiftOSDesktop.skinwindowborderleft(0).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 = ShiftOSDesktop.skinwindowborderleftstyle - - If ShiftOSDesktop.skinwindowborderright(0) Is Nothing Then Else skinwindowborderright(0) = ShiftOSDesktop.skinwindowborderright(0).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 = ShiftOSDesktop.skinwindowborderrightstyle - - If ShiftOSDesktop.skinwindowborderbottom(0) Is Nothing Then Else skinwindowborderbottom(0) = ShiftOSDesktop.skinwindowborderbottom(0).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 = ShiftOSDesktop.skinwindowborderbottomstyle - - If ShiftOSDesktop.skinwindowborderbottomright(0) Is Nothing Then Else skinwindowborderbottomright(0) = ShiftOSDesktop.skinwindowborderbottomright(0).Clone - 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 = ShiftOSDesktop.skinwindowborderbottomrightstyle - - If ShiftOSDesktop.skinwindowborderbottomleft(0) Is Nothing Then Else skinwindowborderbottomleft(0) = ShiftOSDesktop.skinwindowborderbottomleft(0).Clone - 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 = ShiftOSDesktop.skinwindowborderbottomleftstyle - - If ShiftOSDesktop.skinpanelbutton(0) Is Nothing Then Else skinpanelbutton(0) = ShiftOSDesktop.skinpanelbutton(0).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 = ShiftOSDesktop.skinpanelbuttonstyle - - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else skinminimizebutton(0) = ShiftOSDesktop.skinminimizebutton(0).Clone - If ShiftOSDesktop.skinminimizebutton(1) Is Nothing Then Else skinminimizebutton(1) = ShiftOSDesktop.skinminimizebutton(1).Clone - If ShiftOSDesktop.skinminimizebutton(2) Is Nothing Then Else skinminimizebutton(2) = ShiftOSDesktop.skinminimizebutton(2).Clone - skinminimizebuttonstyle = ShiftOSDesktop.skinminimizebuttonstyle + '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() @@ -683,6 +780,7 @@ txticonfromside.Hide() txticonfromtop.Hide() End If + cbindividualbordercolours.Checked = Skins.enablebordercorners End Sub Public Sub setuppreshifterstuff() @@ -1004,7 +1102,6 @@ txtminimizebuttontop.Text = minimizebuttontop txtminimizebuttonside.Text = minimizebuttonside - Select Case titletextstyle Case FontStyle.Bold combotitletextstyle.Text = "Bold" @@ -1070,6 +1167,36 @@ 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 @@ -1086,6 +1213,7 @@ comboclocktextfont.Items.Add(myFont.Name) comboappbuttontextfont.Items.Add(myFont.Name) cbpanelbuttonfont.Items.Add(myFont.Name) + launcheritemfont.Items.Add(myFont.Name) Next 'font_family End Sub @@ -1095,263 +1223,427 @@ 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 - applysettings() - End If - - End Sub - + ' 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 + ' 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("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) + If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) saveskintocurrentskin() - '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)) + 'delay fixes timing issue + tmrdelay.Start() + If timingissuefixer > 10 Then + tmrdelay.Stop() - '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.setupalltitlebars() - ShiftOSDesktop.setupskins() - ShiftOSDesktop.Invalidate() + 'quick fixes + If titlebarheight > 500 Then + titlebarheight = 500 + txttitlebarheight.Text = "500" + End If - 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 windowbordersize > 500 Then + windowbordersize = 500 + txtbordersize.Text = "500" + End If - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) - loadclone() + If desktoppanelheight > 500 Then + desktoppanelheight = 500 + txtdesktoppanelheight.Text = "500" + End If - Me.Invalidate() + '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 @@ -1364,14 +1656,18 @@ End Function Public Sub saveskintocurrentskin() - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Current\") Then Else My.Computer.FileSystem.CreateDirectory("C:\ShiftOS\Shiftum42\Skins\Current\") - My.Computer.FileSystem.CopyDirectory("C:\ShiftOS\Shiftum42\Skins\Current\", "C:\ShiftOS\Shiftum42\Skins\CurrentCopy\") - ShiftOSDesktop.disposeoldskindata("shifterapply") + 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("C:\ShiftOS\Shiftum42\Skins\Current\") Then shifterskinimages(i) = shifterskinimages(i).Replace("Current", "CurrentCopy") + 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 @@ -1468,9 +1764,14 @@ If shifterskinimages(i) = "" Then Else If shifterskinimages(i).Contains("\") Then folderdivider = "\" Else folderdivider = "/" - IO.File.Copy(shifterskinimages(i), "C:\ShiftOS\Shiftum42\Skins\Current\" & shifterskinimages(i).Substring(shifterskinimages(i).LastIndexOf(folderdivider)), True) - shifterskinimages(i) = "C:\ShiftOS\Shiftum42\Skins\Current\" & shifterskinimages(i).Substring(shifterskinimages(i).LastIndexOf(folderdivider) + 1) + 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) @@ -1525,7 +1826,7 @@ skinlines(149) = shifterskinimages(49) skinlines(150) = shifterskinimages(50) - IO.File.WriteAllLines("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat", skinlines) + IO.File.WriteAllLines(ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat", skinlines) End Sub Private Sub setclocktime() @@ -2047,10 +2348,14 @@ Private Sub btndesktoppanel_Click(sender As Object, e As EventArgs) Handles btndesktoppanel.Click If ShiftOSDesktop.boughtshiftdesktoppanel Then - pnldesktoppaneloptions.Show() - pnldesktoppaneloptions.Size = New Size(317, 134) - pnldesktoppaneloptions.Location = New Point(136, 159) - pnldesktoppaneloptions.BringToFront() + 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!" @@ -2261,6 +2566,7 @@ 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!" @@ -2626,118 +2932,22 @@ End Sub Private Sub btnresetallsettings_Click(sender As Object, e As EventArgs) Handles btnresetallsettings.Click - titlebarcolour = Color.Gray - windowbordercolour = Color.Gray - windowbordersize = 2 - titlebarheight = 30 - closebuttoncolour = Color.Black - closebuttonheight = 22 - closebuttonwidth = 22 - closebuttonside = 5 - closebuttontop = 4 - titletextcolour = Color.White - titletexttop = 7 - titletextside = 4 - titletextsize = 11 - titletextfont = "Felix Titling" - titletextstyle = FontStyle.Bold - desktoppanelcolour = Color.Gray - desktopbackgroundcolour = Color.Black - desktoppanelheight = 24 - desktoppanelposition = "Top" - clocktextcolour = Color.Black - clockbackgroundcolor = Color.Gray - panelclocktexttop = 0 - panelclocktextsize = 14 - panelclocktextfont = "Trebuchet MS" - panelclocktextstyle = FontStyle.Regular - 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" - rollupbuttoncolour = Color.Black - rollupbuttonheight = 22 - rollupbuttonwidth = 22 - rollupbuttonside = 32 - rollupbuttontop = 4 - titlebariconside = 8 - titlebaricontop = 8 - showwindowcorners = False - titlebarcornerwidth = 2 - titlebarrightcornercolour = Color.White - titlebarleftcornercolour = Color.White - applaunchermenuholderwidth = 100 - windowborderleftcolour = Color.Gray - windowborderrightcolour = Color.Gray - windowborderbottomcolour = Color.Gray - windowborderbottomrightcolour = Color.Gray - windowborderbottomleftcolour = Color.Gray - panelbuttonicontop = 3 - panelbuttoniconside = 4 - panelbuttoniconsize = 16 - panelbuttoniconsize = 16 - panelbuttonheight = 22 - panelbuttonwidth = 186 - panelbuttoncolour = Color.Black - panelbuttontextcolour = Color.White - panelbuttontextsize = 10 - panelbuttontextfont = "Microsoft Sans Serif" - panelbuttontextstyle = FontStyle.Bold - panelbuttontextside = 22 - panelbuttontexttop = 2 - panelbuttongap = 1 - panelbuttonfromtop = 1 - panelbuttoninitialgap = 5 - minimizebuttoncolour = Color.Black - minimizebuttonheight = 22 - minimizebuttonwidth = 22 - minimizebuttonside = 59 - minimizebuttontop = 4 - Array.Clear(shifterskinimages, 0, shifterskinimages.Length) - Array.Clear(skinclosebutton, 0, skinclosebutton.Length) - skinclosebuttonstyle = ImageLayout.Stretch - Array.Clear(shifterskintitlebar, 0, shifterskintitlebar.Length) - skintitlebarstyle = ImageLayout.Stretch - Array.Clear(skindesktopbackground, 0, skindesktopbackground.Length) - skindesktopbackgroundstyle = ImageLayout.Stretch - Array.Clear(skinrollupbutton, 0, skinrollupbutton.Length) - skinrollupbuttonstyle = ImageLayout.Stretch - Array.Clear(skintitlebarrightcorner, 0, skintitlebarrightcorner.Length) - skintitlebarrightcornerstyle = ImageLayout.Stretch - Array.Clear(skintitlebarleftcorner, 0, skintitlebarleftcorner.Length) - skintitlebarleftcornerstyle = ImageLayout.Stretch - Array.Clear(skindesktoppanel, 0, skindesktoppanel.Length) - skindesktoppanelstyle = ImageLayout.Stretch - Array.Clear(skindesktoppaneltime, 0, skindesktoppaneltime.Length) - skindesktoppaneltimestyle = ImageLayout.Stretch - Array.Clear(skinapplauncherbutton, 0, skinapplauncherbutton.Length) - skinapplauncherbuttonstyle = ImageLayout.Stretch - Array.Clear(skinwindowborderleft, 0, skinwindowborderleft.Length) - skinwindowborderleftstyle = ImageLayout.Stretch - Array.Clear(skinwindowborderright, 0, skinwindowborderright.Length) - skinwindowborderrightstyle = ImageLayout.Stretch - Array.Clear(skinwindowborderbottom, 0, skinwindowborderbottom.Length) - skinwindowborderbottomstyle = ImageLayout.Stretch - Array.Clear(skinwindowborderbottomright, 0, skinwindowborderbottomright.Length) - skinwindowborderbottomrightstyle = ImageLayout.Stretch - Array.Clear(skinwindowborderbottomleft, 0, skinwindowborderbottomleft.Length) - skinwindowborderbottomleftstyle = ImageLayout.Stretch - Array.Clear(skinpanelbutton, 0, skinpanelbutton.Length) - skinpanelbuttonstyle = ImageLayout.Stretch - Array.Clear(skinminimizebutton, 0, skinminimizebutton.Length) - skinminimizebuttonstyle = ImageLayout.Stretch - - 'postsettings - If ShiftOSDesktop.boughtknowledgeinputicon = True Then titletextside = titletextside + 22 + Skins.setupdefaults() + + Skins.saveskinfiles(False) + + setupbuttons() + initialsetup() + determinevisibleobjects() setuppreshifterstuff() - applysettings() + 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 @@ -2754,4 +2964,45 @@ 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 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/Shiftorium.Designer.vb b/ShiftOS/Shiftorium.Designer.vb index 47d697c..5f4da80 100644 --- a/Shiftorium.Designer.vb +++ b/ShiftOS/Shiftorium.Designer.vb @@ -92,7 +92,7 @@ Partial Class Shiftorium 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("Maiandra GD", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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 @@ -204,7 +204,7 @@ Partial Class Shiftorium ' 'lbudescription ' - Me.lbudescription.Font = New System.Drawing.Font("Tempus Sans ITC", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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" @@ -281,10 +281,10 @@ Partial Class Shiftorium ' 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.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(109, 18) + Me.lbtitletext.Size = New System.Drawing.Size(85, 18) Me.lbtitletext.TabIndex = 20 Me.lbtitletext.Text = "Shiftorium" ' diff --git a/Shiftorium.resx b/ShiftOS/Shiftorium.resx index 47bcfd4..47bcfd4 100644 --- a/Shiftorium.resx +++ b/ShiftOS/Shiftorium.resx diff --git a/Shiftorium.vb b/ShiftOS/Shiftorium.vb index 64b5112..a45e2ba 100644 --- a/Shiftorium.vb +++ b/ShiftOS/Shiftorium.vb @@ -15,21 +15,34 @@ Public Class Shiftorium - Private Sub Shiftorium_Load(sender As Object, e As EventArgs) Handles Me.Load +#Region "Template Code" + + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonshiftorium.SendToBack() + 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) + ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftorium, ShiftOSDesktop.tbshiftoriumicon, ShiftOSDesktop.tbshiftoriumtext, True) 'modify to proper name ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 + End Sub - handleupgradelist() + 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 @@ -45,24 +58,20 @@ Public Class Shiftorium If e.KeyCode = Keys.A AndAlso e.Control Then e.Handled = True Me.Location = New Point(Me.Location.X - ShiftOSDesktop.movablewindownumber, Me.Location.Y) - ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " left to " & Me.Location.ToString & Environment.NewLine 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) - e.SuppressKeyPress = True 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) - e.SuppressKeyPress = True 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) - ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " down to " & Me.Location.ToString & Environment.NewLine 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 @@ -100,80 +109,77 @@ Public Class Shiftorium End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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_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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + 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() - Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -187,67 +193,65 @@ Public Class Shiftorium If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.shiftoriumname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtshiftoriumicon = True Then + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtshiftoriumicon = True Then ' Change to program's icon pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + 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. + pnlicon.Image = ShiftOSDesktop.shiftoriumicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -269,27 +273,100 @@ Public Class Shiftorium 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -301,6 +378,7 @@ Public Class Shiftorium 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() @@ -471,160 +549,189 @@ Public Class Shiftorium 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 - 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.") - 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.") - 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.") - 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.") - 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.") - 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).") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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!") - 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.") - 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.") - 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!") - 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.") - 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.") - 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!") - 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!") - 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!") - 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.") - 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.") - 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...") - 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.") - 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!") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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!") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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!") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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!") - 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!") + '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…") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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?") - 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.") - 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.") - 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.") - 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.") - 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!") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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.") - 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!") - 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!") - 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.") - + 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 @@ -640,7 +747,6 @@ Public Class Shiftorium 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.boughtfileskimmer = False Then lbupgrades.Items.Add("File Skimmer - 60 CP") If ShiftOSDesktop.boughttextpad = False Then lbupgrades.Items.Add("Textpad - 65 CP") If ShiftOSDesktop.boughttextpad = True Then @@ -648,6 +754,9 @@ Public Class Shiftorium 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 @@ -670,6 +779,7 @@ Public Class Shiftorium 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") @@ -1150,15 +1260,42 @@ Public Class Shiftorium 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 - Private Sub handlebuy(ByVal name As String, ByRef bought As Boolean, ByVal boughttutorial As String) + 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 @@ -1177,6 +1314,41 @@ Public Class Shiftorium 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 @@ -1210,6 +1382,13 @@ Public Class Shiftorium 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() @@ -1225,12 +1404,12 @@ Public Class Shiftorium ShiftOSDesktop.setupdesktop() End If If lbupgrades.SelectedItem.ToString = "Title Text - 40 CP" Then - ShiftOSDesktop.setupalltitlebars() + ShiftOSDesktop.setupdesktop() Shifter.setupbuttons() Shifter.determinevisibleobjects() End If If lbupgrades.SelectedItem.ToString = "Close Button - 90 CP" Then - ShiftOSDesktop.setupalltitlebars() + ShiftOSDesktop.setupdesktop() Shifter.setupbuttons() Shifter.determinevisibleobjects() End If @@ -1261,12 +1440,12 @@ Public Class Shiftorium Skin_Loader.determinevisibleobjects() End If If lbupgrades.SelectedItem.ToString = "Roll Up Button - 45 CP" Then - ShiftOSDesktop.setupalltitlebars() + ShiftOSDesktop.setupdesktop() Shifter.setupbuttons() Shifter.determinevisibleobjects() End If If lbupgrades.SelectedItem.ToString = "Minimize Button - 50 CP" Then - ShiftOSDesktop.setupalltitlebars() + ShiftOSDesktop.setupdesktop() Shifter.setupbuttons() Shifter.determinevisibleobjects() Skin_Loader.determinevisibleobjects() @@ -1317,7 +1496,6 @@ Public Class Shiftorium End If If lbupgrades.SelectedItem.ToString = "Knowledge Input Icon - 15 CP" Then ShiftOSDesktop.titletextside = ShiftOSDesktop.titletextside + 22 - ShiftOSDesktop.setupalltitlebars() Shifter.setupbuttons() Shifter.determinevisibleobjects() ShiftOSDesktop.setupdesktop() @@ -1469,6 +1647,6 @@ Public Class Shiftorium If lbupgrades.SelectedItem.ToString = "Artpad Save - 50 CP" Then ArtPad.setuptoolbox() If lbupgrades.SelectedItem.ToString = "Artpad Load - 50 CP" Then ArtPad.setuptoolbox() - ShiftOSDesktop.setcolours() + 'ShiftOSDesktop.setcolours() End Sub End Class
\ No newline at end of file diff --git a/Skin Loader.Designer.vb b/ShiftOS/Skin Loader.Designer.vb index 5253eba..1a0616a 100644 --- a/Skin Loader.Designer.vb +++ b/ShiftOS/Skin Loader.Designer.vb @@ -147,7 +147,7 @@ Partial Class Skin_Loader ' 'Label2 ' - Me.Label2.Font = New System.Drawing.Font("Century", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -341,7 +341,7 @@ Partial Class Skin_Loader ' 'Label1 ' - Me.Label1.Font = New System.Drawing.Font("Century", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -472,10 +472,10 @@ Partial Class Skin_Loader ' Me.pretitletext.AutoSize = True Me.pretitletext.BackColor = System.Drawing.Color.Transparent - Me.pretitletext.Font = New System.Drawing.Font("Felix Titling", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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(89, 18) + Me.pretitletext.Size = New System.Drawing.Size(77, 18) Me.pretitletext.TabIndex = 19 Me.pretitletext.Text = "Template" ' @@ -592,10 +592,10 @@ Partial Class Skin_Loader ' 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.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(121, 18) + Me.lbtitletext.Size = New System.Drawing.Size(98, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Skin Loader" ' diff --git a/Skin Loader.resx b/ShiftOS/Skin Loader.resx index d6335c3..d6335c3 100644 --- a/Skin Loader.resx +++ b/ShiftOS/Skin Loader.resx diff --git a/ShiftOS/Skin Loader.vb b/ShiftOS/Skin Loader.vb new file mode 100644 index 0000000..d7e404f --- /dev/null +++ b/ShiftOS/Skin Loader.vb @@ -0,0 +1,1565 @@ +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(ShiftOSPath + "Shiftum42\Skins\Loaded") Then My.Computer.FileSystem.DeleteDirectory(ShiftOSPath + "Shiftum42\Skins\Loaded", 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/Skinshifter.Designer.vb b/ShiftOS/Skinshifter.Designer.vb index d8d27bb..6c867fb 100644 --- a/Skinshifter.Designer.vb +++ b/ShiftOS/Skinshifter.Designer.vb @@ -26,6 +26,9 @@ Partial Class Skinshifter 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() @@ -47,16 +50,13 @@ Partial Class Skinshifter Me.pgbottomlcorner = New System.Windows.Forms.Panel() Me.pgleft = New System.Windows.Forms.Panel() Me.titlebar = New System.Windows.Forms.Panel() - Me.tmrchangeskin = New System.Windows.Forms.Timer(Me.components) - Me.btnmoveup = New System.Windows.Forms.Button() - Me.btnmovedown = New System.Windows.Forms.Button() - Me.PictureBox1 = New System.Windows.Forms.PictureBox() 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.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' @@ -87,6 +87,40 @@ Partial Class Skinshifter 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)) @@ -216,10 +250,10 @@ Partial Class Skinshifter ' 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.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(118, 18) + Me.lbtitletext.Size = New System.Drawing.Size(95, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Skin Shifter" ' @@ -296,44 +330,6 @@ Partial Class Skinshifter Me.titlebar.Size = New System.Drawing.Size(459, 30) Me.titlebar.TabIndex = 19 ' - 'tmrchangeskin - ' - Me.tmrchangeskin.Interval = 1000 - ' - '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 - ' - '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 - ' - '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 - ' 'pnlicon ' Me.pnlicon.BackColor = System.Drawing.Color.Transparent @@ -346,6 +342,10 @@ Partial Class Skinshifter Me.pnlicon.TabStop = False Me.pnlicon.Visible = False ' + 'tmrchangeskin + ' + Me.tmrchangeskin.Interval = 1000 + ' 'Skinshifter ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -363,11 +363,11 @@ Partial Class 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.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.pnlicon, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) diff --git a/Skinshifter.resx b/ShiftOS/Skinshifter.resx index 22d093a..0f25db4 100644 --- a/Skinshifter.resx +++ b/ShiftOS/Skinshifter.resx @@ -118,15 +118,18 @@ <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>1347, 18</value> + <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>1441, 18</value> + <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>1525, 18</value> + <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>1638, 18</value> + <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/Skinshifter.vb b/ShiftOS/Skinshifter.vb index 8827ed8..f68d557 100644 --- a/Skinshifter.vb +++ b/ShiftOS/Skinshifter.vb @@ -1,4 +1,6 @@ -Public Class Skinshifter +Imports System.IO + +Public Class Skinshifter Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -6,25 +8,34 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + If ShiftOSDesktop.SkinShifterCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonskinshifter.SendToBack() 'modfiy to proper name + 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 @@ -89,80 +100,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight If justopened = True Then - Me.Size = New Size(455, 229) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -176,7 +190,7 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) + 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 @@ -184,57 +198,55 @@ If ShiftOSDesktop.boughtclosebutton = False Then closebutton.Hide() Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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.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 @@ -260,27 +272,27 @@ Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -300,6 +312,7 @@ 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() @@ -361,26 +374,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -392,6 +428,7 @@ 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 @@ -411,19 +448,30 @@ If moveitemignore = False Then If lbskinlist.SelectedIndex < -1 Then Else - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\Preview\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\Preview\", FileIO.DeleteDirectoryOption.DeleteAllContents) - System.IO.Compression.ZipFile.ExtractToDirectory(lbskinlist.SelectedItem.ToString, "C:\ShiftOS\Shiftum42\Skins\Preview\") - My.Computer.FileSystem.WriteAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat", My.Computer.FileSystem.ReadAllText("C:\ShiftOS\Shiftum42\Skins\Preview\skindata.dat").Replace("\Current", "\Preview"), False) - - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) - ShiftOSDesktop.disposeoldskindata("skinloaderapplyskin") - ShiftOSDesktop.loadcurrentskin() - ShiftOSDesktop.loadskinfiles() - ShiftOSDesktop.setupalltitlebars() - ShiftOSDesktop.setcolours() - ShiftOSDesktop.setupdesktop() - ShiftOSDesktop.setupskins() - ShiftOSDesktop.Invalidate() + 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 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..c508d52 --- /dev/null +++ b/ShiftOS/SystemInfo.Designer.vb @@ -0,0 +1,394 @@ +<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.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.SysInfoLabel5 = New System.Windows.Forms.Label() + Me.SysInfoTextBox5 = New System.Windows.Forms.TextBox() + 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" + ' + '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.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(124, 15) + Me.SysInfoBox3.Name = "SysInfoBox3" + Me.SysInfoBox3.ReadOnly = True + Me.SysInfoBox3.Size = New System.Drawing.Size(277, 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(124, 46) + Me.SysInfoBox4.Name = "SysInfoBox4" + Me.SysInfoBox4.ReadOnly = True + Me.SysInfoBox4.Size = New System.Drawing.Size(277, 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 + ' + '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" + ' + '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 + ' + '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 +End Class diff --git a/Web Browser.resx b/ShiftOS/SystemInfo.resx index b8db819..b8db819 100644 --- a/Web Browser.resx +++ b/ShiftOS/SystemInfo.resx diff --git a/ShiftOS/SystemInfo.vb b/ShiftOS/SystemInfo.vb new file mode 100644 index 0000000..56b2d70 --- /dev/null +++ b/ShiftOS/SystemInfo.vb @@ -0,0 +1,446 @@ +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 + +End Class
\ No newline at end of file diff --git a/TanColorScheme.vb b/ShiftOS/TanColorScheme.vb index 0ec943a..0ec943a 100644 --- a/TanColorScheme.vb +++ b/ShiftOS/TanColorScheme.vb diff --git a/Terminal.Designer.vb b/ShiftOS/Terminal.Designer.vb index 43bb373..ae4fda1 100644 --- a/Terminal.Designer.vb +++ b/ShiftOS/Terminal.Designer.vb @@ -43,6 +43,7 @@ Partial Class Terminal 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() @@ -173,10 +174,10 @@ Partial Class Terminal ' 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.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(92, 18) + Me.lbtitletext.Size = New System.Drawing.Size(73, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Terminal" ' @@ -219,6 +220,10 @@ Partial Class Terminal ' Me.pullside.Interval = 1 ' + 'tmrstorylineupdate + ' + Me.tmrstorylineupdate.Interval = 1000 + ' 'Terminal ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) @@ -266,4 +271,5 @@ Partial Class Terminal 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/Terminal.resx b/ShiftOS/Terminal.resx index 80e6c6c..9ac946c 100644 --- a/Terminal.resx +++ b/ShiftOS/Terminal.resx @@ -132,4 +132,7 @@ <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/Terminal.vb b/ShiftOS/Terminal.vb index 6d44991..03fcd85 100644 --- a/Terminal.vb +++ b/ShiftOS/Terminal.vb @@ -1,6 +1,7 @@ Imports System.Net.Mail Public Class Terminal + Public cmds As String() Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -9,6 +10,15 @@ Public Class Terminal 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 @@ -16,15 +26,20 @@ Public Class Terminal Dim testing As Boolean = True Dim further As Boolean = True + Public sendinputtomod As Boolean = False +#Region "Template Code" - Private Sub Terminal_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setskin() + 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() + ShiftOSDesktop.pnlpanelbuttonterminal.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonterminal, ShiftOSDesktop.tbterminalicon, ShiftOSDesktop.tbterminaltext, True) + 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 & " $> " @@ -39,33 +54,42 @@ Public Class Terminal 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) - ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " left to " & Me.Location.ToString & Environment.NewLine 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) - e.SuppressKeyPress = True 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) - e.SuppressKeyPress = True 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) - ShiftOSDesktop.log = ShiftOSDesktop.log & My.Computer.Clock.LocalTime & " User moved " & Me.Name & " down to " & Me.Location.ToString & Environment.NewLine 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 @@ -103,80 +127,83 @@ Public Class Terminal End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -184,74 +211,71 @@ Public Class Terminal If ShiftOSDesktop.boughttitlebar = False Then titlebar.Hide() - lbtitletext.Capture = False 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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.terminalname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtterminalicon = True Then + 'Change when Icon skinning complete + If ShiftOSDesktop.boughtterminalicon = True Then ' Change to program's icon pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + 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. + pnlicon.Image = ShiftOSDesktop.terminalicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -273,29 +297,29 @@ Public Class Terminal End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -315,6 +339,7 @@ Public Class Terminal 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() @@ -376,28 +401,51 @@ Public Class Terminal End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -407,6 +455,7 @@ Public Class Terminal End Sub 'end of general setup +#End Region Public Sub miniterminal() Me.WindowState = FormWindowState.Normal @@ -423,7 +472,7 @@ Public Class Terminal End If setuptitlebar() setupborders() - ShiftOSDesktop.setcolours() + 'ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 setskin() @@ -533,8 +582,62 @@ Public Class Terminal Private Sub DoCommand() + 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 @@ -556,6 +659,20 @@ Public Class Terminal 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(", ", ",") @@ -603,6 +720,24 @@ Public Class Terminal 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 @@ -650,6 +785,24 @@ Public Class Terminal 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() @@ -698,6 +851,24 @@ Public Class Terminal 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() @@ -709,43 +880,61 @@ Public Class Terminal Dim findwords() As String = command.Split(" ") Select Case findwords(1) Case "knowledge", ShiftOSDesktop.knowledgeinputname.ToLower - ShiftOSDesktop.minimizeprogram(Knowledge_Input) + ShiftOSDesktop.minimizeprogram(Knowledge_Input, False) Case "shiftorium", ShiftOSDesktop.shiftoriumname.ToLower - ShiftOSDesktop.minimizeprogram(Shiftorium) + ShiftOSDesktop.minimizeprogram(Shiftorium, False) Case "clock", ShiftOSDesktop.clockname.ToLower - ShiftOSDesktop.minimizeprogram(Clock) + ShiftOSDesktop.minimizeprogram(Clock, False) Case "shifter", ShiftOSDesktop.shiftername.ToLower - ShiftOSDesktop.minimizeprogram(Shifter) + ShiftOSDesktop.minimizeprogram(Shifter, False) Case "colour", ShiftOSDesktop.colourpickername.ToLower - ShiftOSDesktop.minimizeprogram(Colour_Picker) + ShiftOSDesktop.minimizeprogram(Colour_Picker, False) Case "info", "infobox" - ShiftOSDesktop.minimizeprogram(infobox) + ShiftOSDesktop.minimizeprogram(infobox, False) Case "pong", ShiftOSDesktop.pongname.ToLower - ShiftOSDesktop.minimizeprogram(Pong) + ShiftOSDesktop.minimizeprogram(Pong, False) Case "file", ShiftOSDesktop.fileskimmername.ToLower - ShiftOSDesktop.minimizeprogram(File_Skimmer) + ShiftOSDesktop.minimizeprogram(File_Skimmer, False) Case "textpad", ShiftOSDesktop.textpadname.ToLower - ShiftOSDesktop.minimizeprogram(TextPad) + ShiftOSDesktop.minimizeprogram(TextPad, False) Case "fileopener", ShiftOSDesktop.fileopenername.ToLower - ShiftOSDesktop.minimizeprogram(File_Opener) + ShiftOSDesktop.minimizeprogram(File_Opener, False) Case "filesaver", ShiftOSDesktop.filesavername.ToLower - ShiftOSDesktop.minimizeprogram(File_Saver) + ShiftOSDesktop.minimizeprogram(File_Saver, False) Case "graphic", ShiftOSDesktop.graphicpickername.ToLower - ShiftOSDesktop.minimizeprogram(Graphic_Picker) + ShiftOSDesktop.minimizeprogram(Graphic_Picker, False) Case "skin", ShiftOSDesktop.skinloadername.ToLower - ShiftOSDesktop.minimizeprogram(Skin_Loader) + ShiftOSDesktop.minimizeprogram(Skin_Loader, False) Case "artpad", ShiftOSDesktop.artpadname.ToLower - ShiftOSDesktop.minimizeprogram(ArtPad) + ShiftOSDesktop.minimizeprogram(ArtPad, False) Case "calculator", ShiftOSDesktop.calculatorname.ToLower - ShiftOSDesktop.minimizeprogram(Calculator) + ShiftOSDesktop.minimizeprogram(Calculator, False) Case "webbrowser", "web", ShiftOSDesktop.webbrowsername.ToLower - ShiftOSDesktop.minimizeprogram(Web_Browser) + ShiftOSDesktop.minimizeprogram(Web_Browser, False) Case "videoplayer", "video", "video player", ShiftOSDesktop.videoplayername.ToLower - ShiftOSDesktop.minimizeprogram(Video_Player) + ShiftOSDesktop.minimizeprogram(Video_Player, False) Case "namechanger", "name", "name changer", ShiftOSDesktop.namechangername.ToLower - ShiftOSDesktop.minimizeprogram(Name_Changer) + ShiftOSDesktop.minimizeprogram(Name_Changer, False) Case "iconmanager", "icon", ShiftOSDesktop.iconmanagername.ToLower - ShiftOSDesktop.minimizeprogram(Name_Changer) + 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() @@ -1036,12 +1225,14 @@ Public Class Terminal 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 @@ -1049,6 +1240,7 @@ Public Class Terminal If ShiftOSDesktop.boughtunitymode = True Then ShiftOSDesktop.unitymode = False ShiftOSDesktop.setupdesktop() + ShiftOSDesktop.log = ShiftOSDesktop.log & "Unity mode was disabled at " & TimeOfDay Else wrongcommand() End If @@ -1057,14 +1249,16 @@ Public Class Terminal Case "05tray" ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints + 500 txtterm.Text = txtterm.Text & Environment.NewLine & "You have just cheated. Here is your 500 codepoints" & Environment.NewLine - '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 + ShiftOSDesktop.log = ShiftOSDesktop.log & ShiftOSDesktop.username & " cheated and got 500 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 "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 "infect zero.th1" Viruses.zerogravity = True Viruses.zerogravitythreatlevel = 1 @@ -1119,6 +1313,76 @@ Public Class Terminal 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 @@ -1258,6 +1522,7 @@ Public Class Terminal 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 @@ -1316,6 +1581,36 @@ Public Class Terminal 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 @@ -1377,9 +1672,98 @@ Public Class Terminal 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 End Class
\ No newline at end of file diff --git a/TextPad.Designer.vb b/ShiftOS/TextPad.Designer.vb index 21eec4c..21eec4c 100644 --- a/TextPad.Designer.vb +++ b/ShiftOS/TextPad.Designer.vb diff --git a/TextPad.resx b/ShiftOS/TextPad.resx index 448bc23..448bc23 100644 --- a/TextPad.resx +++ b/ShiftOS/TextPad.resx diff --git a/TextPad.vb b/ShiftOS/TextPad.vb index 4c2718f..7269fe7 100644 --- a/TextPad.vb +++ b/ShiftOS/TextPad.vb @@ -11,25 +11,31 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - txtuserinput.Size = New Size(txtuserinput.Size.Width, txtuserinput.Size.Height + pnloptions.Height) - setupoptions() - setskin() + setupall() + If ShiftOSDesktop.TextpadCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttontextpad.SendToBack() + ShiftOSDesktop.pnlpanelbuttontextpad.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttontextpad, ShiftOSDesktop.tbtextpadicon, ShiftOSDesktop.tbtextpadtext, True) + 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 - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown, txtuserinput.KeyDown, btnnew.KeyDown, btnopen.KeyDown, btnsave.KeyDown + 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() @@ -93,80 +99,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + 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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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) + 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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -180,67 +189,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.textpadname + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughttextpadicon = True Then + 'Change when Icon skinning complete + If ShiftOSDesktop.boughttextpadicon = True Then ' Change to program's icon pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) + 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. + pnlicon.Image = ShiftOSDesktop.textpadicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -262,29 +269,29 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -304,6 +311,7 @@ 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() @@ -365,26 +373,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -409,10 +440,10 @@ 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 @@ -449,6 +480,10 @@ 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" diff --git a/Video Player.Designer.vb b/ShiftOS/Video Player.Designer.vb index 0fa68fb..0fa68fb 100644 --- a/Video Player.Designer.vb +++ b/ShiftOS/Video Player.Designer.vb diff --git a/Video Player.resx b/ShiftOS/Video Player.resx index 92dc047..92dc047 100644 --- a/Video Player.resx +++ b/ShiftOS/Video Player.resx diff --git a/Video Player.vb b/ShiftOS/Video Player.vb index b98d9c2..a5a2ea5 100644 --- a/Video Player.vb +++ b/ShiftOS/Video Player.vb @@ -14,16 +14,16 @@ 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 - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() + If ShiftOSDesktop.VideoPlayerCorrupted Then Me.Close() : infobox.showinfo("The Plague.", Me.Name & "has been corrupted by The Plague.") - ShiftOSDesktop.pnlpanelbuttonvideoplayer.SendToBack() 'modfiy to proper name + 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 @@ -33,6 +33,12 @@ 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 @@ -97,80 +103,83 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) + 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 + '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 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 = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight If justopened = True Then - Me.Size = New Size(750, 480) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height + '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() + 'Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -184,67 +193,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.videoplayername + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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.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. + pnlicon.Image = ShiftOSDesktop.videoplayericontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -266,29 +273,29 @@ End If End Sub - Private Sub resettitlebar() + Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub @@ -308,6 +315,7 @@ 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() @@ -369,26 +377,49 @@ End Sub Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + '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 @@ -400,6 +431,7 @@ 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 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/Viruses.vb b/ShiftOS/Viruses.vb index c5c70b8..3e4d742 100644 --- a/Viruses.vb +++ b/ShiftOS/Viruses.vb @@ -1,10 +1,18 @@ 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 = True + Public zerogravity As Boolean = False Public zerogravitythreatlevel As Integer = 1 - Public zerogravityxspeed(20) As Integer - Public zerogravityyspeed(20) As Integer + Public zerogravityxspeed(33) As Integer + Public zerogravityyspeed(33) As Integer Public zerogravityspeedth1 = 1 Public zerogravityspeedth2 = 2 Public zerogravityspeedth3 = 4 @@ -14,7 +22,7 @@ 'Mouse Trap Varibles Public WithEvents mousetraptimer As New Timer Public WithEvents cooldowntraptimer As New Timer - Public mousetrap As Boolean = True + Public mousetrap As Boolean = False Public mousetrapthreatlevel As Integer = 1 Public mousetraped As Boolean = False Public bangstoescape As Integer = 20 @@ -43,13 +51,21 @@ 'Beeper Varibles Public WithEvents beepertimer As New Timer - Public beeper As Boolean = True + 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() @@ -58,7 +74,7 @@ End Sub Public Sub setupzerogravityspeeds() - For i = 0 To 20 + For i = 0 To 33 If i Mod 2 <> 0 Then Select Case zerogravitythreatlevel Case 1 @@ -115,7 +131,20 @@ 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 Terminal.Visible = True Then calculatelocations(Terminal, 20) + 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) @@ -204,8 +233,18 @@ 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(Terminal) - + 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 @@ -319,4 +358,167 @@ 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 = CInt(Math.Ceiling(Rnd() * 32)) + Select Case chooser + Case 1 + InfectApplication(ArtPad, ShiftOSDesktop.ArtpadCorrupted) + Case 2 + InfectApplication(File_Skimmer, ShiftOSDesktop.FileSkimmerCorrupted) + Case 3 + InfectApplication(Audio_Player, ShiftOSDesktop.AudioPlayerCorrupted) + Case 4 + InfectApplication(Bitnote_Digger, ShiftOSDesktop.BitNoteDiggerCorrupted) + Case 5 + InfectApplication(Bitnote_Wallet, ShiftOSDesktop.BitNoteWalletCorrupted) + Case 6 + InfectApplication(Calculator, ShiftOSDesktop.CalculatorCorrupted) + Case 7 + InfectApplication(Clock, ShiftOSDesktop.ClockCorrupted) + Case 8 + InfectApplication(coherencemodeform, ShiftOSDesktop.CoherenceModeCorrupted) + Case 9 + InfectApplication(Colour_Picker, ShiftOSDesktop.ColourPickerCorrupted) + Case 10 + InfectApplication(Dodge, ShiftOSDesktop.DodgeCorrupted) + Case 11 + InfectApplication(Downloadmanager, ShiftOSDesktop.DownloadManagerCorrupted) + Case 12 + InfectApplication(FloodGate_Manager, ShiftOSDesktop.FloodGateManagerCorrupted) + Case 13 + InfectApplication(Graphic_Picker, ShiftOSDesktop.GraphicPickerCorrupted) + Case 14 + InfectApplication(Icon_Manager, ShiftOSDesktop.IconManagerCorrupted) + Case 15 + InfectApplication(Installer, ShiftOSDesktop.InstallerCorrupted) + Case 16 + InfectApplication(Knowledge_Input, ShiftOSDesktop.KnowledgeInputCorrupted) + Case 17 + InfectApplication(Labyrinth, ShiftOSDesktop.LabyrinthCorrupted) + Case 18 + InfectApplication(Name_Changer, ShiftOSDesktop.NameChangerCorrupted) + Case 19 + InfectApplication(OrcWrite, ShiftOSDesktop.OrcWriteCorrupted) + Case 20 + InfectApplication(Pong, ShiftOSDesktop.PongCorrupted) + Case 21 + InfectApplication(Shifter, ShiftOSDesktop.ShifterCorrupted) + Case 22 + InfectApplication(Shiftnet, ShiftOSDesktop.ShiftNetCorrupted) + Case 23 + InfectApplication(Shiftorium, ShiftOSDesktop.ShiftoriumCorrupted) + Case 24 + InfectApplication(Skin_Loader, ShiftOSDesktop.SkinLoaderCorrupted) + Case 25 + InfectApplication(Skinshifter, ShiftOSDesktop.SkinShifterCorrupted) + Case 26 + InfectApplication(systeminfo, ShiftOSDesktop.SystemInfoCorrupted) + Case 27 + InfectApplication(Terminal, ShiftOSDesktop.TerminalCorrupted) + Case 28 + InfectApplication(TextPad, ShiftOSDesktop.TextpadCorrupted) + Case 29 + InfectApplication(Video_Player, ShiftOSDesktop.VideoPlayerCorrupted) + Case 30 + InfectApplication(VirusScanner, ShiftOSDesktop.VirusScannerCorrupted) + Case 31 + InfectApplication(Web_Browser, ShiftOSDesktop.WebBrowserCorrupted) + 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..9d7bfda --- /dev/null +++ b/ShiftOS/Web Browser.Designer.vb @@ -0,0 +1,540 @@ +<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.webwindowt4 = New System.Windows.Forms.WebBrowser() + Me.webwindowt1 = New System.Windows.Forms.WebBrowser() + Me.webwindowt2 = New System.Windows.Forms.WebBrowser() + Me.webwindowt3 = New System.Windows.Forms.WebBrowser() + 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.pnltab4 = New System.Windows.Forms.Panel() + Me.lbltab4 = New System.Windows.Forms.Label() + Me.pnltab3 = New System.Windows.Forms.Panel() + Me.lbltab3 = New System.Windows.Forms.Label() + Me.pnltab2 = New System.Windows.Forms.Panel() + Me.lbltab2 = New System.Windows.Forms.Label() + Me.pnltab1 = New System.Windows.Forms.Panel() + Me.lbltab1 = 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.siteloadprogress = New ShiftOS.ProgressBarEX() + Me.pgright.SuspendLayout() + Me.pgcontents.SuspendLayout() + Me.pnlwebtabholder.SuspendLayout() + Me.Panel1.SuspendLayout() + Me.pnloptions.SuspendLayout() + Me.pnltab4.SuspendLayout() + Me.pnltab3.SuspendLayout() + Me.pnltab2.SuspendLayout() + Me.pnltab1.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.webwindowt4) + Me.pnlwebtabholder.Controls.Add(Me.webwindowt1) + Me.pnlwebtabholder.Controls.Add(Me.webwindowt2) + Me.pnlwebtabholder.Controls.Add(Me.webwindowt3) + 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 + ' + 'webwindowt4 + ' + Me.webwindowt4.Location = New System.Drawing.Point(88, 69) + Me.webwindowt4.MinimumSize = New System.Drawing.Size(20, 20) + Me.webwindowt4.Name = "webwindowt4" + Me.webwindowt4.ScriptErrorsSuppressed = True + Me.webwindowt4.Size = New System.Drawing.Size(62, 48) + Me.webwindowt4.TabIndex = 4 + ' + 'webwindowt1 + ' + Me.webwindowt1.Location = New System.Drawing.Point(261, 69) + Me.webwindowt1.MinimumSize = New System.Drawing.Size(20, 20) + Me.webwindowt1.Name = "webwindowt1" + Me.webwindowt1.ScriptErrorsSuppressed = True + Me.webwindowt1.Size = New System.Drawing.Size(60, 66) + Me.webwindowt1.TabIndex = 1 + ' + 'webwindowt2 + ' + Me.webwindowt2.Location = New System.Drawing.Point(287, 203) + Me.webwindowt2.MinimumSize = New System.Drawing.Size(20, 20) + Me.webwindowt2.Name = "webwindowt2" + Me.webwindowt2.ScriptErrorsSuppressed = True + Me.webwindowt2.Size = New System.Drawing.Size(102, 50) + Me.webwindowt2.TabIndex = 2 + ' + 'webwindowt3 + ' + Me.webwindowt3.Location = New System.Drawing.Point(364, 59) + Me.webwindowt3.MinimumSize = New System.Drawing.Size(20, 20) + Me.webwindowt3.Name = "webwindowt3" + Me.webwindowt3.ScriptErrorsSuppressed = True + Me.webwindowt3.Size = New System.Drawing.Size(111, 58) + Me.webwindowt3.TabIndex = 3 + ' + '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.siteloadprogress) + Me.pnloptions.Controls.Add(Me.pnltab4) + Me.pnloptions.Controls.Add(Me.pnltab3) + Me.pnloptions.Controls.Add(Me.pnltab2) + Me.pnloptions.Controls.Add(Me.pnltab1) + 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 + ' + 'pnltab4 + ' + Me.pnltab4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.pnltab4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnltab4.Controls.Add(Me.lbltab4) + Me.pnltab4.Location = New System.Drawing.Point(513, 15) + Me.pnltab4.Name = "pnltab4" + Me.pnltab4.Size = New System.Drawing.Size(170, 26) + Me.pnltab4.TabIndex = 19 + ' + 'lbltab4 + ' + Me.lbltab4.AutoSize = True + Me.lbltab4.BackColor = System.Drawing.Color.Transparent + Me.lbltab4.Location = New System.Drawing.Point(5, 7) + Me.lbltab4.Name = "lbltab4" + Me.lbltab4.Size = New System.Drawing.Size(56, 13) + Me.lbltab4.TabIndex = 1 + Me.lbltab4.Text = "Blank Tab" + ' + 'pnltab3 + ' + Me.pnltab3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.pnltab3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnltab3.Controls.Add(Me.lbltab3) + Me.pnltab3.Location = New System.Drawing.Point(344, 15) + Me.pnltab3.Name = "pnltab3" + Me.pnltab3.Size = New System.Drawing.Size(170, 26) + Me.pnltab3.TabIndex = 18 + ' + 'lbltab3 + ' + Me.lbltab3.AutoSize = True + Me.lbltab3.BackColor = System.Drawing.Color.Transparent + Me.lbltab3.Location = New System.Drawing.Point(4, 7) + Me.lbltab3.Name = "lbltab3" + Me.lbltab3.Size = New System.Drawing.Size(56, 13) + Me.lbltab3.TabIndex = 1 + Me.lbltab3.Text = "Blank Tab" + ' + 'pnltab2 + ' + Me.pnltab2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.pnltab2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnltab2.Controls.Add(Me.lbltab2) + Me.pnltab2.Location = New System.Drawing.Point(175, 15) + Me.pnltab2.Name = "pnltab2" + Me.pnltab2.Size = New System.Drawing.Size(170, 26) + Me.pnltab2.TabIndex = 17 + ' + 'lbltab2 + ' + Me.lbltab2.AutoSize = True + Me.lbltab2.BackColor = System.Drawing.Color.Transparent + Me.lbltab2.Location = New System.Drawing.Point(3, 7) + Me.lbltab2.Name = "lbltab2" + Me.lbltab2.Size = New System.Drawing.Size(56, 13) + Me.lbltab2.TabIndex = 1 + Me.lbltab2.Text = "Blank Tab" + ' + 'pnltab1 + ' + Me.pnltab1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) + Me.pnltab1.BackColor = System.Drawing.SystemColors.ControlLight + Me.pnltab1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnltab1.Controls.Add(Me.lbltab1) + Me.pnltab1.Location = New System.Drawing.Point(6, 15) + Me.pnltab1.Name = "pnltab1" + Me.pnltab1.Size = New System.Drawing.Size(170, 26) + Me.pnltab1.TabIndex = 16 + ' + 'lbltab1 + ' + Me.lbltab1.AutoSize = True + Me.lbltab1.BackColor = System.Drawing.Color.Transparent + Me.lbltab1.Location = New System.Drawing.Point(3, 7) + Me.lbltab1.Name = "lbltab1" + Me.lbltab1.Size = New System.Drawing.Size(56, 13) + Me.lbltab1.TabIndex = 0 + Me.lbltab1.Text = "Blank Tab" + ' + '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 + ' + '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 + ' + '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.pnltab4.ResumeLayout(False) + Me.pnltab4.PerformLayout() + Me.pnltab3.ResumeLayout(False) + Me.pnltab3.PerformLayout() + Me.pnltab2.ResumeLayout(False) + Me.pnltab2.PerformLayout() + Me.pnltab1.ResumeLayout(False) + Me.pnltab1.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 webwindowt1 As System.Windows.Forms.WebBrowser + 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 webwindowt2 As System.Windows.Forms.WebBrowser + Friend WithEvents webwindowt4 As System.Windows.Forms.WebBrowser + Friend WithEvents webwindowt3 As System.Windows.Forms.WebBrowser + Friend WithEvents pnloptions As System.Windows.Forms.Panel + Friend WithEvents pnltab4 As System.Windows.Forms.Panel + Friend WithEvents lbltab4 As System.Windows.Forms.Label + Friend WithEvents pnltab3 As System.Windows.Forms.Panel + Friend WithEvents lbltab3 As System.Windows.Forms.Label + Friend WithEvents pnltab2 As System.Windows.Forms.Panel + Friend WithEvents lbltab2 As System.Windows.Forms.Label + Friend WithEvents pnltab1 As System.Windows.Forms.Panel + Friend WithEvents lbltab1 As System.Windows.Forms.Label + Friend WithEvents pnlwebtabholder As System.Windows.Forms.Panel + Friend WithEvents siteloadprogress As ShiftOS.ProgressBarEX +End Class diff --git a/ShiftOS/Web Browser.resx b/ShiftOS/Web Browser.resx new file mode 100644 index 0000000..b8db819 --- /dev/null +++ b/ShiftOS/Web Browser.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/Web Browser.vb b/ShiftOS/Web Browser.vb new file mode 100644 index 0000000..7f1eea8 --- /dev/null +++ b/ShiftOS/Web Browser.vb @@ -0,0 +1,657 @@ +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 + + gohome() + webwindowt1.BringToFront() + webwindowt1.Dock = DockStyle.Fill + updatetabsizes() + 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() + updatetabsizes() + 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() + updatetabsizes() + 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() + updatetabsizes() + 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 currenttab As Integer = 1 + Dim oldlocationtxt As String + + Private Sub txtlocation_KeyDown(sender As Object, e As KeyEventArgs) Handles txtlocation.KeyDown + If e.KeyCode = Keys.Enter Then + Select Case currenttab + Case 1 + If txtlocation.Text.Contains(".") Then webwindowt1.Navigate(txtlocation.Text) Else webwindowt1.Navigate("http://www.google.com/search?q=" & txtlocation.Text) + Case 2 + If txtlocation.Text.Contains(".") Then webwindowt2.Navigate(txtlocation.Text) Else webwindowt2.Navigate("http://www.google.com/search?q=" & txtlocation.Text) + Case 3 + If txtlocation.Text.Contains(".") Then webwindowt3.Navigate(txtlocation.Text) Else webwindowt3.Navigate("http://www.google.com/search?q=" & txtlocation.Text) + Case 4 + If txtlocation.Text.Contains(".") Then webwindowt4.Navigate(txtlocation.Text) Else webwindowt4.Navigate("http://www.google.com/search?q=" & txtlocation.Text) + End Select + End If + End Sub + + Private Sub webwindowt1_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles webwindowt1.Navigated + updatetitles() + txtlocation.Text = webwindowt1.Url.ToString + End Sub + Private Sub webwindowt2_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles webwindowt2.Navigated + updatetitles() + txtlocation.Text = webwindowt1.Url.ToString + End Sub + Private Sub webwindowt3_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles webwindowt3.Navigated + updatetitles() + txtlocation.Text = webwindowt1.Url.ToString + End Sub + Private Sub webwindowt4_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles webwindowt4.Navigated + updatetitles() + txtlocation.Text = webwindowt1.Url.ToString + End Sub + + Private Sub updatetitles() + Select Case currenttab + Case 1 + If Not webwindowt1.DocumentTitle = "" Then lbltab1.Text = webwindowt1.DocumentTitle + If webwindowt1.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindowt1.DocumentTitle + centretitletext() + pnltab1.BackColor = Color.FromName("ControlLight") + pnltab2.BackColor = Color.White + pnltab3.BackColor = Color.White + pnltab4.BackColor = Color.White + Case 2 + If Not webwindowt2.DocumentTitle = "" Then lbltab2.Text = webwindowt2.DocumentTitle + If webwindowt2.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindowt2.DocumentTitle + centretitletext() + pnltab2.BackColor = Color.FromName("ControlLight") + pnltab1.BackColor = Color.White + pnltab3.BackColor = Color.White + pnltab4.BackColor = Color.White + Case 3 + If Not webwindowt3.DocumentTitle = "" Then lbltab3.Text = webwindowt3.DocumentTitle + If webwindowt3.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindowt3.DocumentTitle + centretitletext() + pnltab3.BackColor = Color.FromName("ControlLight") + pnltab2.BackColor = Color.White + pnltab1.BackColor = Color.White + pnltab4.BackColor = Color.White + Case 4 + If Not webwindowt4.DocumentTitle = "" Then lbltab4.Text = webwindowt4.DocumentTitle + If webwindowt4.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindowt4.DocumentTitle + centretitletext() + pnltab4.BackColor = Color.FromName("ControlLight") + pnltab2.BackColor = Color.White + pnltab3.BackColor = Color.White + pnltab1.BackColor = Color.White + End Select + End Sub + + Private Sub centretitletext() + If ShiftOSDesktop.boughttitletext = False Then + lbtitletext.Hide() + Else + lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) + lbtitletext.Show() + End If + + If ShiftOSDesktop.boughtwindowborders = True Then + closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) + rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) + minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) + Select Case ShiftOSDesktop.titletextposition + Case "Left" + lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + End Select + lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + Else + closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) + rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) + minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) + Select Case ShiftOSDesktop.titletextposition + Case "Left" + lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + Case "Centre" + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + End Select + lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + End If + End Sub + + Private Sub btnback_Click(sender As Object, e As EventArgs) Handles btnback.Click + Select Case currenttab + Case 1 + If webwindowt1.CanGoBack = True Then webwindowt1.GoBack() + Case 2 + If webwindowt2.CanGoBack = True Then webwindowt2.GoBack() + Case 3 + If webwindowt3.CanGoBack = True Then webwindowt3.GoBack() + Case 4 + If webwindowt4.CanGoBack = True Then webwindowt4.GoBack() + End Select + End Sub + + Private Sub btnforward_Click(sender As Object, e As EventArgs) Handles btnforward.Click + Select Case currenttab + Case 1 + If webwindowt1.CanGoForward = True Then webwindowt1.GoForward() + Case 2 + If webwindowt2.CanGoForward = True Then webwindowt2.GoForward() + Case 3 + If webwindowt3.CanGoForward = True Then webwindowt3.GoForward() + Case 4 + If webwindowt4.CanGoForward = True Then webwindowt4.GoForward() + End Select + End Sub + + Private Sub gohome() + Select Case currenttab + Case 1 + webwindowt1.Navigate(ShiftOSDesktop.webbrowserhomepage) + centretitletext() + Case 2 + webwindowt2.Navigate(ShiftOSDesktop.webbrowserhomepage) + centretitletext() + Case 3 + webwindowt3.Navigate(ShiftOSDesktop.webbrowserhomepage) + centretitletext() + Case 4 + webwindowt4.Navigate(ShiftOSDesktop.webbrowserhomepage) + centretitletext() + End Select + + End Sub + + Private Sub btnhome_Click(sender As Object, e As EventArgs) Handles btnhome.Click + gohome() + End Sub + + Private Sub txtlocation_MouseClick(sender As Object, e As MouseEventArgs) Handles txtlocation.MouseClick + txtlocation.SelectAll() + End Sub + + Private Sub txtlocation_mouseenter(sender As Object, e As EventArgs) Handles txtlocation.GotFocus + oldlocationtxt = txtlocation.Text + txtlocation.Text = "" + End Sub + Private Sub txtlocation_mouseleave(sender As Object, e As EventArgs) Handles txtlocation.LostFocus + If txtlocation.Text = "" Then txtlocation.Text = oldlocationtxt + End Sub + + 'switching tabs + Private Sub pnltab1_Click(sender As Object, e As EventArgs) Handles pnltab1.Click + currenttab = 1 + webwindowt1.Dock = DockStyle.Fill + webwindowt1.BringToFront() + updatetitles() + txtlocation.Text = "Search or Enter an address" + If webwindowt1.DocumentTitle = "" Then lbtitletext.Text = "Web Browser" Else lbtitletext.Text = "Web Browser - " & webwindowt1.DocumentTitle + End Sub + + Private Sub pnltab2_Click(sender As Object, e As EventArgs) Handles pnltab2.Click + currenttab = 2 + webwindowt2.Dock = DockStyle.Fill + webwindowt2.BringToFront() + updatetitles() + txtlocation.Text = "Search or Enter an address" + If webwindowt2.DocumentTitle = "" Then lbtitletext.Text = "Web Browser" Else lbtitletext.Text = "Web Browser - " & webwindowt2.DocumentTitle + End Sub + + Private Sub pnltab3_Click(sender As Object, e As EventArgs) Handles pnltab3.Click + currenttab = 3 + webwindowt3.Dock = DockStyle.Fill + webwindowt3.BringToFront() + updatetitles() + txtlocation.Text = "Search or Enter an address" + If webwindowt3.DocumentTitle = "" Then lbtitletext.Text = "Web Browser" Else lbtitletext.Text = "Web Browser - " & webwindowt3.DocumentTitle + End Sub + + Private Sub pnltab4_Click(sender As Object, e As EventArgs) Handles pnltab4.Click + currenttab = 4 + webwindowt4.Dock = DockStyle.Fill + webwindowt4.BringToFront() + updatetitles() + txtlocation.Text = "Search or Enter an address" + If webwindowt4.DocumentTitle = "" Then lbtitletext.Text = "Web Browser" Else lbtitletext.Text = "Web Browser - " & webwindowt4.DocumentTitle + End Sub + + Private Sub webloading(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles webwindowt1.ProgressChanged, webwindowt2.ProgressChanged, webwindowt3.ProgressChanged, webwindowt4.ProgressChanged + Try + If e.MaximumProgress > 0L AndAlso e.CurrentProgress > 0L Then + siteloadprogress.Value = CInt(Math.Round((100 * e.CurrentProgress / e.MaximumProgress))) + ElseIf e.MaximumProgress = 0L AndAlso e.CurrentProgress = 0L Then + siteloadprogress.Value = 0 + End If + Catch ex As Exception + siteloadprogress.Value = 0 + End Try + End Sub + + Private Sub updatetabsizes() + Dim totalsize As Integer = Me.Width - pgleft.Width - pgright.Width - 10 + pnltab1.Size = New Size(totalsize / 4, pnltab1.Height) + pnltab2.Size = New Size(totalsize / 4, pnltab2.Height) + pnltab3.Size = New Size(totalsize / 4, pnltab3.Height) + pnltab4.Size = New Size(totalsize / 4, pnltab4.Height) + pnltab2.Location = New Point(pgleft.Width + 5 + pnltab1.Width, pnltab2.Location.Y) + pnltab3.Location = New Point(pgleft.Width + 5 + pnltab1.Width + pnltab2.Width, pnltab3.Location.Y) + pnltab4.Location = New Point(pgleft.Width + 5 + pnltab1.Width + pnltab2.Width + pnltab3.Width, pnltab4.Location.Y) + End Sub +End Class
\ No newline at end of file diff --git a/Window.vb b/ShiftOS/Window.vb index 094f6a1..641034f 100644 --- a/Window.vb +++ b/ShiftOS/Window.vb @@ -801,12 +801,16 @@ 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) - SetWindowLong(Me.hwnd, GWL.STYLE, value) + Try + SetWindowLong(Me.hwnd, GWL.STYLE, value) + Catch ex As Exception + End Try End Set End Property diff --git a/app.manifest b/ShiftOS/app.manifest index 0ed877a..0ed877a 100644 --- a/app.manifest +++ b/ShiftOS/app.manifest 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/Shiftnet.resx b/ShiftOS/coherencemodeform.resx index 00a1318..3ef34f5 100644 --- a/Shiftnet.resx +++ b/ShiftOS/coherencemodeform.resx @@ -117,16 +117,16 @@ <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> + <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>308, 17</value> + <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="tmrloadsite.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> + <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/defaultdropdownmenu.vb b/ShiftOS/defaultdropdownmenu.vb index f217104..f217104 100644 --- a/defaultdropdownmenu.vb +++ b/ShiftOS/defaultdropdownmenu.vb diff --git a/infobox.Designer.vb b/ShiftOS/infobox.Designer.vb index e4f3dc9..ec0da96 100644 --- a/infobox.Designer.vb +++ b/ShiftOS/infobox.Designer.vb @@ -23,14 +23,14 @@ Partial Class infobox <System.Diagnostics.DebuggerStepThrough()> _ Private Sub InitializeComponent() Me.pgcontents = New System.Windows.Forms.Panel() - Me.pnlyesno = New System.Windows.Forms.Panel() - Me.btnno = New System.Windows.Forms.Button() - Me.btnyes = New System.Windows.Forms.Button() - Me.lblintructtext = New System.Windows.Forms.Label() 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() @@ -45,8 +45,8 @@ Partial Class infobox Me.pgtoprcorner = New System.Windows.Forms.Panel() Me.pgbottom = New System.Windows.Forms.Panel() Me.pgcontents.SuspendLayout() - Me.pnlyesno.SuspendLayout() CType(Me.pboximage, System.ComponentModel.ISupportInitialize).BeginInit() + Me.pnlyesno.SuspendLayout() Me.pgleft.SuspendLayout() Me.pgright.SuspendLayout() Me.titlebar.SuspendLayout() @@ -57,66 +57,20 @@ Partial Class infobox ' Me.pgcontents.BackColor = System.Drawing.Color.White Me.pgcontents.Controls.Add(Me.pnlyesno) - Me.pgcontents.Controls.Add(Me.lblintructtext) 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 ' - 'pnlyesno - ' - 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("Lucida Bright", 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("Lucida Bright", 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 - ' - 'lblintructtext - ' - Me.lblintructtext.Font = New System.Drawing.Font("Lucida Sans", 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 - ' '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) @@ -129,8 +83,10 @@ Partial Class infobox ' '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("Lucida Bright", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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" @@ -142,7 +98,9 @@ Partial Class infobox ' 'txtmessage ' - Me.txtmessage.Font = New System.Drawing.Font("Lucida Sans", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + 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) @@ -161,6 +119,57 @@ Partial Class infobox 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 @@ -256,10 +265,10 @@ Partial Class infobox ' 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.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(48, 18) + Me.lbtitletext.Size = New System.Drawing.Size(36, 18) Me.lbtitletext.TabIndex = 19 Me.lbtitletext.Text = "Info" ' @@ -308,8 +317,8 @@ Partial Class infobox Me.TopMost = True Me.pgcontents.ResumeLayout(False) Me.pgcontents.PerformLayout() - Me.pnlyesno.ResumeLayout(False) CType(Me.pboximage, System.ComponentModel.ISupportInitialize).EndInit() + Me.pnlyesno.ResumeLayout(False) Me.pgleft.ResumeLayout(False) Me.pgright.ResumeLayout(False) Me.titlebar.ResumeLayout(False) 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..20a73aa --- /dev/null +++ b/ShiftOS/infobox.vb @@ -0,0 +1,592 @@ +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 + 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/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..162bdfc --- /dev/null +++ b/ShiftOS/skins.vb @@ -0,0 +1,688 @@ +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 + + 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(savepath + "Shiftum42\Skins\Loaded\") 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(savepath + "Shiftum42\Skins\Loaded\titlebar") Then + titlebar = GetImage(savepath + "Shiftum42\Skins\Loaded\titlebar") + Else : titlebar = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\borderleft") Then + borderleft = GetImage(savepath + "Shiftum42\Skins\Loaded\borderleft") + Else : borderleft = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\borderright") Then + borderright = GetImage(savepath + "Shiftum42\Skins\Loaded\borderright".Clone) + Else : borderright = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\borderbottom") Then + borderbottom = GetImage(savepath + "Shiftum42\Skins\Loaded\borderbottom".Clone) + Else : borderbottom = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\closebtn") Then + closebtn = GetImage(savepath + "Shiftum42\Skins\Loaded\closebtn".Clone) + Else : closebtn = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\closebtnhover") Then + closebtnhover = GetImage(savepath + "Shiftum42\Skins\Loaded\closebtnhover".Clone) + Else : closebtnhover = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\closebtnclick") Then + closebtnclick = GetImage(savepath + "Shiftum42\Skins\Loaded\closebtnclick".Clone) + Else : closebtnclick = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\rollbtn") Then + rollbtn = GetImage(savepath + "Shiftum42\Skins\Loaded\rollbtn".Clone) + Else : rollbtn = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\rollbtnhover") Then + rollbtnhover = GetImage(savepath + "Shiftum42\Skins\Loaded\rollbtnhover".Clone) + Else : rollbtnhover = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\rollbtnclick") Then + rollbtnclick = GetImage(savepath + "Shiftum42\Skins\Loaded\rollbtnclick".Clone) + Else : rollbtnclick = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\minbtn") Then + minbtn = GetImage(savepath + "Shiftum42\Skins\Loaded\minbtn".Clone) + Else : minbtn = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\minbtnhover") Then + minbtnhover = GetImage(savepath + "Shiftum42\Skins\Loaded\minbtnhover".Clone) + Else : minbtnhover = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\minbtnclick") Then + minbtnclick = GetImage(savepath + "Shiftum42\Skins\Loaded\minbtnclick".Clone) + Else : minbtnclick = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\rightcorner") Then + rightcorner = GetImage(savepath + "Shiftum42\Skins\Loaded\rightcorner".Clone) + Else : rightcorner = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\leftcorner") Then + leftcorner = GetImage(savepath + "Shiftum42\Skins\Loaded\leftcorner".Clone) + Else : leftcorner = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\desktoppanel") Then + desktoppanel = GetImage(savepath + "Shiftum42\Skins\Loaded\desktoppanel".Clone) + Else : desktoppanel = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\desktopbackground") Then + desktopbackground = GetImage(savepath + "Shiftum42\Skins\Loaded\desktopbackground".Clone) + Else : desktopbackground = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\panelbutton") Then + panelbutton = GetImage(savepath + "Shiftum42\Skins\Loaded\panelbutton".Clone) + Else : panelbutton = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\applaunchermouseover") Then + applaunchermouseover = GetImage(savepath + "Shiftum42\Skins\Loaded\applaunchermouseover".Clone) + Else : applaunchermouseover = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\applauncher") Then + applauncher = GetImage(savepath + "Shiftum42\Skins\Loaded\applauncher".Clone) + Else : applauncher = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\applauncherclick") Then + applauncherclick = GetImage(savepath + "Shiftum42\Skins\Loaded\applauncherclick".Clone) + Else : applauncherclick = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\panelclock") Then + panelclock = GetImage(savepath + "Shiftum42\Skins\Loaded\panelclock".Clone) + Else : panelclock = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\bottomleftcorner") Then + bottomleftcorner = GetImage(savepath + "Shiftum42\Skins\Loaded\bottomleftcorner".Clone) + Else : bottomleftcorner = Nothing + End If + If File.Exists(savepath + "Shiftum42\Skins\Loaded\bottomrightcorner") Then + bottomrightcorner = GetImage(savepath + "Shiftum42\Skins\Loaded\bottomrightcorner".Clone) + Else : bottomrightcorner = Nothing + End If + 'load settings + Dim loaddata(200) As String + If File.Exists(savepath + "Shiftum42\Skins\Loaded\data.dat") Then + Dim sr As StreamReader = New StreamReader(savepath + "Shiftum42\Skins\Loaded\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 dostuff() + 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(savepath + "Shiftum42\Skins\Loaded\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(savepath + "Shiftum42\Skins\Loaded", path) + File.Delete(savepath + "Shiftum42\Skins\Loaded\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(savepath + "Shiftum42\Skins\Loaded\") Then + Directory.Delete(savepath + "Shiftum42\Skins\Loaded\") + End If + Directory.CreateDirectory(savepath + "Shiftum42\Skins\Loaded\") + 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") + '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 + + ' 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(savepath + "Shiftum42\Skins\Loaded\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 + End Sub + Private Sub saveimage(ByVal img As Image, ByVal name As String) + If Not IsNothing(img) Then + If File.Exists(savepath + "Shiftum42\Skins\Loaded\" & name) Then File.Delete(savepath + "Shiftum42\Skins\Loaded\" & name) + Try + img.Save(savepath + "Shiftum42\Skins\Loaded\" & name, System.Drawing.Imaging.ImageFormat.Png) + Catch ex As Exception + infobox.showinfo("Saving Error", "Opps, an error occured when saving the file " & savepath + "Shiftum42\Skins\Loaded\" & name & ". Please contact DevX to report the problem.") + End Try + Else + If File.Exists(savepath + "Shiftum42\Skins\Loaded\" & name) Then File.Delete(savepath + "Shiftum42\Skins\Loaded\" & name) + End If + End Sub +End Module
\ No newline at end of file diff --git a/template.Designer.vb b/ShiftOS/template.Designer.vb index da477d0..da477d0 100644 --- a/template.Designer.vb +++ b/ShiftOS/template.Designer.vb 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/Bitnote Digger.vb b/ShiftOS/template.vb index 7ca1e8f..e5dfe18 100644 --- a/Bitnote Digger.vb +++ b/ShiftOS/template.vb @@ -1,4 +1,5 @@ -Public Class Bitnote_Digger +Public Class template +#Region "Template Code" Public rolldownsize As Integer Public oldbordersize As Integer Public oldtitlebarheight As Integer @@ -7,24 +8,24 @@ Public minimumsizewidth As Integer = 0 'replace with minimum size Public minimumsizeheight As Integer = 0 'replace with minimum size - Public bitnotesmined As Decimal = 0 - Public miningspeed As Decimal = 0.00001 - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() + setupall() - ShiftOSDesktop.pnlpanelbuttonbitnotedigger.SendToBack() 'modfiy to proper name + ShiftOSDesktop.pnlpanelbuttondodge.SendToBack() 'CHANGE NAME ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonbitnotedigger, ShiftOSDesktop.tbbitnotediggericon, ShiftOSDesktop.tbbitnotediggertext, True) 'modify to proper name + 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 @@ -89,27 +90,19 @@ End Sub Private Sub closebutton_MouseEnter(sender As Object, e As EventArgs) Handles closebutton.MouseEnter, closebutton.MouseUp - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(1) + closebutton.BackgroundImage = Skins.closebtnhover End Sub Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) + closebutton.BackgroundImage = Skins.closebtn End Sub Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) + closebutton.BackgroundImage = Skins.closebtnclick End Sub Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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) + ShiftOSDesktop.minimizeprogram(Me, False) End Sub Private Sub rollupbutton_Click(sender As Object, e As EventArgs) Handles rollupbutton.Click @@ -117,52 +110,49 @@ End Sub Private Sub rollupbutton_MouseEnter(sender As Object, e As EventArgs) Handles rollupbutton.MouseEnter, rollupbutton.MouseUp - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(1) + rollupbutton.BackgroundImage = Skins.rollbtnhover End Sub Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) + rollupbutton.BackgroundImage = Skins.rollbtn End Sub Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) + 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.titlebarheight + pgleft.Width = Skins.borderwidth + pgright.Width = Skins.borderwidth + pgbottom.Height = Skins.borderwidth + titlebar.Height = Skins.titlebarheight If justopened = True Then - Me.Size = New Size(552, 253) 'put the default size of your window here - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight + 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, Me.Height - oldtitlebarheight + 30) - Me.Size = New Size(Me.Width - oldbordersize - oldbordersize, Me.Height - oldbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) + 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() - Me.Show() End If End If - If ShiftOSDesktop.showwindowcorners = True Then + If Skins.enablecorners = True Then pgtoplcorner.Show() pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.titlebarcornerwidth + pgtoprcorner.Width = Skins.titlebarcornerwidth + pgtoplcorner.Width = Skins.titlebarcornerwidth Else pgtoplcorner.Hide() pgtoprcorner.Hide() @@ -176,68 +166,65 @@ If ShiftOSDesktop.boughttitletext = False Then lbtitletext.Hide() Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.bitnotediggername 'Remember to change to name of program!!!! - If tmrcalcbitnotesmined.Enabled = True Then lbtitletext.Text = lbtitletext.Text & " - Activated" Else lbtitletext.Text = lbtitletext.Text & " - Deactivated" + 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth + closebutton.BackColor = Skins.closebtncolour + closebutton.Size = Skins.closebtnsize closebutton.Show() End If If ShiftOSDesktop.boughtrollupbutton = False Then rollupbutton.Hide() Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth + rollupbutton.BackColor = Skins.rollbtncolour + rollupbutton.Size = Skins.rollbtnsize rollupbutton.Show() End If If ShiftOSDesktop.boughtminimizebutton = False Then minimizebutton.Hide() Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth + minimizebutton.BackColor = Skins.minbtncolour + minimizebutton.Size = Skins.minbtnsize minimizebutton.Show() End If If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If - If ShiftOSDesktop.boughtknowledgeinputicon = True Then + '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.Location = New Point(Skins.titleiconfromside, Skins.titleiconfromtop) pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) - pnlicon.Image = ShiftOSDesktop.bitnotediggericontitlebar 'Replace with the correct icon for the program. + pnlicon.Image = ShiftOSDesktop.dodgeicontitlebar 'Replace with the correct icon for the program. End If End Sub @@ -261,46 +248,53 @@ Public Sub resettitlebar() If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition + 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(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point(Skins.titletextfromside + pgtoplcorner.Width, Skins.titletextfromtop) Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) + lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, Skins.titletextfromtop) End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour + lbtitletext.ForeColor = Skins.titletextcolour End If End Sub - Private Sub pullside_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) + 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) + 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) + 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 @@ -325,61 +319,90 @@ End If End Sub - Public Sub setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 + 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 Clock_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen - 1 - Me.Hide() - ShiftOSDesktop.setuppanelbuttons() + 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 - 'end of general setup - - Private Sub tmrcalcbitnotesmined_Tick(sender As Object, e As EventArgs) Handles tmrcalcbitnotesmined.Tick - bitnotesmined = bitnotesmined + miningspeed - lbltotalbitcoinsmined.Text = FormatNumber(Math.Round(bitnotesmined, 5), 5) + 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 btnstart_Click(sender As Object, e As EventArgs) Handles btnstart.Click - tmrcalcbitnotesmined.Start() - lbtitletext.Text = ShiftOSDesktop.bitnotediggername & " - Activated" + 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 btnstop_Click(sender As Object, e As EventArgs) Handles btnstop.Click - tmrcalcbitnotesmined.Stop() - lbtitletext.Text = ShiftOSDesktop.bitnotediggername & " - Deactivated" + 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 - 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") + 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 - bitnotesmined = 0 - lbltotalbitcoinsmined.Text = FormatNumber(Math.Round(bitnotesmined, 5), 5) - If Bitnote_Wallet.Visible Then Bitnote_Wallet.setupbitnotestats() + + '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 Class
\ No newline at end of file + + 'end of general setup +#End Region +End Class diff --git a/undo.vb b/ShiftOS/undo.vb index ed3a483..ed3a483 100644 --- a/undo.vb +++ b/ShiftOS/undo.vb diff --git a/Shiftnet.Designer.vb b/Shiftnet.Designer.vb deleted file mode 100644 index 5aa7a42..0000000 --- a/Shiftnet.Designer.vb +++ /dev/null @@ -1,1102 +0,0 @@ -<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() - 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.pnlmainsiteappscape = New System.Windows.Forms.Panel() - 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.Label7 = New System.Windows.Forms.Label() - Me.Panel36 = New System.Windows.Forms.Panel() - Me.Label8 = 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.Label5 = New System.Windows.Forms.Label() - Me.Panel26 = 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.Label3 = New System.Windows.Forms.Label() - Me.Panel16 = New System.Windows.Forms.Panel() - Me.Label4 = 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.Panel33 = New System.Windows.Forms.Panel() - Me.Label2 = 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.btnbuymoresoftware1 = 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.Panel23 = New System.Windows.Forms.Panel() - Me.Panel1 = New System.Windows.Forms.Panel() - Me.btnhome = New System.Windows.Forms.Button() - Me.txtlocation = New System.Windows.Forms.TextBox() - Me.Panel2 = 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.tmrloadsite = New System.Windows.Forms.Timer(Me.components) - Me.pgright.SuspendLayout() - Me.pgcontents.SuspendLayout() - Me.pnlmainsiteappscape.SuspendLayout() - Me.appscapecalculatorinfopage.SuspendLayout() - Me.Panel28.SuspendLayout() - Me.Panel35.SuspendLayout() - Me.appscapewebbrowserinfopage.SuspendLayout() - Me.Panel19.SuspendLayout() - Me.Panel25.SuspendLayout() - Me.appscapevideoplayerinfopage.SuspendLayout() - Me.Panel9.SuspendLayout() - Me.Panel15.SuspendLayout() - Me.appscapeaudioplayerinfopage.SuspendLayout() - Me.Panel6.SuspendLayout() - Me.Panel32.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.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("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(84, 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.Controls.Add(Me.pnlmainsiteappscape) - 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 - ' - 'pnlmainsiteappscape - ' - Me.pnlmainsiteappscape.BackColor = System.Drawing.Color.White - Me.pnlmainsiteappscape.Controls.Add(Me.appscapecalculatorinfopage) - Me.pnlmainsiteappscape.Controls.Add(Me.appscapewebbrowserinfopage) - Me.pnlmainsiteappscape.Controls.Add(Me.appscapevideoplayerinfopage) - Me.pnlmainsiteappscape.Controls.Add(Me.appscapeaudioplayerinfopage) - Me.pnlmainsiteappscape.Controls.Add(Me.appscapehomepage) - 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 - ' - '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(507, 414) - Me.appscapecalculatorinfopage.Name = "appscapecalculatorinfopage" - Me.appscapecalculatorinfopage.Size = New System.Drawing.Size(149, 91) - 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(-101, 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(-310, 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.Label7) - Me.Panel35.Controls.Add(Me.Panel36) - Me.Panel35.Location = New System.Drawing.Point(-310, 5) - Me.Panel35.Name = "Panel35" - Me.Panel35.Size = New System.Drawing.Size(770, 88) - Me.Panel35.TabIndex = 0 - ' - 'Label7 - ' - Me.Label7.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Label7.BackColor = System.Drawing.Color.Transparent - Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label7.Location = New System.Drawing.Point(335, 5) - Me.Label7.Name = "Label7" - Me.Label7.Size = New System.Drawing.Size(432, 23) - Me.Label7.TabIndex = 6 - Me.Label7.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" - Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight - ' - 'Panel36 - ' - Me.Panel36.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Panel36.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton - Me.Panel36.Location = New System.Drawing.Point(678, 33) - Me.Panel36.Name = "Panel36" - Me.Panel36.Size = New System.Drawing.Size(82, 47) - Me.Panel36.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(-313, 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 - ' - '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(671, 42) - Me.appscapewebbrowserinfopage.Name = "appscapewebbrowserinfopage" - Me.appscapewebbrowserinfopage.Size = New System.Drawing.Size(106, 87) - 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(-123, 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(-332, 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.Label5) - Me.Panel25.Controls.Add(Me.Panel26) - Me.Panel25.Location = New System.Drawing.Point(-332, 5) - Me.Panel25.Name = "Panel25" - Me.Panel25.Size = New System.Drawing.Size(770, 88) - Me.Panel25.TabIndex = 0 - ' - 'Label5 - ' - Me.Label5.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Label5.BackColor = System.Drawing.Color.Transparent - Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label5.Location = New System.Drawing.Point(335, 5) - Me.Label5.Name = "Label5" - Me.Label5.Size = New System.Drawing.Size(432, 23) - Me.Label5.TabIndex = 6 - Me.Label5.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" - Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight - ' - 'Panel26 - ' - Me.Panel26.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Panel26.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton - Me.Panel26.Location = New System.Drawing.Point(678, 33) - Me.Panel26.Name = "Panel26" - Me.Panel26.Size = New System.Drawing.Size(82, 47) - Me.Panel26.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(-335, 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(671, 157) - Me.appscapevideoplayerinfopage.Name = "appscapevideoplayerinfopage" - Me.appscapevideoplayerinfopage.Size = New System.Drawing.Size(90, 91) - 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(-131, 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(-340, 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.Label3) - Me.Panel15.Controls.Add(Me.Panel16) - Me.Panel15.Location = New System.Drawing.Point(-340, 5) - Me.Panel15.Name = "Panel15" - Me.Panel15.Size = New System.Drawing.Size(770, 88) - Me.Panel15.TabIndex = 0 - ' - 'Label3 - ' - Me.Label3.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Label3.BackColor = System.Drawing.Color.Transparent - Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label3.Location = New System.Drawing.Point(335, 5) - Me.Label3.Name = "Label3" - Me.Label3.Size = New System.Drawing.Size(432, 23) - Me.Label3.TabIndex = 6 - Me.Label3.Text = " Hello CherryBlue - Your Wallet Contains 2.53542 BTN" - Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight - ' - 'Panel16 - ' - Me.Panel16.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Panel16.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton - Me.Panel16.Location = New System.Drawing.Point(678, 33) - Me.Panel16.Name = "Panel16" - Me.Panel16.Size = New System.Drawing.Size(82, 47) - Me.Panel16.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(-343, 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 - ' - '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(161, 42) - Me.appscapeaudioplayerinfopage.Name = "appscapeaudioplayerinfopage" - Me.appscapeaudioplayerinfopage.Size = New System.Drawing.Size(446, 306) - 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(47, 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(-162, 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.Panel33) - Me.Panel32.Location = New System.Drawing.Point(-162, 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 - ' - 'Panel33 - ' - Me.Panel33.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Panel33.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton - Me.Panel33.Location = New System.Drawing.Point(678, 33) - Me.Panel33.Name = "Panel33" - Me.Panel33.Size = New System.Drawing.Size(82, 47) - Me.Panel33.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(-166, 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 - ' - '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.Location = New System.Drawing.Point(10, 6) - Me.appscapehomepage.Name = "appscapehomepage" - Me.appscapehomepage.Size = New System.Drawing.Size(96, 90) - 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(-336, 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(250, 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.appscapemoresoftware - Me.Panel17.Controls.Add(Me.btnbuymoresoftware1) - Me.Panel17.Controls.Add(Me.btnmoresoftware1info) - Me.Panel17.Location = New System.Drawing.Point(61, 308) - Me.Panel17.Name = "Panel17" - Me.Panel17.Size = New System.Drawing.Size(182, 200) - Me.Panel17.TabIndex = 4 - ' - 'btnbuymoresoftware1 - ' - Me.btnbuymoresoftware1.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapeundefinedprice - Me.btnbuymoresoftware1.Location = New System.Drawing.Point(73, 161) - Me.btnbuymoresoftware1.Name = "btnbuymoresoftware1" - Me.btnbuymoresoftware1.Size = New System.Drawing.Size(102, 30) - Me.btnbuymoresoftware1.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(-128, 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(250, 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(61, 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(-128, 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(-337, 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.Panel23) - Me.Panel3.Location = New System.Drawing.Point(-337, 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 - ' - 'Panel23 - ' - Me.Panel23.Anchor = System.Windows.Forms.AnchorStyles.Top - Me.Panel23.BackgroundImage = Global.ShiftOS.My.Resources.Resources.appscapedepositnowbutton - Me.Panel23.Location = New System.Drawing.Point(678, 33) - Me.Panel23.Name = "Panel23" - Me.Panel23.Size = New System.Drawing.Size(82, 47) - Me.Panel23.TabIndex = 0 - ' - 'Panel1 - ' - 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 - ' - '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 - ' - '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(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 - ' - 'Shiftnet - ' - 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(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.pnlmainsiteappscape.ResumeLayout(False) - Me.appscapecalculatorinfopage.ResumeLayout(False) - Me.Panel28.ResumeLayout(False) - Me.Panel35.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.appscapeaudioplayerinfopage.ResumeLayout(False) - Me.Panel6.ResumeLayout(False) - Me.Panel32.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.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 btnbuymoresoftware1 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 Panel23 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 Label7 As System.Windows.Forms.Label - Friend WithEvents Panel36 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 Label5 As System.Windows.Forms.Label - Friend WithEvents Panel26 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 Label3 As System.Windows.Forms.Label - Friend WithEvents Panel16 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 Panel33 As System.Windows.Forms.Panel - Friend WithEvents Label2 As System.Windows.Forms.Label -End Class diff --git a/Shiftnet.vb b/Shiftnet.vb deleted file mode 100644 index 5df1a3a..0000000 --- a/Shiftnet.vb +++ /dev/null @@ -1,579 +0,0 @@ -Public Class Shiftnet - 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 = 820 'replace with minimum size - Public minimumsizeheight As Integer = 600 'replace with minimum size - - Public loadsitenow As Boolean = False - - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load - justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 - Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - - ShiftOSDesktop.pnlpanelbuttonshiftnet.SendToBack() 'modfiy to proper name - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonshiftnet, ShiftOSDesktop.tbshiftneticon, ShiftOSDesktop.tbshiftnettext, True) 'modify to proper name - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 - 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 = ShiftOSDesktop.skinclosebutton(1) - End Sub - - Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) - End Sub - - Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) - End Sub - - Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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 = ShiftOSDesktop.skinrollupbutton(1) - End Sub - - Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) - End Sub - - Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) - 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If - End If - - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - 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 = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.Show() - End If - - If ShiftOSDesktop.boughtrollupbutton = False Then - rollupbutton.Hide() - Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.Show() - End If - - If ShiftOSDesktop.boughtminimizebutton = False Then - minimizebutton.Hide() - Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - - If ShiftOSDesktop.boughtknowledgeinputicon = True Then - pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) - 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 - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.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 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - - 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 - End Sub - - Private Sub btnhome_Click(sender As Object, e As EventArgs) Handles btnhome.Click - hideallsites() - txtlocation.Text = "" - End Sub - - Private Sub tmrloadsite_Tick(sender As Object, e As EventArgs) Handles tmrloadsite.Tick - If loadsitenow = True Then - txtlocation.Text = Replace$(txtlocation.Text, vbCrLf, "") - Select Case txtlocation.Text - Case "shiftnet.main.appscape/home.rnp" - opensite(pnlmainsiteappscape, appscapehomepage, "shiftnet.main.appscape/home.rnp") - setupappscapeaccountinfo() - Case "shiftnet.main.appscape/audioplayerinfo.rnp" - opensite(pnlmainsiteappscape, appscapeaudioplayerinfopage, "shiftnet.main.appscape/audioplayerinfo.rnp") - Case "shiftnet.main.appscape/videoplayerinfo.rnp" - opensite(pnlmainsiteappscape, appscapevideoplayerinfopage, "shiftnet.main.appscape/videoplayerinfo.rnp") - Case "shiftnet.main.appscape/calculatorinfo.rnp" - opensite(pnlmainsiteappscape, appscapecalculatorinfopage, "shiftnet.main.appscape/calculatorinfo.rnp") - Case "shiftnet.main.appscape/webbrowserinfo.rnp" - opensite(pnlmainsiteappscape, appscapewebbrowserinfopage, "shiftnet.main.appscape/webbrowserinfo.rnp") - End Select - loadsitenow = False - btnhome.Focus() - End If - End Sub - - '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" - 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 btnbuymoresoftware1.MouseEnter - btnbuymoresoftware1.BackgroundImage = My.Resources.appscapeundefinedpricepressed - End Sub - - Private Sub btnbuymoresoftware1_MouseLeave(sender As Object, e As EventArgs) Handles btnbuymoresoftware1.MouseLeave - btnbuymoresoftware1.BackgroundImage = My.Resources.appscapeundefinedprice - 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 - opensite(pnlmainsiteappscape, appscapehomepage, "shiftnet.main.appscape/home.rnp") - End Sub - - Private Sub btnaudioplayerinfo_Click(sender As Object, e As EventArgs) Handles btnaudioplayerinfo.Click - opensite(pnlmainsiteappscape, appscapeaudioplayerinfopage, "shiftnet.main.appscape/audioplayerinfo.rnp") - End Sub - - Private Sub btnvideoplayerinfoback_Click(sender As Object, e As EventArgs) Handles btnvideoplayerinfoback.Click - opensite(pnlmainsiteappscape, appscapehomepage, "shiftnet.main.appscape/home.rnp") - End Sub - - Private Sub btnvideoplayerinfo_Click(sender As Object, e As EventArgs) Handles btnvideoplayerinfo.Click - opensite(pnlmainsiteappscape, appscapevideoplayerinfopage, "shiftnet.main.appscape/videoplayerinfo.rnp") - End Sub - - Private Sub btncalculatorinfoback_Click(sender As Object, e As EventArgs) Handles btncalculatorinfoback.Click - opensite(pnlmainsiteappscape, appscapehomepage, "shiftnet.main.appscape/home.rnp") - End Sub - - Private Sub btncalculatorinfo_Click(sender As Object, e As EventArgs) Handles btncalculatorinfo.Click - opensite(pnlmainsiteappscape, appscapecalculatorinfopage, "shiftnet.main.appscape/calculatorinfo.rnp") - End Sub - - Private Sub btnwebbrowserinfoback_Click(sender As Object, e As EventArgs) Handles btnwebbrowserinfoback.Click - opensite(pnlmainsiteappscape, appscapehomepage, "shiftnet.main.appscape/home.rnp") - End Sub - - Private Sub btnwebbrowserinfo_Click(sender As Object, e As EventArgs) Handles btnwebbrowserinfo.Click - opensite(pnlmainsiteappscape, appscapewebbrowserinfopage, "shiftnet.main.appscape/webbrowserinfo.rnp") - End Sub -End Class
\ No newline at end of file diff --git a/Skin Loader.vb b/Skin Loader.vb deleted file mode 100644 index e287a6b..0000000 --- a/Skin Loader.vb +++ /dev/null @@ -1,1019 +0,0 @@ -Public Class Skin_Loader - 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 skinloaded As Boolean = False - - Public savelines(200) As String - Public loadlines(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 - 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 - - 'skins - Public skinloaderskinimages(100) As String - Public skinloaderskinclosebutton(2) As Image - Public skinclosebuttonstyle As ImageLayout - Public skinloaderskintitlebar(2) As Image - Public skintitlebarstyle As ImageLayout - Public skinloaderskindesktopbackground(2) As Image - Public skindesktopbackgroundstyle As ImageLayout - Public skinloaderskinrollupbutton(2) As Image - Public skinrollupbuttonstyle As ImageLayout - Public skinloaderskintitlebarrightcorner(2) As Image - Public skintitlebarrightcornerstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskintitlebarleftcorner(2) As Image - Public skintitlebarleftcornerstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskindesktoppanel(2) As Image - Public skindesktoppanelstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskindesktoppaneltime(2) As Image - Public skindesktoppaneltimestyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinapplauncherbutton(2) As Image - Public skinapplauncherbuttonstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinwindowborderleft(2) As Image - Public skinwindowborderleftstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinwindowborderright(2) As Image - Public skinwindowborderrightstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinwindowborderbottom(2) As Image - Public skinwindowborderbottomstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinwindowborderbottomright(2) As Image - Public skinwindowborderbottomrightstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinwindowborderbottomleft(2) As Image - Public skinwindowborderbottomleftstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinpanelbutton(2) As Image - Public skinpanelbuttonstyle As ImageLayout = ImageLayout.Stretch - Public skinloaderskinminimizebutton(2) As Image - Public skinminimizebuttonstyle As ImageLayout = ImageLayout.Stretch - - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load - justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 - Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - determinevisibleobjects() - setskin() - - ShiftOSDesktop.pnlpanelbuttonskinloader.SendToBack() - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonskinloader, ShiftOSDesktop.tbskinloadericon, ShiftOSDesktop.tbskinloadertext, True) - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 - - initialsetup() - setpreviewtocurrentskin() - 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 = ShiftOSDesktop.skinclosebutton(1) - End Sub - - Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) - End Sub - - Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) - End Sub - - Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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 = ShiftOSDesktop.skinrollupbutton(1) - End Sub - - Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) - End Sub - - Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) - 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If - End If - - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Text = ShiftOSDesktop.skinloadername - lbtitletext.Show() - End If - - If ShiftOSDesktop.boughtclosebutton = False Then - closebutton.Hide() - Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.Show() - End If - - If ShiftOSDesktop.boughtrollupbutton = False Then - rollupbutton.Hide() - Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.Show() - End If - - If ShiftOSDesktop.boughtminimizebutton = False Then - minimizebutton.Hide() - Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - - If ShiftOSDesktop.boughtknowledgeinputicon = True Then - pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) - pnlicon.Size = New Size(ShiftOSDesktop.titlebariconsize, ShiftOSDesktop.titlebariconsize) - pnlicon.Image = ShiftOSDesktop.skinloadericontitlebar '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 setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - - Private Sub initialsetup() - titlebarcolour = ShiftOSDesktop.titlebarcolour - windowbordercolour = ShiftOSDesktop.windowbordercolour - windowbordersize = ShiftOSDesktop.windowbordersize - titlebarheight = ShiftOSDesktop.titlebarheight - closebuttoncolour = ShiftOSDesktop.closebuttoncolour - closebuttonheight = ShiftOSDesktop.closebuttonheight - closebuttonwidth = ShiftOSDesktop.closebuttonwidth - closebuttontop = ShiftOSDesktop.closebuttontop - closebuttonside = ShiftOSDesktop.closebuttonside - titletextcolour = ShiftOSDesktop.titletextcolour - titletexttop = ShiftOSDesktop.titletexttop - titletextside = ShiftOSDesktop.titletextside - titletextsize = ShiftOSDesktop.titletextsize - titletextfont = ShiftOSDesktop.titletextfont - titletextstyle = ShiftOSDesktop.titletextstyle - desktoppanelcolour = ShiftOSDesktop.desktoppanelcolour - desktopbackgroundcolour = ShiftOSDesktop.desktopbackgroundcolour - desktoppanelheight = ShiftOSDesktop.desktoppanelheight - desktoppanelposition = ShiftOSDesktop.desktoppanelposition - clocktextcolour = ShiftOSDesktop.clocktextcolour - clockbackgroundcolor = ShiftOSDesktop.clockbackgroundcolor - panelclocktexttop = ShiftOSDesktop.panelclocktexttop - panelclocktextsize = ShiftOSDesktop.panelclocktextsize - panelclocktextfont = ShiftOSDesktop.panelclocktextfont - panelclocktextstyle = ShiftOSDesktop.panelclocktextstyle - applauncherbuttoncolour = ShiftOSDesktop.applauncherbuttoncolour - applauncherbuttonclickedcolour = ShiftOSDesktop.applauncherbuttonclickedcolour - applauncherbackgroundcolour = ShiftOSDesktop.applauncherbackgroundcolour - applaunchermouseovercolour = ShiftOSDesktop.applaunchermouseovercolour - applicationsbuttontextcolour = ShiftOSDesktop.applicationsbuttontextcolour - applicationbuttonheight = ShiftOSDesktop.applicationbuttonheight - applicationbuttontextsize = ShiftOSDesktop.applicationbuttontextsize - applicationbuttontextfont = ShiftOSDesktop.applicationbuttontextfont - applicationbuttontextstyle = ShiftOSDesktop.applicationbuttontextstyle - applicationlaunchername = ShiftOSDesktop.applicationlaunchername - titletextposition = ShiftOSDesktop.titletextposition - rollupbuttoncolour = ShiftOSDesktop.rollupbuttoncolour - rollupbuttonheight = ShiftOSDesktop.rollupbuttonheight - rollupbuttonwidth = ShiftOSDesktop.rollupbuttonwidth - rollupbuttonside = ShiftOSDesktop.rollupbuttonside - rollupbuttontop = ShiftOSDesktop.rollupbuttontop - titlebariconside = ShiftOSDesktop.titlebariconside - titlebaricontop = ShiftOSDesktop.titlebaricontop - titlebarcornerwidth = ShiftOSDesktop.titlebarcornerwidth - titlebarrightcornercolour = ShiftOSDesktop.titlebarrightcornercolour - titlebarleftcornercolour = ShiftOSDesktop.titlebarleftcornercolour - showwindowcorners = ShiftOSDesktop.showwindowcorners - applaunchermenuholderwidth = ShiftOSDesktop.applaunchermenuholderwidth - windowborderleftcolour = ShiftOSDesktop.windowborderleftcolour - windowborderrightcolour = ShiftOSDesktop.windowborderrightcolour - windowborderbottomcolour = ShiftOSDesktop.windowborderbottomcolour - windowborderbottomrightcolour = ShiftOSDesktop.windowborderbottomrightcolour - windowborderbottomleftcolour = ShiftOSDesktop.windowborderbottomleftcolour - panelbuttonicontop = ShiftOSDesktop.panelbuttonicontop - panelbuttoniconside = ShiftOSDesktop.panelbuttoniconside - panelbuttoniconsize = ShiftOSDesktop.panelbuttoniconsize - panelbuttoniconsize = ShiftOSDesktop.panelbuttoniconsize - panelbuttonheight = ShiftOSDesktop.panelbuttonheight - panelbuttonwidth = ShiftOSDesktop.panelbuttonwidth - panelbuttoncolour = ShiftOSDesktop.panelbuttoncolour - panelbuttontextcolour = ShiftOSDesktop.panelbuttontextcolour - panelbuttontextsize = ShiftOSDesktop.panelbuttontextsize - panelbuttontextfont = ShiftOSDesktop.panelbuttontextfont - panelbuttontextstyle = ShiftOSDesktop.panelbuttontextstyle - panelbuttontextside = ShiftOSDesktop.panelbuttontextside - panelbuttontexttop = ShiftOSDesktop.panelbuttontexttop - panelbuttongap = ShiftOSDesktop.panelbuttongap - panelbuttonfromtop = ShiftOSDesktop.panelbuttonfromtop - panelbuttoninitialgap = ShiftOSDesktop.panelbuttoninitialgap - minimizebuttoncolour = ShiftOSDesktop.minimizebuttoncolour - minimizebuttonheight = ShiftOSDesktop.minimizebuttonheight - minimizebuttonwidth = ShiftOSDesktop.minimizebuttonwidth - minimizebuttonside = ShiftOSDesktop.minimizebuttonside - minimizebuttontop = ShiftOSDesktop.minimizebuttontop - - 'skins - Array.Copy(ShiftOSDesktop.skinimages, skinloaderskinimages, skinloaderskinimages.Length) - - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else skinloaderskinclosebutton(0) = ShiftOSDesktop.skinclosebutton(0).Clone - If ShiftOSDesktop.skinclosebutton(1) Is Nothing Then Else skinloaderskinclosebutton(1) = ShiftOSDesktop.skinclosebutton(1).Clone - If ShiftOSDesktop.skinclosebutton(2) Is Nothing Then Else skinloaderskinclosebutton(2) = ShiftOSDesktop.skinclosebutton(2).Clone - skinclosebuttonstyle = ShiftOSDesktop.skinclosebuttonstyle - - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else skinloaderskintitlebar(0) = ShiftOSDesktop.skintitlebar(0).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 = ShiftOSDesktop.skintitlebarstyle - - If ShiftOSDesktop.skindesktopbackground(0) Is Nothing Then Else skinloaderskindesktopbackground(0) = ShiftOSDesktop.skindesktopbackground(0).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 = ShiftOSDesktop.skindesktopbackgroundstyle - - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else skinloaderskinrollupbutton(0) = ShiftOSDesktop.skinrollupbutton(0).Clone - If ShiftOSDesktop.skinrollupbutton(1) Is Nothing Then Else skinloaderskinrollupbutton(1) = ShiftOSDesktop.skinrollupbutton(1).Clone - If ShiftOSDesktop.skinrollupbutton(2) Is Nothing Then Else skinloaderskinrollupbutton(2) = ShiftOSDesktop.skinrollupbutton(2).Clone - skinrollupbuttonstyle = ShiftOSDesktop.skinrollupbuttonstyle - - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else skinloaderskintitlebarrightcorner(0) = ShiftOSDesktop.skintitlebarrightcorner(0).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 = ShiftOSDesktop.skintitlebarrightcornerstyle - - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else skinloaderskintitlebarleftcorner(0) = ShiftOSDesktop.skintitlebarleftcorner(0).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 = ShiftOSDesktop.skintitlebarleftcornerstyle - - If ShiftOSDesktop.skindesktoppanel(0) Is Nothing Then Else skinloaderskindesktoppanel(0) = ShiftOSDesktop.skindesktoppanel(0).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 = ShiftOSDesktop.skindesktoppanelstyle - - If ShiftOSDesktop.skindesktoppaneltime(0) Is Nothing Then Else skinloaderskindesktoppaneltime(0) = ShiftOSDesktop.skindesktoppaneltime(0).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 = ShiftOSDesktop.skindesktoppaneltimestyle - - If ShiftOSDesktop.skinapplauncherbutton(0) Is Nothing Then Else skinloaderskinapplauncherbutton(0) = ShiftOSDesktop.skinapplauncherbutton(0).Clone - If ShiftOSDesktop.skinapplauncherbutton(1) Is Nothing Then Else skinloaderskinapplauncherbutton(1) = ShiftOSDesktop.skinapplauncherbutton(1).Clone - If ShiftOSDesktop.skinapplauncherbutton(2) Is Nothing Then Else skinloaderskinapplauncherbutton(2) = ShiftOSDesktop.skinapplauncherbutton(2).Clone - skinapplauncherbuttonstyle = ShiftOSDesktop.skinapplauncherbuttonstyle - - If ShiftOSDesktop.skinwindowborderleft(0) Is Nothing Then Else skinloaderskinwindowborderleft(0) = ShiftOSDesktop.skinwindowborderleft(0).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 = ShiftOSDesktop.skinwindowborderleftstyle - - If ShiftOSDesktop.skinwindowborderright(0) Is Nothing Then Else skinloaderskinwindowborderright(0) = ShiftOSDesktop.skinwindowborderright(0).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 = ShiftOSDesktop.skinwindowborderrightstyle - - If ShiftOSDesktop.skinwindowborderbottom(0) Is Nothing Then Else skinloaderskinwindowborderbottom(0) = ShiftOSDesktop.skinwindowborderbottom(0).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 = ShiftOSDesktop.skinwindowborderbottomstyle - - If ShiftOSDesktop.skinwindowborderbottomright(0) Is Nothing Then Else skinloaderskinwindowborderbottomright(0) = ShiftOSDesktop.skinwindowborderbottomright(0).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 = ShiftOSDesktop.skinwindowborderbottomrightstyle - - If ShiftOSDesktop.skinwindowborderbottomleft(0) Is Nothing Then Else skinloaderskinwindowborderbottomleft(0) = ShiftOSDesktop.skinwindowborderbottomleft(0).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 = ShiftOSDesktop.skinwindowborderbottomleftstyle - - If ShiftOSDesktop.skinpanelbutton(0) Is Nothing Then Else skinloaderskinpanelbutton(0) = ShiftOSDesktop.skinpanelbutton(0).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 = ShiftOSDesktop.skinpanelbuttonstyle - - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else skinloaderskinminimizebutton(0) = ShiftOSDesktop.skinminimizebutton(0).Clone - If ShiftOSDesktop.skinminimizebutton(1) Is Nothing Then Else skinloaderskinminimizebutton(1) = ShiftOSDesktop.skinminimizebutton(1).Clone - If ShiftOSDesktop.skinminimizebutton(2) Is Nothing Then Else skinloaderskinminimizebutton(2) = ShiftOSDesktop.skinminimizebutton(2).Clone - skinminimizebuttonstyle = ShiftOSDesktop.skinminimizebuttonstyle - 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() - - 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 - - - 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 skinloaderskinimages(0) = "" Then Else preclosebutton.BackgroundImage = GetImage(skinloaderskinimages(0)) - preclosebutton.BackgroundImageLayout = skinclosebuttonstyle - If skinloaderskinimages(3) = "" Then Else pretitlebar.BackgroundImage = GetImage(skinloaderskinimages(3)) - pretitlebar.BackgroundImageLayout = skintitlebarstyle - If skinloaderskinimages(6) = "" Then Else pnldesktoppreview.BackgroundImage = GetImage(skinloaderskinimages(6)) - pnldesktoppreview.BackgroundImageLayout = skindesktopbackgroundstyle - If skinloaderskinimages(9) = "" Then Else prerollupbutton.BackgroundImage = GetImage(skinloaderskinimages(9)) - prerollupbutton.BackgroundImageLayout = skinrollupbuttonstyle - If skinloaderskinimages(12) = "" Then Else prepgtoprcorner.BackgroundImage = GetImage(skinloaderskinimages(12)) - prepgtoprcorner.BackgroundImageLayout = skintitlebarrightcornerstyle - If skinloaderskinimages(15) = "" Then Else prepgtoplcorner.BackgroundImage = GetImage(skinloaderskinimages(15)) - prepgtoplcorner.BackgroundImageLayout = skintitlebarleftcornerstyle - If skinloaderskinimages(18) = "" Then Else predesktoppanel.BackgroundImage = GetImage(skinloaderskinimages(18)) - If skinloaderskinimages(18) = "" Then Else prepnlpanelbuttonholder.BackgroundImage = GetImage(skinloaderskinimages(18)) - predesktoppanel.BackgroundImageLayout = skindesktoppanelstyle - prepnlpanelbuttonholder.BackgroundImageLayout = skindesktoppanelstyle - If skinloaderskinimages(21) = "" Then Else pretimepanel.BackgroundImage = GetImage(skinloaderskinimages(21)) - pretimepanel.BackgroundImageLayout = skindesktoppaneltimestyle - If skinloaderskinimages(24) = "" Then Else ApplicationsToolStripMenuItem.BackgroundImage = GetImage(skinloaderskinimages(24)) - ApplicationsToolStripMenuItem.BackgroundImageLayout = skinapplauncherbuttonstyle - If skinloaderskinimages(27) = "" Then Else prepgleft.BackgroundImage = GetImage(skinloaderskinimages(27)) - prepgleft.BackgroundImageLayout = skinwindowborderleftstyle - If skinloaderskinimages(30) = "" Then Else prepgright.BackgroundImage = GetImage(skinloaderskinimages(30)) - prepgright.BackgroundImageLayout = skinwindowborderrightstyle - If skinloaderskinimages(33) = "" Then Else prepgbottom.BackgroundImage = GetImage(skinloaderskinimages(33)) - prepgbottom.BackgroundImageLayout = skinwindowborderbottomstyle - If skinloaderskinimages(36) = "" Then Else prepgbottomrcorner.BackgroundImage = GetImage(skinloaderskinimages(36)) - prepgbottomrcorner.BackgroundImageLayout = skinwindowborderbottomrightstyle - If skinloaderskinimages(39) = "" Then Else prepgbottomlcorner.BackgroundImage = GetImage(skinloaderskinimages(39)) - prepgbottomlcorner.BackgroundImageLayout = skinwindowborderbottomleftstyle - prepgbottomlcorner.Height = windowbordersize - prepgbottomrcorner.Height = windowbordersize - If skinloaderskinimages(42) = "" Then Else preminimizebutton.BackgroundImage = GetImage(skinloaderskinimages(42)) - preminimizebutton.BackgroundImageLayout = skinminimizebuttonstyle - If skinloaderskinimages(45) = "" Then Else prepnlpanelbutton.BackgroundImage = GetImage(skinloaderskinimages(45)) - prepnlpanelbutton.BackgroundImageLayout = skinpanelbuttonstyle - - '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 - - - - ShiftOSDesktop.loadskinfiles() - ShiftOSDesktop.setupdesktop() - ShiftOSDesktop.setupskins() - - Me.Invalidate() - 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 - - 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 - saveskintofile() - 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 - - Private Sub btnapplyskin_Click(sender As Object, e As EventArgs) Handles btnapplyskin.Click - If Shifter.Visible = True Then - infobox.title = "Skin Loader - Error" - infobox.textinfo = "It appears that the Shifter application is currently open." & Environment.NewLine & Environment.NewLine & "Due to system stability issues you must close it before applying the skin!" - infobox.Show() - Else - If skinloaded = True Then - If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\") Then My.Computer.FileSystem.DeleteDirectory("C:\ShiftOS\Shiftum42\Skins\CurrentCopy\", FileIO.DeleteDirectoryOption.DeleteAllContents) - ShiftOSDesktop.disposeoldskindata("skinloaderapplyskin") - ShiftOSDesktop.loadcurrentskin() - ShiftOSDesktop.loadskinfiles() - ShiftOSDesktop.setupalltitlebars() - ShiftOSDesktop.setcolours() - ShiftOSDesktop.setupdesktop() - ShiftOSDesktop.setupskins() - ShiftOSDesktop.Invalidate() - skinloaded = False - 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 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 -End Class
\ No newline at end of file diff --git a/Web Browser.vb b/Web Browser.vb deleted file mode 100644 index df328a5..0000000 --- a/Web Browser.vb +++ /dev/null @@ -1,464 +0,0 @@ -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 = 300 - Public minimumsizeheight As Integer = 200 - - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load - justopened = True - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 - Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - - ShiftOSDesktop.pnlpanelbuttonwebbrowser.SendToBack() 'modfiy to proper name - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttonwebbrowser, ShiftOSDesktop.tbwebbrowsericon, ShiftOSDesktop.tbwebbrowsertext, True) 'modify to proper name - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 - - gohome() - 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 = ShiftOSDesktop.skinclosebutton(1) - End Sub - - Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) - End Sub - - Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) - End Sub - - Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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 = ShiftOSDesktop.skinrollupbutton(1) - End Sub - - Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) - End Sub - - Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) - 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If - End If - - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - If webwindow.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindow.DocumentTitle - lbtitletext.Show() - End If - - If ShiftOSDesktop.boughtclosebutton = False Then - closebutton.Hide() - Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.Show() - End If - - If ShiftOSDesktop.boughtrollupbutton = False Then - rollupbutton.Hide() - Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.Show() - End If - - If ShiftOSDesktop.boughtminimizebutton = False Then - minimizebutton.Hide() - Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - - If ShiftOSDesktop.boughtknowledgeinputicon = True Then - pnlicon.Visible = True - pnlicon.Location = New Point(ShiftOSDesktop.titlebariconside, ShiftOSDesktop.titlebaricontop) - 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 - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.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 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() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - - Private Sub txtlocation_KeyDown(sender As Object, e As KeyEventArgs) Handles txtlocation.KeyDown - If e.KeyCode = Keys.Enter Then - If txtlocation.Text.Contains(".") Then webwindow.Navigate(txtlocation.Text) Else webwindow.Navigate("http://www.google.co.uk/search?q=" & txtlocation.Text) - End If - End Sub - - Private Sub webwindow_Navigated(sender As Object, e As WebBrowserNavigatedEventArgs) Handles webwindow.Navigated - txtlocation.Text = webwindow.Url.ToString - If webwindow.DocumentTitle = "" Then lbtitletext.Text = ShiftOSDesktop.webbrowsername Else lbtitletext.Text = ShiftOSDesktop.webbrowsername & " - " & webwindow.DocumentTitle - centretitletext() - End Sub - - Private Sub centretitletext() - If ShiftOSDesktop.boughttitletext = False Then - lbtitletext.Hide() - Else - lbtitletext.Font = New Font(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - End Sub - - Private Sub btnback_Click(sender As Object, e As EventArgs) Handles btnback.Click - If webwindow.CanGoBack = True Then webwindow.GoBack() - End Sub - - Private Sub btnforward_Click(sender As Object, e As EventArgs) Handles btnforward.Click - If webwindow.CanGoForward = True Then webwindow.GoForward() - End Sub - - Private Sub gohome() - webwindow.Navigate(ShiftOSDesktop.webbrowserhomepage) - centretitletext() - End Sub - - Private Sub btnhome_Click(sender As Object, e As EventArgs) Handles btnhome.Click - gohome() - End Sub - - Private Sub txtlocation_MouseClick(sender As Object, e As MouseEventArgs) Handles txtlocation.MouseClick - txtlocation.SelectAll() - End Sub - - Private Sub txtlocation_TextChanged(sender As Object, e As EventArgs) Handles txtlocation.TextChanged - - End Sub -End Class
\ No newline at end of file diff --git a/coherencemode.vb b/coherencemode.vb deleted file mode 100644 index 5868bf1..0000000 --- a/coherencemode.vb +++ /dev/null @@ -1,19 +0,0 @@ -Module coherencemode - Dim fakeform As New template - - Public Sub setupwindows(ByVal programname As String) - Dim win As Window = Window.Find(programname) - win.Style(Window.Styles.Border) = False - win.Style(Window.Styles.Sizable) = False - win.Size = New Size(win.Size.Width + 1, win.Size.Height + 1) - win.Invalidate() - - fakeform.Show() - fakeform.Location = win.Location - fakeform.Size = win.Size - fakeform.lbtitletext.Text = win.Text - fakeform.resettitlebar() - fakeform.pgcontents.BackColor = Color.FromArgb(1, 0, 1) - End Sub - -End Module diff --git a/development-save-file/README.md b/development-save-file/README.md new file mode 100644 index 0000000..6cfaeda --- /dev/null +++ b/development-save-file/README.md @@ -0,0 +1,3 @@ +# Development save file + +This is a save file with everything unlocked. The `ShiftOS` directory is C:\ShiftOS\ diff --git a/development-save-file/ShiftOS/Home/Desktop/FixedSysReport.txt b/development-save-file/ShiftOS/Home/Desktop/FixedSysReport.txt new file mode 100644 index 0000000..38a8293 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Desktop/FixedSysReport.txt @@ -0,0 +1,6 @@ +### SHIFTOS SYSTEM INFORMATION DUMP ### + +ShiftOS Version: 0.0.1.0 +User Name: theultimate +CPU: AMD A6-3400M APU with Radeon(tm) HD Graphics +Random Access Memory (RAM): 3559 Megabytes diff --git a/development-save-file/ShiftOS/Home/Desktop/Simplinton.zip b/development-save-file/ShiftOS/Home/Desktop/Simplinton.zip Binary files differnew file mode 100644 index 0000000..3bf7245 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Desktop/Simplinton.zip diff --git a/development-save-file/ShiftOS/Home/Documents/ShiftOSInfo.txt b/development-save-file/ShiftOS/Home/Documents/ShiftOSInfo.txt new file mode 100644 index 0000000..71bfad8 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Documents/ShiftOSInfo.txt @@ -0,0 +1 @@ +Welcome to ShiftOS!
\ No newline at end of file diff --git a/development-save-file/ShiftOS/Home/Icons/128535-simple-red-square-icon-business-clock1.png b/development-save-file/ShiftOS/Home/Icons/128535-simple-red-square-icon-business-clock1.png Binary files differnew file mode 100644 index 0000000..49da8f8 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/128535-simple-red-square-icon-business-clock1.png diff --git a/development-save-file/ShiftOS/Home/Icons/80px-HLSColorSpace.png b/development-save-file/ShiftOS/Home/Icons/80px-HLSColorSpace.png Binary files differnew file mode 100644 index 0000000..f092f92 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/80px-HLSColorSpace.png diff --git a/development-save-file/ShiftOS/Home/Icons/Gimp-3.png b/development-save-file/ShiftOS/Home/Icons/Gimp-3.png Binary files differnew file mode 100644 index 0000000..f0b5412 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/Gimp-3.png diff --git a/development-save-file/ShiftOS/Home/Icons/Notepad.png b/development-save-file/ShiftOS/Home/Icons/Notepad.png Binary files differnew file mode 100644 index 0000000..e42d730 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/Notepad.png diff --git a/development-save-file/ShiftOS/Home/Icons/VLC_media_player_icon2.png b/development-save-file/ShiftOS/Home/Icons/VLC_media_player_icon2.png Binary files differnew file mode 100644 index 0000000..6afe206 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/VLC_media_player_icon2.png diff --git a/development-save-file/ShiftOS/Home/Icons/Windows-Update.png b/development-save-file/ShiftOS/Home/Icons/Windows-Update.png Binary files differnew file mode 100644 index 0000000..7969e33 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/Windows-Update.png diff --git a/development-save-file/ShiftOS/Home/Icons/Windows_Explorer_Icon-1.png b/development-save-file/ShiftOS/Home/Icons/Windows_Explorer_Icon-1.png Binary files differnew file mode 100644 index 0000000..121e37f --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/Windows_Explorer_Icon-1.png diff --git a/development-save-file/ShiftOS/Home/Icons/calculator.png b/development-save-file/ShiftOS/Home/Icons/calculator.png Binary files differnew file mode 100644 index 0000000..5811b4c --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/calculator.png diff --git a/development-save-file/ShiftOS/Home/Icons/firefox-512-noshadow.png b/development-save-file/ShiftOS/Home/Icons/firefox-512-noshadow.png Binary files differnew file mode 100644 index 0000000..d5b7af6 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/firefox-512-noshadow.png diff --git a/development-save-file/ShiftOS/Home/Icons/firefox-64-noshadow.png b/development-save-file/ShiftOS/Home/Icons/firefox-64-noshadow.png Binary files differnew file mode 100644 index 0000000..27b0cf4 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/firefox-64-noshadow.png diff --git a/development-save-file/ShiftOS/Home/Icons/firefox.png b/development-save-file/ShiftOS/Home/Icons/firefox.png Binary files differnew file mode 100644 index 0000000..e01d881 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/firefox.png diff --git a/development-save-file/ShiftOS/Home/Icons/graphicpickericon.png b/development-save-file/ShiftOS/Home/Icons/graphicpickericon.png Binary files differnew file mode 100644 index 0000000..0b89264 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/graphicpickericon.png diff --git a/development-save-file/ShiftOS/Home/Icons/iconchanger.png b/development-save-file/ShiftOS/Home/Icons/iconchanger.png Binary files differnew file mode 100644 index 0000000..25f6732 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/iconchanger.png diff --git a/development-save-file/ShiftOS/Home/Icons/itunes.png b/development-save-file/ShiftOS/Home/Icons/itunes.png Binary files differnew file mode 100644 index 0000000..7cc6334 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/itunes.png diff --git a/development-save-file/ShiftOS/Home/Icons/knowledge input.png b/development-save-file/ShiftOS/Home/Icons/knowledge input.png Binary files differnew file mode 100644 index 0000000..fb5cb2d --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/knowledge input.png diff --git a/development-save-file/ShiftOS/Home/Icons/namechangericon.png b/development-save-file/ShiftOS/Home/Icons/namechangericon.png Binary files differnew file mode 100644 index 0000000..a416a8b --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/namechangericon.png diff --git a/development-save-file/ShiftOS/Home/Icons/pong.png b/development-save-file/ShiftOS/Home/Icons/pong.png Binary files differnew file mode 100644 index 0000000..c14b78a --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/pong.png diff --git a/development-save-file/ShiftOS/Home/Icons/skinloader.png b/development-save-file/ShiftOS/Home/Icons/skinloader.png Binary files differnew file mode 100644 index 0000000..a262749 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/skinloader.png diff --git a/development-save-file/ShiftOS/Home/Icons/system_config_services.png b/development-save-file/ShiftOS/Home/Icons/system_config_services.png Binary files differnew file mode 100644 index 0000000..86c28ab --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/system_config_services.png diff --git a/development-save-file/ShiftOS/Home/Icons/terminal_icon.png b/development-save-file/ShiftOS/Home/Icons/terminal_icon.png Binary files differnew file mode 100644 index 0000000..95e7623 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/terminal_icon.png diff --git a/development-save-file/ShiftOS/Home/Icons/test.zip b/development-save-file/ShiftOS/Home/Icons/test.zip Binary files differnew file mode 100644 index 0000000..d1efbfb --- /dev/null +++ b/development-save-file/ShiftOS/Home/Icons/test.zip diff --git a/development-save-file/ShiftOS/Home/Music/royalty free/Exhilarate.mp3 b/development-save-file/ShiftOS/Home/Music/royalty free/Exhilarate.mp3 Binary files differnew file mode 100644 index 0000000..c198b52 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Music/royalty free/Exhilarate.mp3 diff --git a/development-save-file/ShiftOS/Home/Music/royalty free/Iron Bacon.mp3 b/development-save-file/ShiftOS/Home/Music/royalty free/Iron Bacon.mp3 Binary files differnew file mode 100644 index 0000000..d05cd79 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Music/royalty free/Iron Bacon.mp3 diff --git a/development-save-file/ShiftOS/Home/Music/royalty free/Ouroboros.mp3 b/development-save-file/ShiftOS/Home/Music/royalty free/Ouroboros.mp3 Binary files differnew file mode 100644 index 0000000..05a5955 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Music/royalty free/Ouroboros.mp3 diff --git a/development-save-file/ShiftOS/Home/Music/royalty free/RetroFuture Clean.mp3 b/development-save-file/ShiftOS/Home/Music/royalty free/RetroFuture Clean.mp3 Binary files differnew file mode 100644 index 0000000..979a152 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Music/royalty free/RetroFuture Clean.mp3 diff --git a/development-save-file/ShiftOS/Home/Music/royalty free/Wah Game Loop.mp3 b/development-save-file/ShiftOS/Home/Music/royalty free/Wah Game Loop.mp3 Binary files differnew file mode 100644 index 0000000..10c6435 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Music/royalty free/Wah Game Loop.mp3 diff --git a/development-save-file/ShiftOS/Home/Skins/Dim Light.skn b/development-save-file/ShiftOS/Home/Skins/Dim Light.skn Binary files differnew file mode 100644 index 0000000..2b3ab3e --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Dim Light.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Hacker.skn b/development-save-file/ShiftOS/Home/Skins/Hacker.skn Binary files differnew file mode 100644 index 0000000..5fb3391 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Hacker.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Industrial.skn b/development-save-file/ShiftOS/Home/Skins/Industrial.skn Binary files differnew file mode 100644 index 0000000..680f4e7 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Industrial.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Linux Mint 7.skn b/development-save-file/ShiftOS/Home/Skins/Linux Mint 7.skn Binary files differnew file mode 100644 index 0000000..bc275d5 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Linux Mint 7.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Mac OS 9.skn b/development-save-file/ShiftOS/Home/Skins/Mac OS 9.skn Binary files differnew file mode 100644 index 0000000..5e91a13 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Mac OS 9.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Skin.skn b/development-save-file/ShiftOS/Home/Skins/Skin.skn Binary files differnew file mode 100644 index 0000000..cbb55e7 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Skin.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Steam.skn b/development-save-file/ShiftOS/Home/Skins/Steam.skn Binary files differnew file mode 100644 index 0000000..99936c8 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Steam.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Ubuntu 504.skn b/development-save-file/ShiftOS/Home/Skins/Ubuntu 504.skn Binary files differnew file mode 100644 index 0000000..42f2e43 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Ubuntu 504.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Whistler Watercolor.skn b/development-save-file/ShiftOS/Home/Skins/Whistler Watercolor.skn Binary files differnew file mode 100644 index 0000000..8513603 --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Whistler Watercolor.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Windows 95.skn b/development-save-file/ShiftOS/Home/Skins/Windows 95.skn Binary files differnew file mode 100644 index 0000000..ead3f7e --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Windows 95.skn diff --git a/development-save-file/ShiftOS/Home/Skins/Windows XP.skn b/development-save-file/ShiftOS/Home/Skins/Windows XP.skn Binary files differnew file mode 100644 index 0000000..681cc5f --- /dev/null +++ b/development-save-file/ShiftOS/Home/Skins/Windows XP.skn diff --git a/development-save-file/ShiftOS/Shiftum42/Drivers/HDD.dri b/development-save-file/ShiftOS/Shiftum42/Drivers/HDD.dri new file mode 100644 index 0000000..6bccffd --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Drivers/HDD.dri @@ -0,0 +1,2001 @@ +11 +11 +11 +11 +11 +11 +11 +11 +11 +5061983 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +theultimate +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +-15845476 +-14790247 +-2300161 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-1 +-16777216 +-9868951 +-8355712 +-5658199 +-4144960 +-2894893 +-2302756 +-12566464 +-15790321 +-11513776 +-10855846 +-14803426 +-12829636 +-12566464 +-12566464 +-12566464 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +-16751616 +-16744448 +-13726889 +-12799119 +-7357301 +-7278960 +-16713062 +-16711809 +-5374161 +-8586240 +-16711936 +-13447886 +-6632142 +-9728477 +-8355840 +-16760320 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +-8355712 +-8355712 +4 +22 +-16777216 +17 +17 +4 +3 +-1 +3 +24 +10 +Arial +1 +-8355712 +-14790247 +28 +Bottom +-16777216 +-8355712 +5 +11 +Trebuchet MS +0 +-8388480 +-8355712 +-2300161 +-7876885 +-16777216 +28 +10 +Byington +1 +Applications +Left +-16777216 +17 +17 +24 +3 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +21 +15 +3 +3 +128 +1000000 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +-16777216 +11 +0.0.1.0 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +10 +11 +11 +11 +11 +11 +0 +10 +0 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +11 +www.google.com +0 +0 +0 + +32 +shiftos +Artpad +Audio Player +Calculator +Clock +Colour Picker +File Opener +File Saver +File Skimmer +Graphic Picker +Knowledge Input +Pong +Shifter +Shiftorium +Skin Loader +Terminal +TextPad +Video Player +Web Browser +Name Changer +Icon Manager +Bitnote Wallet +Bitnote Digger +Skin Shifter +Shiftnet +Dodge +Download Manager +Installer +Snakey +System Information +OrcWrite +FloodGate Manager +Labyrinth +Virus Scanner +16 +16 +16 +10 +10 +10 +10 +1 +1 +1 +1 + + + + +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 +0 + +0 +0 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/development-save-file/ShiftOS/Shiftum42/Drivers/Keyboard.dri b/development-save-file/ShiftOS/Shiftum42/Drivers/Keyboard.dri new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Drivers/Keyboard.dri diff --git a/development-save-file/ShiftOS/Shiftum42/Drivers/Monitor.dri b/development-save-file/ShiftOS/Shiftum42/Drivers/Monitor.dri new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Drivers/Monitor.dri diff --git a/development-save-file/ShiftOS/Shiftum42/Drivers/Mouse.dri b/development-save-file/ShiftOS/Shiftum42/Drivers/Mouse.dri new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Drivers/Mouse.dri diff --git a/development-save-file/ShiftOS/Shiftum42/Drivers/Printer.dri b/development-save-file/ShiftOS/Shiftum42/Drivers/Printer.dri new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Drivers/Printer.dri diff --git a/development-save-file/ShiftOS/Shiftum42/HDAccess.sft b/development-save-file/ShiftOS/Shiftum42/HDAccess.sft new file mode 100644 index 0000000..7d6b3eb --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/HDAccess.sft @@ -0,0 +1 @@ +0.0.8
\ No newline at end of file diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/icondata.dat b/development-save-file/ShiftOS/Shiftum42/Icons/icondata.dat new file mode 100644 index 0000000..7a7f80b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/icondata.dat @@ -0,0 +1,51 @@ +16 +16 +16 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherartpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherartpadicon.pic Binary files differnew file mode 100644 index 0000000..9a2c34e --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherartpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcheraudioplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcheraudioplayericon.pic Binary files differnew file mode 100644 index 0000000..435029b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcheraudioplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchercalculatoricon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchercalculatoricon.pic Binary files differnew file mode 100644 index 0000000..fe3f840 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchercalculatoricon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherclockicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherclockicon.pic Binary files differnew file mode 100644 index 0000000..031a2c9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherclockicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchercolourpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchercolourpickericon.pic Binary files differnew file mode 100644 index 0000000..e1f960b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchercolourpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileopenericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileopenericon.pic Binary files differnew file mode 100644 index 0000000..78760e9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileopenericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherfilesavericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfilesavericon.pic Binary files differnew file mode 100644 index 0000000..e81aafc --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfilesavericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileskimmericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileskimmericon.pic Binary files differnew file mode 100644 index 0000000..f2fa707 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherfileskimmericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchergraphicpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchergraphicpickericon.pic Binary files differnew file mode 100644 index 0000000..1a38829 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchergraphicpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchericonmanagericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchericonmanagericon.pic Binary files differnew file mode 100644 index 0000000..9c369c5 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchericonmanagericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherinfoboxicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherinfoboxicon.pic Binary files differnew file mode 100644 index 0000000..8c10bea --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherinfoboxicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherknowledgeinputicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherknowledgeinputicon.pic Binary files differnew file mode 100644 index 0000000..1518c67 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherknowledgeinputicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchernamechangericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchernamechangericon.pic Binary files differnew file mode 100644 index 0000000..86e4b60 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchernamechangericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherpongicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherpongicon.pic Binary files differnew file mode 100644 index 0000000..906a066 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherpongicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftericon.pic Binary files differnew file mode 100644 index 0000000..a2cca45 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftoriumicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftoriumicon.pic Binary files differnew file mode 100644 index 0000000..ec30161 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchershiftoriumicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchershutdownicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchershutdownicon.pic Binary files differnew file mode 100644 index 0000000..6701ae3 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchershutdownicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherskinloadericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherskinloadericon.pic Binary files differnew file mode 100644 index 0000000..5a257be --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherskinloadericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherterminalicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherterminalicon.pic Binary files differnew file mode 100644 index 0000000..3228203 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherterminalicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchertextpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchertextpadicon.pic Binary files differnew file mode 100644 index 0000000..7b3e568 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchertextpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launchervideoplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launchervideoplayericon.pic Binary files differnew file mode 100644 index 0000000..8bac011 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launchervideoplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/launcherwebbrowsericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/launcherwebbrowsericon.pic Binary files differnew file mode 100644 index 0000000..2bbc29f --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/launcherwebbrowsericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonartpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonartpadicon.pic Binary files differnew file mode 100644 index 0000000..9a2c34e --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonartpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonaudioplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonaudioplayericon.pic Binary files differnew file mode 100644 index 0000000..435029b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonaudioplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncalculatoricon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncalculatoricon.pic Binary files differnew file mode 100644 index 0000000..fe3f840 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncalculatoricon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonclockicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonclockicon.pic Binary files differnew file mode 100644 index 0000000..031a2c9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonclockicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncolourpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncolourpickericon.pic Binary files differnew file mode 100644 index 0000000..e1f960b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoncolourpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileopenericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileopenericon.pic Binary files differnew file mode 100644 index 0000000..78760e9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileopenericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfilesavericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfilesavericon.pic Binary files differnew file mode 100644 index 0000000..e81aafc --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfilesavericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileskimmericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileskimmericon.pic Binary files differnew file mode 100644 index 0000000..f2fa707 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonfileskimmericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttongraphicpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttongraphicpickericon.pic Binary files differnew file mode 100644 index 0000000..1a38829 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttongraphicpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoniconmanagericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoniconmanagericon.pic Binary files differnew file mode 100644 index 0000000..9c369c5 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoniconmanagericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoninfoboxicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoninfoboxicon.pic Binary files differnew file mode 100644 index 0000000..8c10bea --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttoninfoboxicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonknowledgeinputicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonknowledgeinputicon.pic Binary files differnew file mode 100644 index 0000000..1518c67 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonknowledgeinputicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonnamechangericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonnamechangericon.pic Binary files differnew file mode 100644 index 0000000..86e4b60 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonnamechangericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonpongicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonpongicon.pic Binary files differnew file mode 100644 index 0000000..906a066 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonpongicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftericon.pic Binary files differnew file mode 100644 index 0000000..a2cca45 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftoriumicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftoriumicon.pic Binary files differnew file mode 100644 index 0000000..ec30161 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonshiftoriumicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonskinloadericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonskinloadericon.pic Binary files differnew file mode 100644 index 0000000..5a257be --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonskinloadericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonterminalicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonterminalicon.pic Binary files differnew file mode 100644 index 0000000..3228203 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonterminalicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttontextpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttontextpadicon.pic Binary files differnew file mode 100644 index 0000000..7b3e568 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttontextpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonvideoplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonvideoplayericon.pic Binary files differnew file mode 100644 index 0000000..8bac011 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonvideoplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonwebbrowsericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonwebbrowsericon.pic Binary files differnew file mode 100644 index 0000000..2bbc29f --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/panelbuttonwebbrowsericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarartpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarartpadicon.pic Binary files differnew file mode 100644 index 0000000..9a2c34e --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarartpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebaraudioplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebaraudioplayericon.pic Binary files differnew file mode 100644 index 0000000..435029b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebaraudioplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcalculatoricon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcalculatoricon.pic Binary files differnew file mode 100644 index 0000000..fe3f840 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcalculatoricon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarclockicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarclockicon.pic Binary files differnew file mode 100644 index 0000000..031a2c9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarclockicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcolourpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcolourpickericon.pic Binary files differnew file mode 100644 index 0000000..e1f960b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarcolourpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileopenericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileopenericon.pic Binary files differnew file mode 100644 index 0000000..78760e9 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileopenericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfilesavericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfilesavericon.pic Binary files differnew file mode 100644 index 0000000..e81aafc --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfilesavericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileskimmericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileskimmericon.pic Binary files differnew file mode 100644 index 0000000..f2fa707 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarfileskimmericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebargraphicpickericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebargraphicpickericon.pic Binary files differnew file mode 100644 index 0000000..1a38829 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebargraphicpickericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebariconmanagericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebariconmanagericon.pic Binary files differnew file mode 100644 index 0000000..9c369c5 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebariconmanagericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarinfoboxicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarinfoboxicon.pic Binary files differnew file mode 100644 index 0000000..8c10bea --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarinfoboxicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarknowledgeinputicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarknowledgeinputicon.pic Binary files differnew file mode 100644 index 0000000..1518c67 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarknowledgeinputicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarnamechangericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarnamechangericon.pic Binary files differnew file mode 100644 index 0000000..86e4b60 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarnamechangericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarpongicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarpongicon.pic Binary files differnew file mode 100644 index 0000000..906a066 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarpongicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftericon.pic Binary files differnew file mode 100644 index 0000000..a2cca45 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftoriumicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftoriumicon.pic Binary files differnew file mode 100644 index 0000000..ec30161 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarshiftoriumicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarskinloadericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarskinloadericon.pic Binary files differnew file mode 100644 index 0000000..5a257be --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarskinloadericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarterminalicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarterminalicon.pic Binary files differnew file mode 100644 index 0000000..3228203 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarterminalicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebartextpadicon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebartextpadicon.pic Binary files differnew file mode 100644 index 0000000..7b3e568 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebartextpadicon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarvideoplayericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarvideoplayericon.pic Binary files differnew file mode 100644 index 0000000..8bac011 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarvideoplayericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Icons/titlebarwebbrowsericon.pic b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarwebbrowsericon.pic Binary files differnew file mode 100644 index 0000000..2bbc29f --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Icons/titlebarwebbrowsericon.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Languages/English.lang b/development-save-file/ShiftOS/Shiftum42/Languages/English.lang new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Languages/English.lang diff --git a/development-save-file/ShiftOS/Shiftum42/SKernal.sft b/development-save-file/ShiftOS/Shiftum42/SKernal.sft Binary files differnew file mode 100644 index 0000000..8b4af5d --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/SKernal.sft diff --git a/development-save-file/ShiftOS/Shiftum42/SRead.sft b/development-save-file/ShiftOS/Shiftum42/SRead.sft new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/SRead.sft diff --git a/development-save-file/ShiftOS/Shiftum42/SWrite.sft b/development-save-file/ShiftOS/Shiftum42/SWrite.sft new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/SWrite.sft diff --git a/development-save-file/ShiftOS/Shiftum42/ShiftGUI.sft b/development-save-file/ShiftOS/Shiftum42/ShiftGUI.sft new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/ShiftGUI.sft diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/background.jpg b/development-save-file/ShiftOS/Shiftum42/Skins/Current/background.jpg Binary files differnew file mode 100644 index 0000000..4c771d6 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/background.jpg diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderbottom.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderbottom.png Binary files differnew file mode 100644 index 0000000..dc504e4 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderbottom.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderleft.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderleft.png Binary files differnew file mode 100644 index 0000000..3508737 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderleft.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderright.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderright.png Binary files differnew file mode 100644 index 0000000..0cc9aeb --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/borderright.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomleftcorner.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomleftcorner.png Binary files differnew file mode 100644 index 0000000..c6f3ef1 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomleftcorner.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomrightcorner.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomrightcorner.png Binary files differnew file mode 100644 index 0000000..a6d56aa --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/bottomrightcorner.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/clock.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/clock.png Binary files differnew file mode 100644 index 0000000..b685993 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/clock.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/closebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/closebutton.png Binary files differnew file mode 100644 index 0000000..6f19d9a --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/closebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/maximizebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/maximizebutton.png Binary files differnew file mode 100644 index 0000000..a6351f0 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/maximizebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/minimizebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/minimizebutton.png Binary files differnew file mode 100644 index 0000000..69982b8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/minimizebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/skindata.dat b/development-save-file/ShiftOS/Shiftum42/Skins/Current/skindata.dat new file mode 100644 index 0000000..ea21fff --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/skindata.dat @@ -0,0 +1,201 @@ +-8355712 +-8355712 +4 +22 +-16777216 +17 +17 +4 +3 +-1 +3 +24 +10 +Arial +1 +-8355712 +-14790247 +28 +Bottom +-16777216 +-8355712 +5 +11 +Trebuchet MS +0 +-8388480 +-8355712 +-2300161 +-7876885 +-16777216 +28 +10 +Byington +1 +Applications +Left +-16777216 +17 +17 +24 +3 +4 +3 +True +140 +-1 +-1 +60 +-8355712 +-8355712 +-8355712 +-8355712 +-8355712 +3 +4 +16 +16 +22 +170 +-16777216 +-16777216 +10 +Arial +0 +22 +3 +4 +4 +5 +-16777216 +17 +17 +40 +3 + + + + + + + + + + + + + + + + + + + + + + + + + + +C:\ShiftOS\Shiftum42\Skins\Current\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Current\background.jpg +C:\ShiftOS\Shiftum42\Skins\Current\background.jpg +C:\ShiftOS\Shiftum42\Skins\Current\background.jpg +C:\ShiftOS\Shiftum42\Skins\Current\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Current\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Current\clock.png +C:\ShiftOS\Shiftum42\Skins\Current\clock.png +C:\ShiftOS\Shiftum42\Skins\Current\clock.png +C:\ShiftOS\Shiftum42\Skins\Current\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Current\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Current\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Current\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Current\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Current\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Current\borderright.png +C:\ShiftOS\Shiftum42\Skins\Current\borderright.png +C:\ShiftOS\Shiftum42\Skins\Current\borderright.png +C:\ShiftOS\Shiftum42\Skins\Current\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Current\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Current\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Current\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar button.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar button.png +C:\ShiftOS\Shiftum42\Skins\Current\taskbar button.png + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/startbutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/startbutton.png Binary files differnew file mode 100644 index 0000000..f9906f6 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/startbutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar button.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar button.png Binary files differnew file mode 100644 index 0000000..acfa77c --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar button.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar.png Binary files differnew file mode 100644 index 0000000..7939428 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/taskbar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebar.png Binary files differnew file mode 100644 index 0000000..021079a --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarleft.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarleft.png Binary files differnew file mode 100644 index 0000000..bc4fbc0 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarleft.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarright.png b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarright.png Binary files differnew file mode 100644 index 0000000..99b5c9b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Current/titlebarright.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/SKN-version b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/SKN-version new file mode 100644 index 0000000..231d1c1 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/SKN-version @@ -0,0 +1,3 @@ +Name of skinning system used to create this skn file: +2.0 disposal-free skinning +Skinning system created by william.1008 on December 2014, based on 1.0 system by DevX diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtn b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtn Binary files differnew file mode 100644 index 0000000..5ed60ce --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnclick Binary files differnew file mode 100644 index 0000000..5ed60ce --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnhover Binary files differnew file mode 100644 index 0000000..5ed60ce --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/closebtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/data.dat b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/data.dat new file mode 100644 index 0000000..c7c04fa --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/data.dat @@ -0,0 +1,201 @@ +ShiftOS skin data - Beware: Editing may result in skinning errors +22 +22 +22 +22 +22 +22 +30 +5 +2 +5 +26 +5 +52 +2 +False +5 +4 +4 +16777215 +-16777216 +-16777216 +-16777216 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +-8355712 +-8355712 +-16777216 +-16777216 +Microsoft Sans Serif +10 +1 +Left +3 +24 +-1 +-8355712 +-15845476 +24 +Top +-1 +-8355712 +3 +10 +Byington +1 +-16751616 +-16751616 +-5103070 +-12799119 +-1 +24 +10 +Byington +1 +Simplinton +Left +100 +3 +4 +16 +20 +185 +-16777216 +-11861886 +10 +Byington +0 +16 +2 +4 +2 +8 + + + + + + + + + +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +-1 +Byington +10 +0 +False + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +End of skin data diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/desktoppanel b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/desktoppanel Binary files differnew file mode 100644 index 0000000..4b5c462 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/desktoppanel diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtn b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtn Binary files differnew file mode 100644 index 0000000..6a985a7 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnclick Binary files differnew file mode 100644 index 0000000..6a985a7 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnhover Binary files differnew file mode 100644 index 0000000..6a985a7 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/minbtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelbutton b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelbutton Binary files differnew file mode 100644 index 0000000..e8acc70 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelbutton diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelclock b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelclock Binary files differnew file mode 100644 index 0000000..4b5c462 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/panelclock diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtn b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtn Binary files differnew file mode 100644 index 0000000..cecb228 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnclick Binary files differnew file mode 100644 index 0000000..cecb228 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnhover Binary files differnew file mode 100644 index 0000000..cecb228 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/rollbtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/titlebar b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/titlebar Binary files differnew file mode 100644 index 0000000..4b5c462 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Loaded/titlebar diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/SKN-version b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/SKN-version Binary files differnew file mode 100644 index 0000000..541db4f --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/SKN-version diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/background.jpg b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/background.jpg Binary files differnew file mode 100644 index 0000000..4c771d6 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/background.jpg diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderbottom.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderbottom.png Binary files differnew file mode 100644 index 0000000..dc504e4 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderbottom.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderleft.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderleft.png Binary files differnew file mode 100644 index 0000000..3508737 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderleft.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderright.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderright.png Binary files differnew file mode 100644 index 0000000..0cc9aeb --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/borderright.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomleftcorner.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomleftcorner.png Binary files differnew file mode 100644 index 0000000..c6f3ef1 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomleftcorner.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomrightcorner.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomrightcorner.png Binary files differnew file mode 100644 index 0000000..a6d56aa --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/bottomrightcorner.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/clock.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/clock.png Binary files differnew file mode 100644 index 0000000..b685993 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/clock.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtn b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtn Binary files differnew file mode 100644 index 0000000..44bf7ef --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnclick Binary files differnew file mode 100644 index 0000000..44bf7ef --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnhover Binary files differnew file mode 100644 index 0000000..44bf7ef --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebutton.png Binary files differnew file mode 100644 index 0000000..6f19d9a --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/closebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/data.dat b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/data.dat new file mode 100644 index 0000000..c7c04fa --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/data.dat @@ -0,0 +1,201 @@ +ShiftOS skin data - Beware: Editing may result in skinning errors +22 +22 +22 +22 +22 +22 +30 +5 +2 +5 +26 +5 +52 +2 +False +5 +4 +4 +16777215 +-16777216 +-16777216 +-16777216 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +16777215 +-8355712 +-8355712 +-16777216 +-16777216 +Microsoft Sans Serif +10 +1 +Left +3 +24 +-1 +-8355712 +-15845476 +24 +Top +-1 +-8355712 +3 +10 +Byington +1 +-16751616 +-16751616 +-5103070 +-12799119 +-1 +24 +10 +Byington +1 +Simplinton +Left +100 +3 +4 +16 +20 +185 +-16777216 +-11861886 +10 +Byington +0 +16 +2 +4 +2 +8 + + + + + + + + + +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +3 +-1 +Byington +10 +0 +False + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +End of skin data diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/desktoppanel b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/desktoppanel Binary files differnew file mode 100644 index 0000000..6c5d190 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/desktoppanel diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/maximizebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/maximizebutton.png Binary files differnew file mode 100644 index 0000000..a6351f0 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/maximizebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtn b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtn Binary files differnew file mode 100644 index 0000000..c1b08b4 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnclick Binary files differnew file mode 100644 index 0000000..c1b08b4 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnhover Binary files differnew file mode 100644 index 0000000..c1b08b4 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minbtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minimizebutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minimizebutton.png Binary files differnew file mode 100644 index 0000000..69982b8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/minimizebutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelbutton b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelbutton Binary files differnew file mode 100644 index 0000000..a13141b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelbutton diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelclock b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelclock Binary files differnew file mode 100644 index 0000000..6c5d190 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/panelclock diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtn b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtn Binary files differnew file mode 100644 index 0000000..280a6c8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtn diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnclick b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnclick Binary files differnew file mode 100644 index 0000000..280a6c8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnclick diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnhover b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnhover Binary files differnew file mode 100644 index 0000000..280a6c8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/rollbtnhover diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/skindata.dat b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/skindata.dat new file mode 100644 index 0000000..992e53d --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/skindata.dat @@ -0,0 +1,201 @@ +-8355712 +-8355712 +4 +22 +-16777216 +17 +17 +4 +3 +-1 +3 +24 +10 +Arial +1 +-8355712 +-14790247 +28 +Bottom +-16777216 +-8355712 +5 +11 +Trebuchet MS +0 +-8388480 +-8355712 +-2300161 +-7876885 +-16777216 +28 +10 +Byington +1 +Applications +Left +-16777216 +17 +17 +24 +3 +4 +3 +True +140 +-1 +-1 +60 +-8355712 +-8355712 +-8355712 +-8355712 +-8355712 +3 +4 +16 +16 +22 +170 +-16777216 +-16777216 +10 +Arial +0 +22 +3 +4 +4 +5 +-16777216 +17 +17 +40 +3 + + + + + + + + + + + + + + + + + + + + + + + + + + +C:\ShiftOS\Shiftum42\Skins\Preview\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\closebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebar.png +C:\ShiftOS\Shiftum42\Skins\Preview\background.jpg +C:\ShiftOS\Shiftum42\Skins\Preview\background.jpg +C:\ShiftOS\Shiftum42\Skins\Preview\background.jpg +C:\ShiftOS\Shiftum42\Skins\Preview\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\maximizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarright.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\titlebarleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar.png +C:\ShiftOS\Shiftum42\Skins\Preview\clock.png +C:\ShiftOS\Shiftum42\Skins\Preview\clock.png +C:\ShiftOS\Shiftum42\Skins\Preview\clock.png +C:\ShiftOS\Shiftum42\Skins\Preview\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\startbutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderleft.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderright.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderright.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderright.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Preview\borderbottom.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomrightcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\bottomleftcorner.png +C:\ShiftOS\Shiftum42\Skins\Preview\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\minimizebutton.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar button.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar button.png +C:\ShiftOS\Shiftum42\Skins\Preview\taskbar button.png + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/startbutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/startbutton.png Binary files differnew file mode 100644 index 0000000..f9906f6 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/startbutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar button.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar button.png Binary files differnew file mode 100644 index 0000000..acfa77c --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar button.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar.png Binary files differnew file mode 100644 index 0000000..7939428 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/taskbar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar Binary files differnew file mode 100644 index 0000000..6c5d190 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar.png Binary files differnew file mode 100644 index 0000000..021079a --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarleft.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarleft.png Binary files differnew file mode 100644 index 0000000..bc4fbc0 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarleft.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarright.png b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarright.png Binary files differnew file mode 100644 index 0000000..99b5c9b --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Preview/titlebarright.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/128535-simple-red-square-icon-business-clock1.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/128535-simple-red-square-icon-business-clock1.png Binary files differnew file mode 100644 index 0000000..49da8f8 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/128535-simple-red-square-icon-business-clock1.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/Wallpaper.bmp b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/Wallpaper.bmp Binary files differnew file mode 100644 index 0000000..864bc42 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/Wallpaper.bmp diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/background.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/background.png Binary files differnew file mode 100644 index 0000000..42e5711 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/background.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close actual.pic b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close actual.pic Binary files differnew file mode 100644 index 0000000..0103fda --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close actual.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close button.pic b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close button.pic Binary files differnew file mode 100644 index 0000000..2eaef81 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/close button.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/panelbutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/panelbutton.png Binary files differnew file mode 100644 index 0000000..3232f2d --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/panelbutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/rightborder.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/rightborder.png Binary files differnew file mode 100644 index 0000000..8da5f19 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/rightborder.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.pic b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.pic Binary files differnew file mode 100644 index 0000000..09b6c06 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.pic diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.png Binary files differnew file mode 100644 index 0000000..9c67376 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/startbutton.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/taskbar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/taskbar.png Binary files differnew file mode 100644 index 0000000..6ef0199 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/taskbar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/titlebar.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/titlebar.png Binary files differnew file mode 100644 index 0000000..0d56bf0 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/titlebar.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/toprightcorner.png b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/toprightcorner.png Binary files differnew file mode 100644 index 0000000..0de89ec --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/toprightcorner.png diff --git a/development-save-file/ShiftOS/Shiftum42/Skins/Temp/ttbutton.pic b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/ttbutton.pic Binary files differnew file mode 100644 index 0000000..111dc48 --- /dev/null +++ b/development-save-file/ShiftOS/Shiftum42/Skins/Temp/ttbutton.pic diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Animals.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Animals.lst new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Animals.lst diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Car Brands.lst diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Countries.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Countries.lst new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Countries.lst diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst new file mode 100644 index 0000000..840fc82 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Elements.lst @@ -0,0 +1,11 @@ +hydrogen +helium +lithium +lead +gold +neon +nitrogen +silver +uranium +plutonium +thorium diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Fruits.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Fruits.lst new file mode 100644 index 0000000..397b9a9 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Fruits.lst @@ -0,0 +1,10 @@ +banana +apple +pear +orange +strawberry +tomato +star fruit +grape +pineapple +grapefruit diff --git a/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/development-save-file/ShiftOS/SoftwareData/KnowledgeInput/Game Consoles.lst diff --git a/infobox.vb b/infobox.vb deleted file mode 100644 index 3c93c14..0000000 --- a/infobox.vb +++ /dev/null @@ -1,380 +0,0 @@ -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 - - Private Sub Template_Load(sender As Object, e As EventArgs) Handles MyBase.Load - justopened = True - makeinfobox() - setuptitlebar() - setupborders() - ShiftOSDesktop.setcolours() - Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 - Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 - setskin() - - ShiftOSDesktop.pnlpanelbuttoninfobox.SendToBack() - ShiftOSDesktop.setuppanelbuttons() - ShiftOSDesktop.setpanelbuttonappearnce(ShiftOSDesktop.pnlpanelbuttoninfobox, ShiftOSDesktop.tbinfoboxicon, ShiftOSDesktop.tbinfoboxtext, True) - ShiftOSDesktop.programsopen = ShiftOSDesktop.programsopen + 1 - - My.Computer.Audio.Play(My.Resources.infobox, AudioPlayMode.Background) - End Sub - - Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown, btnok.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 - 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 = ShiftOSDesktop.skinclosebutton(1) - End Sub - - Private Sub closebutton_MouseLeave(sender As Object, e As EventArgs) Handles closebutton.MouseLeave - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0) - End Sub - - Private Sub closebutton_MouseDown(sender As Object, e As EventArgs) Handles closebutton.MouseDown - closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(2) - End Sub - - Private Sub minimizebutton_Click(sender As Object, e As EventArgs) Handles minimizebutton.Click - ShiftOSDesktop.minimizeprogram(Me) - 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 = ShiftOSDesktop.skinrollupbutton(1) - End Sub - - Private Sub rollupbutton_MouseLeave(sender As Object, e As EventArgs) Handles rollupbutton.MouseLeave - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0) - End Sub - - Private Sub rollupbutton_MouseDown(sender As Object, e As EventArgs) Handles rollupbutton.MouseDown - rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(2) - 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 = ShiftOSDesktop.windowbordersize - pgright.Width = ShiftOSDesktop.windowbordersize - pgbottom.Height = ShiftOSDesktop.windowbordersize - titlebar.Height = ShiftOSDesktop.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 + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - oldbordersize = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.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 = ShiftOSDesktop.windowbordersize - oldtitlebarheight = ShiftOSDesktop.titlebarheight - Me.Size = New Size(Me.Width, Me.Height + ShiftOSDesktop.titlebarheight - 30) - Me.Size = New Size(Me.Width + ShiftOSDesktop.windowbordersize + ShiftOSDesktop.windowbordersize, Me.Height + ShiftOSDesktop.windowbordersize) - rolldownsize = Me.Height - If needtorollback = True Then Me.Height = titlebar.Height : pgleft.Hide() : pgbottom.Hide() : pgright.Hide() - Me.Show() - End If - End If - - If ShiftOSDesktop.showwindowcorners = True Then - pgtoplcorner.Show() - pgtoprcorner.Show() - pgtoprcorner.Width = ShiftOSDesktop.titlebarcornerwidth - pgtoplcorner.Width = ShiftOSDesktop.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(ShiftOSDesktop.titletextfont, ShiftOSDesktop.titletextsize, ShiftOSDesktop.titletextstyle) - lbtitletext.Show() - End If - - If ShiftOSDesktop.boughtclosebutton = False Then - closebutton.Hide() - Else - closebutton.BackColor = ShiftOSDesktop.closebuttoncolour - closebutton.Height = ShiftOSDesktop.closebuttonheight - closebutton.Width = ShiftOSDesktop.closebuttonwidth - closebutton.Show() - End If - - If ShiftOSDesktop.boughtrollupbutton = False Then - rollupbutton.Hide() - Else - rollupbutton.BackColor = ShiftOSDesktop.rollupbuttoncolour - rollupbutton.Height = ShiftOSDesktop.rollupbuttonheight - rollupbutton.Width = ShiftOSDesktop.rollupbuttonwidth - rollupbutton.Show() - End If - - If ShiftOSDesktop.boughtminimizebutton = False Then - minimizebutton.Hide() - Else - minimizebutton.BackColor = ShiftOSDesktop.minimizebuttoncolour - minimizebutton.Height = ShiftOSDesktop.minimizebuttonheight - minimizebutton.Width = ShiftOSDesktop.minimizebuttonwidth - minimizebutton.Show() - End If - - If ShiftOSDesktop.boughtwindowborders = True Then - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - Else - closebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.closebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - closebutton.Size.Width, ShiftOSDesktop.closebuttontop) - rollupbutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.rollupbuttonside - pgtoplcorner.Width - pgtoprcorner.Width - rollupbutton.Size.Width, ShiftOSDesktop.rollupbuttontop) - minimizebutton.Location = New Point(titlebar.Size.Width - ShiftOSDesktop.minimizebuttonside - pgtoplcorner.Width - pgtoprcorner.Width - minimizebutton.Size.Width, ShiftOSDesktop.minimizebuttontop) - Select Case ShiftOSDesktop.titletextposition - Case "Left" - lbtitletext.Location = New Point(ShiftOSDesktop.titletextside + pgtoplcorner.Width, ShiftOSDesktop.titletexttop) - Case "Centre" - lbtitletext.Location = New Point((titlebar.Width / 2) - lbtitletext.Width / 2, ShiftOSDesktop.titletexttop) - End Select - lbtitletext.ForeColor = ShiftOSDesktop.titletextcolour - End If - - If ShiftOSDesktop.boughtinfoboxicon = True Then - 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 setskin() - If ShiftOSDesktop.skinclosebutton(0) Is Nothing Then Else closebutton.BackgroundImage = ShiftOSDesktop.skinclosebutton(0).Clone - closebutton.BackgroundImageLayout = ShiftOSDesktop.skinclosebuttonstyle - If ShiftOSDesktop.skintitlebar(0) Is Nothing Then Else titlebar.BackgroundImage = ShiftOSDesktop.skintitlebar(0).Clone - titlebar.BackgroundImageLayout = ShiftOSDesktop.skintitlebarstyle - If ShiftOSDesktop.skinrollupbutton(0) Is Nothing Then Else rollupbutton.BackgroundImage = ShiftOSDesktop.skinrollupbutton(0).Clone - rollupbutton.BackgroundImageLayout = ShiftOSDesktop.skinrollupbuttonstyle - If ShiftOSDesktop.skintitlebarleftcorner(0) Is Nothing Then Else pgtoplcorner.BackgroundImage = ShiftOSDesktop.skintitlebarleftcorner(0).Clone - pgtoplcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarleftcornerstyle - If ShiftOSDesktop.skintitlebarrightcorner(0) Is Nothing Then Else pgtoprcorner.BackgroundImage = ShiftOSDesktop.skintitlebarrightcorner(0).Clone - pgtoprcorner.BackgroundImageLayout = ShiftOSDesktop.skintitlebarrightcornerstyle - If ShiftOSDesktop.skinminimizebutton(0) Is Nothing Then Else minimizebutton.BackgroundImage = ShiftOSDesktop.skinminimizebutton(0).Clone - minimizebutton.BackgroundImageLayout = ShiftOSDesktop.skinminimizebuttonstyle - - '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 - - 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() - Else - 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() - 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() - End Select - End Sub -End Class
\ No newline at end of file diff --git a/integer.vb b/integer.vb deleted file mode 100644 index 5f28270..0000000 --- a/integer.vb +++ /dev/null @@ -1 +0,0 @@ -
\ No newline at end of file |
