mirror of
https://github.com/TheUltimateHacker/ShiftOS.git
synced 2025-01-22 16:12:14 +00:00
4caacce50c
ShiftOS is a game about evolving an experimental operating system called "ShiftOS" from a completely black and white text based command line based OS to a fully graphical operating system filled with advanced features and beautiful colours. The level of customization will exceed the levels of real world operating systems
4092 lines
No EOL
242 KiB
VB.net
4092 lines
No EOL
242 KiB
VB.net
Public Class ShiftOSDesktop
|
|
Public codepoints As Integer
|
|
Public log As String
|
|
Public forceclose As Boolean = False
|
|
Public movablewindownumber As Integer = 50
|
|
Public terminalfullscreen As Boolean = True
|
|
Public unitymode As Boolean = False
|
|
Public savelines(2000) As String
|
|
Public loadlines(2000) As String
|
|
Public skinlines(200) As String
|
|
Public newgame As Boolean = False
|
|
Public lastcolourpick As Color = Color.Gray
|
|
Public programsopen As Integer = 0
|
|
Private actualshiftversion As String = "0.0.7"
|
|
|
|
'Shiftorium Upgrades
|
|
Public boughttitlebar As Boolean = False
|
|
Public boughtgray As Boolean = False
|
|
Public boughtsecondspastmidnight As Boolean = False
|
|
Public boughtminutespastmidnight As Boolean = False
|
|
Public boughthourspastmidnight As Boolean = False
|
|
Public boughtcustomusername As Boolean = False
|
|
Public boughtwindowsanywhere As Boolean = False
|
|
Public boughtmultitasking As Boolean = False
|
|
Public boughtautoscrollterminal As Boolean = False
|
|
Public boughtmovablewindows As Boolean = False
|
|
Public boughtdraggablewindows As Boolean = False
|
|
Public boughtwindowborders As Boolean = False
|
|
Public boughtpmandam As Boolean = False
|
|
Public boughtminuteaccuracytime As Boolean = False
|
|
Public boughtsplitsecondtime As Boolean = False
|
|
Public boughttitletext As Boolean = False
|
|
Public boughtclosebutton As Boolean = False
|
|
Public boughtdesktoppanel As Boolean = False
|
|
Public boughtclock As Boolean = False
|
|
Public boughtwindowedterminal As Boolean = False
|
|
Public boughtapplaunchermenu As Boolean = False
|
|
Public boughtalknowledgeinput As Boolean = False
|
|
Public boughtalclock As Boolean = False
|
|
Public boughtalshiftorium As Boolean = False
|
|
Public boughtapplaunchershutdown As Boolean = False
|
|
Public boughtdesktoppanelclock As Boolean = False
|
|
Public boughtterminalscrollbar As Boolean = False
|
|
Public boughtkiaddons As Boolean = False
|
|
Public boughtkicarbrands As Boolean = False
|
|
Public boughtkigameconsoles As Boolean = False
|
|
Public boughtshifter As Boolean = False
|
|
Public boughtalshifter As Boolean = False
|
|
Public boughtrollupcommand As Boolean = False
|
|
Public boughtrollupbutton As Boolean = False
|
|
Public boughtshiftdesktop As Boolean = False
|
|
Public boughtshiftpanelclock As Boolean = False
|
|
Public boughtshiftapplauncher As Boolean = False
|
|
Public boughtshiftdesktoppanel As Boolean = False
|
|
Public boughtshifttitlebar As Boolean = False
|
|
Public boughtshifttitletext As Boolean = False
|
|
Public boughtshifttitlebuttons As Boolean = False
|
|
Public boughtshiftborders As Boolean = False
|
|
Public boughtgray2 As Boolean = False
|
|
Public boughtgray3 As Boolean = False
|
|
Public boughtgray4 As Boolean = False
|
|
Public boughtanycolour As Boolean = False
|
|
Public boughtanycolour2 As Boolean = False
|
|
Public boughtanycolour3 As Boolean = False
|
|
Public boughtanycolour4 As Boolean = False
|
|
Public boughtpurple As Boolean = False
|
|
Public boughtpurple2 As Boolean = False
|
|
Public boughtpurple3 As Boolean = False
|
|
Public boughtpurple4 As Boolean = False
|
|
Public boughtblue As Boolean = False
|
|
Public boughtblue2 As Boolean = False
|
|
Public boughtblue3 As Boolean = False
|
|
Public boughtblue4 As Boolean = False
|
|
Public boughtgreen As Boolean = False
|
|
Public boughtgreen2 As Boolean = False
|
|
Public boughtgreen3 As Boolean = False
|
|
Public boughtgreen4 As Boolean = False
|
|
Public boughtyellow As Boolean = False
|
|
Public boughtyellow2 As Boolean = False
|
|
Public boughtyellow3 As Boolean = False
|
|
Public boughtyellow4 As Boolean = False
|
|
Public boughtorange As Boolean = False
|
|
Public boughtorange2 As Boolean = False
|
|
Public boughtorange3 As Boolean = False
|
|
Public boughtorange4 As Boolean = False
|
|
Public boughtbrown As Boolean = False
|
|
Public boughtbrown2 As Boolean = False
|
|
Public boughtbrown3 As Boolean = False
|
|
Public boughtbrown4 As Boolean = False
|
|
Public boughtred As Boolean = False
|
|
Public boughtred2 As Boolean = False
|
|
Public boughtred3 As Boolean = False
|
|
Public boughtred4 As Boolean = False
|
|
Public boughtpink As Boolean = False
|
|
Public boughtpink2 As Boolean = False
|
|
Public boughtpink3 As Boolean = False
|
|
Public boughtpink4 As Boolean = False
|
|
'new 0.0.6 content
|
|
Public boughtpong As Boolean = False
|
|
Public boughtknowledgeinputicon As Boolean = False
|
|
Public boughtshiftericon As Boolean = False
|
|
Public boughtshiftoriumicon As Boolean = False
|
|
Public boughtclockicon As Boolean = False
|
|
Public boughtshutdownicon As Boolean = False
|
|
Public boughtpongicon As Boolean = False
|
|
Public boughtterminalicon As Boolean = False
|
|
Public boughtalpong As Boolean = False
|
|
Public boughtfileskimmer As Boolean = False
|
|
Public boughtalfileskimmer As Boolean = False
|
|
Public boughttextpad As Boolean = False
|
|
Public boughtaltextpad As Boolean = False
|
|
Public boughtfileskimmericon As Boolean = False
|
|
Public boughttextpadicon As Boolean = False
|
|
Public boughttextpadnew As Boolean = False
|
|
Public boughttextpadsave As Boolean = False
|
|
Public boughttextpadopen As Boolean = False
|
|
Public boughtfileskimmernewfolder As Boolean = False
|
|
Public boughtfileskimmerdelete As Boolean = False
|
|
Public boughtkielements As Boolean = False
|
|
Public boughtcolourpickericon As Boolean = False
|
|
Public boughtinfoboxicon As Boolean = False
|
|
'new 0.0.7 content
|
|
Public boughtskinloader As Boolean = False
|
|
Public boughtminimizebutton As Boolean = False
|
|
Public boughtpanelbuttons As Boolean = False
|
|
Public boughtshiftpanelbuttons As Boolean = False
|
|
Public boughtartpad As Boolean = False
|
|
Public boughtalartpad As Boolean = False
|
|
Public boughtartpadicon As Boolean = False
|
|
Public boughtskinning As Boolean = False
|
|
Public boughtminimizecommand As Boolean = False
|
|
Public boughtusefulpanelbuttons As Boolean = False
|
|
Public boughtunitymode As Boolean = False
|
|
Public boughtartpadpixellimit4 As Boolean = False
|
|
Public boughtartpadpixellimit8 As Boolean = False
|
|
Public boughtartpadpixellimit16 As Boolean = False
|
|
Public boughtartpadpixellimit64 As Boolean = False
|
|
Public boughtartpadpixellimit256 As Boolean = False
|
|
Public boughtartpadpixellimit1024 As Boolean = False
|
|
Public boughtartpadpixellimit4096 As Boolean = False
|
|
Public boughtartpadpixellimit16384 As Boolean = False
|
|
Public boughtartpadpixellimit65536 As Boolean = False
|
|
Public boughtartpadlimitlesspixels As Boolean = False
|
|
Public boughtartpad4colorpallets As Boolean = False
|
|
Public boughtartpad8colorpallets As Boolean = False
|
|
Public boughtartpad16colorpallets As Boolean = False
|
|
Public boughtartpad32colorpallets As Boolean = False
|
|
Public boughtartpad64colorpallets As Boolean = False
|
|
Public boughtartpad128colorpallets As Boolean = False
|
|
Public boughtartpadcustompallets As Boolean = False
|
|
Public boughtartpadnew As Boolean = False
|
|
Public boughtartpadpixelplacer As Boolean = False
|
|
Public boughtartpadpixelplacermovementmode As Boolean = False
|
|
Public boughtartpadpencil As Boolean = False
|
|
Public boughtartpadpaintbrush As Boolean = False
|
|
Public boughtartpadlinetool As Boolean = False
|
|
Public boughtartpadovaltool As Boolean = False
|
|
Public boughtartpadrectangletool As Boolean = False
|
|
Public boughtartpaderaser As Boolean = False
|
|
Public boughtartpadfilltool As Boolean = False
|
|
Public boughtartpadtexttool As Boolean = False
|
|
Public boughtartpadundo As Boolean = False
|
|
Public boughtartpadredo As Boolean = False
|
|
Public boughtartpadsave As Boolean = False
|
|
Public boughtartpadload As Boolean = False
|
|
'new 0.0.8 features
|
|
Public boughtresizablewindows As Boolean = 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
|
|
|
|
'new 0.0.9 features
|
|
Public boughtskinstates As Boolean = False
|
|
|
|
'Colour Picker Memories
|
|
Public anymemory(15) As Color
|
|
Public graymemory(15) As Color
|
|
Public purplememory(15) As Color
|
|
Public bluememory(15) As Color
|
|
Public greenmemory(15) As Color
|
|
Public yellowmemory(15) As Color
|
|
Public orangememory(15) As Color
|
|
Public brownmemory(15) As Color
|
|
Public redmemory(15) As Color
|
|
Public pinkmemory(15) As Color
|
|
|
|
'ShiftOS UI Settings
|
|
Public titlebarcolour As Color = Color.Gray
|
|
Public windowbordercolour As Color = Color.Gray
|
|
Public windowbordersize As Integer = 2
|
|
Public titlebarheight As Integer = 30
|
|
Public closebuttoncolour As Color = Color.Black
|
|
Public closebuttonheight As Integer = 22
|
|
Public closebuttonwidth As Integer = 22
|
|
Public closebuttonside As Integer = 5
|
|
Public closebuttontop As Integer = 4
|
|
Public titletextcolour As Color = Color.White
|
|
Public titletexttop As Integer = 7
|
|
Public titletextside As Integer = 4
|
|
Public titletextsize As Integer = 11
|
|
Public titletextfont As String = "Felix Titling"
|
|
Public titletextstyle As FontStyle = FontStyle.Bold
|
|
Public desktoppanelcolour As Color = Color.Gray
|
|
Public desktopbackgroundcolour As Color = Color.Black
|
|
Public desktoppanelheight As Integer = 24
|
|
Public desktoppanelposition As String = "Top"
|
|
Public clocktextcolour As Color = Color.Black
|
|
Public clockbackgroundcolor As Color = Color.Gray
|
|
Public panelclocktexttop As Integer = 0
|
|
Public panelclocktextsize As Integer = 14
|
|
Public panelclocktextfont As String = "Trebuchet MS"
|
|
Public panelclocktextstyle As FontStyle = FontStyle.Regular
|
|
Public applauncherbuttoncolour As Color = Color.Gray
|
|
Public applauncherbuttonclickedcolour = Color.Gray
|
|
Public applauncherbackgroundcolour As Color = Color.Gray
|
|
Public applaunchermouseovercolour As Color = Color.Gray
|
|
Public applicationsbuttontextcolour As Color = Color.Black
|
|
Public applicationbuttonheight As Integer = 24
|
|
Public applicationbuttontextsize As Integer = 10
|
|
Public applicationbuttontextfont As String = "Byington"
|
|
Public applicationbuttontextstyle As FontStyle = FontStyle.Bold
|
|
Public applicationlaunchername As String = "Applications"
|
|
Public titletextposition As String = "Left"
|
|
Public rollupbuttoncolour As Color = Color.Black
|
|
Public rollupbuttonheight As Integer = 22
|
|
Public rollupbuttonwidth As Integer = 22
|
|
Public rollupbuttonside As Integer = 32
|
|
Public rollupbuttontop As Integer = 4
|
|
'new 0.0.7
|
|
Public titlebariconside As Integer = 8
|
|
Public titlebaricontop As Integer = 8
|
|
Public showwindowcorners As Boolean = False
|
|
Public titlebarcornerwidth As Integer = 2
|
|
Public titlebarrightcornercolour As Color = Color.White
|
|
Public titlebarleftcornercolour As Color = Color.White
|
|
Public applaunchermenuholderwidth As Integer = 100
|
|
Public windowborderleftcolour As Color = Color.Gray
|
|
Public windowborderrightcolour As Color = Color.Gray
|
|
Public windowborderbottomcolour As Color = Color.Gray
|
|
Public windowborderbottomrightcolour As Color = Color.Gray
|
|
Public windowborderbottomleftcolour As Color = Color.Gray
|
|
Public fileopenerlastdirectory As String
|
|
Public panelbuttonicontop As Integer = 3
|
|
Public panelbuttoniconside As Integer = 4
|
|
'Public panelbuttoniconsize As Integer = 16 'duplicated
|
|
'Public panelbuttoniconsize As Integer = 16 'duplicated
|
|
Public panelbuttonheight As Integer = 22
|
|
Public panelbuttonwidth As Integer = 186
|
|
Public panelbuttoncolour As Color = Color.Black
|
|
Public panelbuttontextcolour As Color = Color.White
|
|
Public panelbuttontextsize As Integer = 10
|
|
Public panelbuttontextfont As String = "Microsoft Sans Serif"
|
|
Public panelbuttontextstyle As FontStyle = FontStyle.Bold
|
|
Public panelbuttontextside As Integer = 22
|
|
Public panelbuttontexttop As Integer = 2
|
|
Public panelbuttongap As Integer = 1
|
|
Public panelbuttonfromtop As Integer = 1
|
|
Public panelbuttoninitialgap As Integer = 5
|
|
Public minimizebuttoncolour As Color = Color.Black
|
|
Public minimizebuttonheight As Integer = 22
|
|
Public minimizebuttonwidth As Integer = 22
|
|
Public minimizebuttonside As Integer = 59
|
|
Public minimizebuttontop As Integer = 4
|
|
|
|
|
|
'ShiftOS Skin Settings
|
|
'finsih up checking for skin changes with states in the clock app before copying across to other apps
|
|
Public globaltransparencycolour As Color = Color.FromArgb(1, 0, 1)
|
|
Public skinimages(100) As String
|
|
Public skinclosebutton(2) As Image
|
|
Public skinclosebuttonstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skintitlebar(2) As Image
|
|
Public skintitlebarstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skindesktopbackground(2) As Image
|
|
Public skindesktopbackgroundstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinrollupbutton(2) As Image
|
|
Public skinrollupbuttonstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skintitlebarrightcorner(2) As Image
|
|
Public skintitlebarrightcornerstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skintitlebarleftcorner(2) As Image
|
|
Public skintitlebarleftcornerstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skindesktoppanel(2) As Image
|
|
Public skindesktoppanelstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skindesktoppaneltime(2) As Image
|
|
Public skindesktoppaneltimestyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinapplauncherbutton(2) As Image
|
|
Public skinapplauncherbuttonstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinwindowborderleft(2) As Image
|
|
Public skinwindowborderleftstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinwindowborderright(2) As Image
|
|
Public skinwindowborderrightstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinwindowborderbottom(2) As Image
|
|
Public skinwindowborderbottomstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinwindowborderbottomright(2) As Image
|
|
Public skinwindowborderbottomrightstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinwindowborderbottomleft(2) As Image
|
|
Public skinwindowborderbottomleftstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinpanelbutton(2) As Image
|
|
Public skinpanelbuttonstyle As ImageLayout = ImageLayout.Stretch
|
|
Public skinminimizebutton(2) As Image
|
|
Public skinminimizebuttonstyle As ImageLayout = ImageLayout.Stretch
|
|
|
|
'Program settings
|
|
Public artpadcolorpalletwidth As Integer = 105
|
|
Public artpadcolorpalletheight As Integer = 69
|
|
Public artpadcolorpalletsidegap As Integer = 4
|
|
Public artpadcolorpallettopgap As Integer = 4
|
|
Public artpadvisiblepallets As Integer = 2
|
|
Public artpadpixellimit As Integer = 2
|
|
Public artpadcolourpallets(128) As Color
|
|
|
|
Public webbrowserhomepage As String = "www.google.com"
|
|
|
|
Public iconmanagericondatalines(50) As String
|
|
|
|
Public bitnotebalance As Decimal = 2.64028
|
|
Public bitnotebalanceappscape As Decimal = 0.0
|
|
Public bitnoteaddress As String = "1LgZUWQNYWZ7Qhc1hScZieC3GWnPLzaqSd"
|
|
Public bitnoteaddressappscape As String = "1JB97iocfdv6zVMeKxXAHdahbfdoYWNyUh"
|
|
|
|
Public downloadspeedcap As Integer = 32
|
|
|
|
'Main ShiftOS settings
|
|
Public username As String = "user"
|
|
Public osname As String = "shiftos"
|
|
Public artpadname As String = "Artpad"
|
|
Public audioplayername As String = "Audio Player"
|
|
Public calculatorname As String = "Calculator"
|
|
Public clockname As String = "Clock"
|
|
Public colourpickername As String = "Colour Picker"
|
|
Public fileopenername As String = "File Opener"
|
|
Public filesavername As String = "File Saver"
|
|
Public fileskimmername As String = "File Skimmer"
|
|
Public graphicpickername As String = "Graphic Picker"
|
|
Public knowledgeinputname As String = "Knowledge Input"
|
|
Public pongname As String = "Pong"
|
|
Public shiftername As String = "Shifter"
|
|
Public shiftoriumname As String = "Shiftorium"
|
|
Public skinloadername As String = "Skin Loader"
|
|
Public terminalname As String = "Terminal"
|
|
Public textpadname As String = "TextPad"
|
|
Public videoplayername As String = "Video Player"
|
|
Public webbrowsername As String = "Web Browser"
|
|
Public namechangername As String = "Name Changer"
|
|
Public iconmanagername As String = "Icon Manager"
|
|
Public bitnotewalletname As String = "Bitnote Wallet"
|
|
Public bitnotediggername As String = "Bitnote Digger"
|
|
Public skinshiftername As String = "Skin Shifter"
|
|
Public shiftnetname As String = "Shiftnet"
|
|
Public downloadername As String = "Downloader"
|
|
|
|
'Icons
|
|
Public titlebariconsize As Integer = 16
|
|
Public panelbuttoniconsize As Integer = 16
|
|
Public launchericonsize As Integer = 16
|
|
|
|
Public artpadicontitlebar As Image = My.Resources.iconArtpad
|
|
Public audioplayericontitlebar As Image = My.Resources.iconAudioPlayer
|
|
Public calculatoricontitlebar As Image = My.Resources.iconCalculator
|
|
Public clockicontitlebar As Image = My.Resources.iconClock
|
|
Public colourpickericontitlebar As Image = My.Resources.iconColourPicker
|
|
Public fileopenericontitlebar As Image = My.Resources.iconFileOpener
|
|
Public filesavericontitlebar As Image = My.Resources.iconFileSaver
|
|
Public fileskimmericontitlebar As Image = My.Resources.iconFileSkimmer
|
|
Public graphicpickericontitlebar As Image = My.Resources.iconGraphicPicker
|
|
Public infoboxicontitlebar As Image = My.Resources.iconInfoBox
|
|
Public knowledgeinputicontitlebar As Image = My.Resources.iconKnowledgeInput
|
|
Public pongicontitlebar As Image = My.Resources.iconPong
|
|
Public shiftericontitlebar As Image = My.Resources.iconShifter
|
|
Public shiftoriumicontitlebar As Image = My.Resources.iconShiftorium
|
|
Public skinloadericontitlebar As Image = My.Resources.iconSkinLoader
|
|
Public terminalicontitlebar As Image = My.Resources.iconTerminal
|
|
Public textpadicontitlebar As Image = My.Resources.iconTextPad
|
|
Public videoplayericontitlebar As Image = My.Resources.iconVideoPlayer
|
|
Public webbrowsericontitlebar As Image = My.Resources.iconWebBrowser
|
|
Public namechangericontitlebar As Image = My.Resources.iconNameChanger
|
|
Public iconmanagericontitlebar As Image = My.Resources.iconIconManager
|
|
Public bitnotewalleticontitlebar As Image = My.Resources.iconBitnoteWallet
|
|
Public bitnotediggericontitlebar As Image = My.Resources.iconBitnoteDigger
|
|
Public skinshiftericontitlebar As Image = My.Resources.iconSkinShifter
|
|
Public shiftneticontitlebar As Image = My.Resources.iconShiftnet
|
|
Public downloadericontitlebar As Image = My.Resources.iconDownloader
|
|
|
|
Public artpadiconpanelbutton As Image = My.Resources.iconArtpad
|
|
Public audioplayericonpanelbutton As Image = My.Resources.iconAudioPlayer
|
|
Public calculatoriconpanelbutton As Image = My.Resources.iconCalculator
|
|
Public clockiconpanelbutton As Image = My.Resources.iconClock
|
|
Public colourpickericonpanelbutton As Image = My.Resources.iconColourPicker
|
|
Public fileopenericonpanelbutton As Image = My.Resources.iconFileOpener
|
|
Public filesavericonpanelbutton As Image = My.Resources.iconFileSaver
|
|
Public fileskimmericonpanelbutton As Image = My.Resources.iconFileSkimmer
|
|
Public graphicpickericonpanelbutton As Image = My.Resources.iconGraphicPicker
|
|
Public infoboxiconpanelbutton As Image = My.Resources.iconInfoBox
|
|
Public knowledgeinputiconpanelbutton As Image = My.Resources.iconKnowledgeInput
|
|
Public pongiconpanelbutton As Image = My.Resources.iconPong
|
|
Public shiftericonpanelbutton As Image = My.Resources.iconShifter
|
|
Public shiftoriumiconpanelbutton As Image = My.Resources.iconShiftorium
|
|
Public skinloadericonpanelbutton As Image = My.Resources.iconSkinLoader
|
|
Public terminaliconpanelbutton As Image = My.Resources.iconTerminal
|
|
Public textpadiconpanelbutton As Image = My.Resources.iconTextPad
|
|
Public videoplayericonpanelbutton As Image = My.Resources.iconVideoPlayer
|
|
Public webbrowsericonpanelbutton As Image = My.Resources.iconWebBrowser
|
|
Public namechangericonpanelbutton As Image = My.Resources.iconNameChanger
|
|
Public iconmanagericonpanelbutton As Image = My.Resources.iconIconManager
|
|
Public bitnotewalleticonpanelbutton As Image = My.Resources.iconBitnoteWallet
|
|
Public bitnotediggericonpanelbutton As Image = My.Resources.iconBitnoteDigger
|
|
Public skinshiftericonpanelbutton As Image = My.Resources.iconSkinShifter
|
|
Public shiftneticonpanelbutton As Image = My.Resources.iconShiftnet
|
|
Public downloadericonpanelbutton As Image = My.Resources.iconDownloader
|
|
|
|
Public artpadiconlauncher As Image = My.Resources.iconArtpad
|
|
Public audioplayericonlauncher As Image = My.Resources.iconAudioPlayer
|
|
Public calculatoriconlauncher As Image = My.Resources.iconCalculator
|
|
Public clockiconlauncher As Image = My.Resources.iconClock
|
|
Public colourpickericonlauncher As Image = My.Resources.iconColourPicker
|
|
Public fileopenericonlauncher As Image = My.Resources.iconFileOpener
|
|
Public filesavericonlauncher As Image = My.Resources.iconFileSaver
|
|
Public fileskimmericonlauncher As Image = My.Resources.iconFileSkimmer
|
|
Public graphicpickericonlauncher As Image = My.Resources.iconGraphicPicker
|
|
Public infoboxiconlauncher As Image = My.Resources.iconInfoBox
|
|
Public knowledgeinputiconlauncher As Image = My.Resources.iconKnowledgeInput
|
|
Public pongiconlauncher As Image = My.Resources.iconPong
|
|
Public shiftericonlauncher As Image = My.Resources.iconShifter
|
|
Public shiftoriumiconlauncher As Image = My.Resources.iconShiftorium
|
|
Public skinloadericonlauncher As Image = My.Resources.iconSkinLoader
|
|
Public terminaliconlauncher As Image = My.Resources.iconTerminal
|
|
Public textpadiconlauncher As Image = My.Resources.iconTextPad
|
|
Public videoplayericonlauncher As Image = My.Resources.iconVideoPlayer
|
|
Public webbrowsericonlauncher As Image = My.Resources.iconWebBrowser
|
|
Public namechangericonlauncher As Image = My.Resources.iconNameChanger
|
|
Public iconmanagericonlauncher As Image = My.Resources.iconIconManager
|
|
Public bitnotewalleticonlauncher As Image = My.Resources.iconBitnoteWallet
|
|
Public bitnotediggericonlauncher As Image = My.Resources.iconBitnoteDigger
|
|
Public skinshiftericonlauncher As Image = My.Resources.iconSkinShifter
|
|
Public shiftneticonlauncher As Image = My.Resources.iconShiftnet
|
|
Public downloadericonlauncher As Image = My.Resources.iconDownloader
|
|
|
|
Public shutdowniconlauncher As Image = My.Resources.iconshutdown
|
|
|
|
'Required for encryption of save files
|
|
Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Integer) As Integer
|
|
Public Const sSecretKey As String = "Password"
|
|
|
|
'When adding a new program you need to do the following:
|
|
'Copy over Template and Template Code
|
|
'Make program upmost/alway on top
|
|
'Add the panelbutton
|
|
'Add Open and Close command in terminal as well as info and commands such as move to
|
|
'Add desktop launcher menu item
|
|
'Add buy from shiftorium and lanucher buy from shiftorium
|
|
'Add to all ShiftOSDesktop.vb things
|
|
|
|
Public Sub savegame()
|
|
If boughttitlebar = True Then savelines(0) = 11 Else savelines(0) = 10
|
|
If boughtgray = True Then savelines(1) = 11 Else savelines(1) = 10
|
|
If boughtsecondspastmidnight = True Then savelines(2) = 11 Else savelines(2) = 10
|
|
If boughtminutespastmidnight = True Then savelines(3) = 11 Else savelines(3) = 10
|
|
If boughthourspastmidnight = True Then savelines(4) = 11 Else savelines(4) = 10
|
|
If boughtcustomusername = True Then savelines(5) = 11 Else savelines(5) = 10
|
|
If boughtwindowsanywhere = True Then savelines(6) = 11 Else savelines(6) = 10
|
|
If boughtmultitasking = True Then savelines(7) = 11 Else savelines(7) = 10
|
|
If boughtautoscrollterminal = True Then savelines(8) = 11 Else savelines(8) = 10
|
|
savelines(9) = codepoints
|
|
If boughtmovablewindows = True Then savelines(10) = 11 Else savelines(10) = 10
|
|
If boughtdraggablewindows = True Then savelines(11) = 11 Else savelines(11) = 10
|
|
If boughtwindowborders = True Then savelines(12) = 11 Else savelines(12) = 10
|
|
If boughtpmandam = True Then savelines(13) = 11 Else savelines(13) = 10
|
|
If boughtminuteaccuracytime = True Then savelines(14) = 11 Else savelines(14) = 10
|
|
If boughtsplitsecondtime = True Then savelines(15) = 11 Else savelines(15) = 10
|
|
If boughttitletext = True Then savelines(16) = 11 Else savelines(16) = 10
|
|
If boughtclosebutton = True Then savelines(17) = 11 Else savelines(17) = 10
|
|
If boughtdesktoppanel = True Then savelines(18) = 11 Else savelines(18) = 10
|
|
If boughtclock = True Then savelines(19) = 11 Else savelines(19) = 10
|
|
If boughtwindowedterminal = True Then savelines(20) = 11 Else savelines(20) = 10
|
|
If boughtapplaunchermenu = True Then savelines(21) = 11 Else savelines(21) = 10
|
|
If boughtalknowledgeinput = True Then savelines(22) = 11 Else savelines(22) = 10
|
|
If boughtalclock = True Then savelines(23) = 11 Else savelines(23) = 10
|
|
If boughtalshiftorium = True Then savelines(24) = 11 Else savelines(24) = 10
|
|
If boughtapplaunchershutdown = True Then savelines(25) = 11 Else savelines(25) = 10
|
|
If boughtdesktoppanelclock = True Then savelines(26) = 11 Else savelines(26) = 10
|
|
If boughtterminalscrollbar = True Then savelines(27) = 11 Else savelines(27) = 10
|
|
If boughtkiaddons = True Then savelines(28) = 11 Else savelines(28) = 10
|
|
If boughtkicarbrands = True Then savelines(29) = 11 Else savelines(29) = 10
|
|
If boughtkigameconsoles = True Then savelines(30) = 11 Else savelines(30) = 10
|
|
savelines(31) = username
|
|
If terminalfullscreen = True Then savelines(32) = 11 Else savelines(32) = 10
|
|
If boughtshifter = True Then savelines(33) = 11 Else savelines(33) = 10
|
|
If boughtalshifter = True Then savelines(34) = 11 Else savelines(34) = 10
|
|
If boughtrollupcommand = True Then savelines(35) = 11 Else savelines(35) = 10
|
|
If boughtrollupbutton = True Then savelines(36) = 11 Else savelines(36) = 10
|
|
If boughtshiftdesktop = True Then savelines(37) = 11 Else savelines(37) = 10
|
|
If boughtshiftpanelclock = True Then savelines(38) = 11 Else savelines(38) = 10
|
|
If boughtshiftapplauncher = True Then savelines(39) = 11 Else savelines(39) = 10
|
|
If boughtshiftdesktoppanel = True Then savelines(40) = 11 Else savelines(40) = 10
|
|
If boughtshifttitlebar = True Then savelines(41) = 11 Else savelines(41) = 10
|
|
If boughtshifttitletext = True Then savelines(42) = 11 Else savelines(42) = 10
|
|
If boughtshifttitlebuttons = True Then savelines(43) = 11 Else savelines(43) = 10
|
|
If boughtshiftborders = True Then savelines(44) = 11 Else savelines(44) = 10
|
|
If boughtgray2 = True Then savelines(45) = 11 Else savelines(45) = 10
|
|
If boughtgray3 = True Then savelines(46) = 11 Else savelines(46) = 10
|
|
If boughtgray4 = True Then savelines(47) = 11 Else savelines(47) = 10
|
|
If boughtanycolour = True Then savelines(48) = 11 Else savelines(48) = 10
|
|
If boughtanycolour2 = True Then savelines(49) = 11 Else savelines(49) = 10
|
|
If boughtanycolour3 = True Then savelines(50) = 11 Else savelines(50) = 10
|
|
If boughtanycolour4 = True Then savelines(51) = 11 Else savelines(51) = 10
|
|
If boughtpurple = True Then savelines(52) = 11 Else savelines(52) = 10
|
|
If boughtpurple2 = True Then savelines(53) = 11 Else savelines(53) = 10
|
|
If boughtpurple3 = True Then savelines(54) = 11 Else savelines(54) = 10
|
|
If boughtpurple4 = True Then savelines(55) = 11 Else savelines(55) = 10
|
|
If boughtblue = True Then savelines(56) = 11 Else savelines(56) = 10
|
|
If boughtblue2 = True Then savelines(57) = 11 Else savelines(57) = 10
|
|
If boughtblue3 = True Then savelines(58) = 11 Else savelines(58) = 10
|
|
If boughtblue4 = True Then savelines(59) = 11 Else savelines(59) = 10
|
|
If boughtgreen = True Then savelines(60) = 11 Else savelines(60) = 10
|
|
If boughtgreen2 = True Then savelines(61) = 11 Else savelines(61) = 10
|
|
If boughtgreen3 = True Then savelines(62) = 11 Else savelines(62) = 10
|
|
If boughtgreen4 = True Then savelines(63) = 11 Else savelines(63) = 10
|
|
If boughtyellow = True Then savelines(64) = 11 Else savelines(64) = 10
|
|
If boughtyellow2 = True Then savelines(65) = 11 Else savelines(65) = 10
|
|
If boughtyellow3 = True Then savelines(66) = 11 Else savelines(66) = 10
|
|
If boughtyellow4 = True Then savelines(67) = 11 Else savelines(67) = 10
|
|
If boughtorange = True Then savelines(68) = 11 Else savelines(68) = 10
|
|
If boughtorange2 = True Then savelines(69) = 11 Else savelines(69) = 10
|
|
If boughtorange3 = True Then savelines(70) = 11 Else savelines(70) = 10
|
|
If boughtorange4 = True Then savelines(71) = 11 Else savelines(71) = 10
|
|
If boughtbrown = True Then savelines(72) = 11 Else savelines(72) = 10
|
|
If boughtbrown2 = True Then savelines(73) = 11 Else savelines(73) = 10
|
|
If boughtbrown3 = True Then savelines(74) = 11 Else savelines(74) = 10
|
|
If boughtbrown4 = True Then savelines(75) = 11 Else savelines(75) = 10
|
|
If boughtred = True Then savelines(76) = 11 Else savelines(76) = 10
|
|
If boughtred2 = True Then savelines(77) = 11 Else savelines(77) = 10
|
|
If boughtred3 = True Then savelines(78) = 11 Else savelines(78) = 10
|
|
If boughtred4 = True Then savelines(79) = 11 Else savelines(79) = 10
|
|
If boughtpink = True Then savelines(80) = 11 Else savelines(80) = 10
|
|
If boughtpink2 = True Then savelines(81) = 11 Else savelines(81) = 10
|
|
If boughtpink3 = True Then savelines(82) = 11 Else savelines(82) = 10
|
|
If boughtpink4 = True Then savelines(83) = 11 Else savelines(83) = 10
|
|
savelines(84) = anymemory(0).ToArgb
|
|
savelines(85) = anymemory(1).ToArgb
|
|
savelines(86) = anymemory(2).ToArgb
|
|
savelines(87) = anymemory(3).ToArgb
|
|
savelines(88) = anymemory(4).ToArgb
|
|
savelines(89) = anymemory(5).ToArgb
|
|
savelines(90) = anymemory(6).ToArgb
|
|
savelines(91) = anymemory(7).ToArgb
|
|
savelines(92) = anymemory(8).ToArgb
|
|
savelines(93) = anymemory(9).ToArgb
|
|
savelines(94) = anymemory(10).ToArgb
|
|
savelines(95) = anymemory(11).ToArgb
|
|
savelines(96) = anymemory(12).ToArgb
|
|
savelines(97) = anymemory(13).ToArgb
|
|
savelines(98) = anymemory(14).ToArgb
|
|
savelines(99) = anymemory(15).ToArgb
|
|
savelines(100) = graymemory(0).ToArgb
|
|
savelines(101) = graymemory(1).ToArgb
|
|
savelines(102) = graymemory(2).ToArgb
|
|
savelines(103) = graymemory(3).ToArgb
|
|
savelines(104) = graymemory(4).ToArgb
|
|
savelines(105) = graymemory(5).ToArgb
|
|
savelines(106) = graymemory(6).ToArgb
|
|
savelines(107) = graymemory(7).ToArgb
|
|
savelines(108) = graymemory(8).ToArgb
|
|
savelines(109) = graymemory(9).ToArgb
|
|
savelines(110) = graymemory(10).ToArgb
|
|
savelines(111) = graymemory(11).ToArgb
|
|
savelines(112) = graymemory(12).ToArgb
|
|
savelines(113) = graymemory(13).ToArgb
|
|
savelines(114) = graymemory(14).ToArgb
|
|
savelines(115) = graymemory(15).ToArgb
|
|
savelines(116) = purplememory(0).ToArgb
|
|
savelines(117) = purplememory(1).ToArgb
|
|
savelines(118) = purplememory(2).ToArgb
|
|
savelines(119) = purplememory(3).ToArgb
|
|
savelines(120) = purplememory(4).ToArgb
|
|
savelines(121) = purplememory(5).ToArgb
|
|
savelines(122) = purplememory(6).ToArgb
|
|
savelines(123) = purplememory(7).ToArgb
|
|
savelines(124) = purplememory(8).ToArgb
|
|
savelines(125) = purplememory(9).ToArgb
|
|
savelines(126) = purplememory(10).ToArgb
|
|
savelines(127) = purplememory(11).ToArgb
|
|
savelines(128) = purplememory(12).ToArgb
|
|
savelines(129) = purplememory(13).ToArgb
|
|
savelines(130) = purplememory(14).ToArgb
|
|
savelines(131) = purplememory(15).ToArgb
|
|
savelines(132) = bluememory(0).ToArgb
|
|
savelines(133) = bluememory(1).ToArgb
|
|
savelines(134) = bluememory(2).ToArgb
|
|
savelines(135) = bluememory(3).ToArgb
|
|
savelines(136) = bluememory(4).ToArgb
|
|
savelines(137) = bluememory(5).ToArgb
|
|
savelines(138) = bluememory(6).ToArgb
|
|
savelines(139) = bluememory(7).ToArgb
|
|
savelines(140) = bluememory(8).ToArgb
|
|
savelines(141) = bluememory(9).ToArgb
|
|
savelines(142) = bluememory(10).ToArgb
|
|
savelines(143) = bluememory(11).ToArgb
|
|
savelines(144) = bluememory(12).ToArgb
|
|
savelines(145) = bluememory(13).ToArgb
|
|
savelines(146) = bluememory(14).ToArgb
|
|
savelines(147) = bluememory(15).ToArgb
|
|
savelines(148) = greenmemory(0).ToArgb
|
|
savelines(149) = greenmemory(1).ToArgb
|
|
savelines(150) = greenmemory(2).ToArgb
|
|
savelines(151) = greenmemory(3).ToArgb
|
|
savelines(152) = greenmemory(4).ToArgb
|
|
savelines(153) = greenmemory(5).ToArgb
|
|
savelines(154) = greenmemory(6).ToArgb
|
|
savelines(155) = greenmemory(7).ToArgb
|
|
savelines(156) = greenmemory(8).ToArgb
|
|
savelines(157) = greenmemory(9).ToArgb
|
|
savelines(158) = greenmemory(10).ToArgb
|
|
savelines(159) = greenmemory(11).ToArgb
|
|
savelines(160) = greenmemory(12).ToArgb
|
|
savelines(161) = greenmemory(13).ToArgb
|
|
savelines(162) = greenmemory(14).ToArgb
|
|
savelines(163) = greenmemory(15).ToArgb
|
|
savelines(164) = yellowmemory(0).ToArgb
|
|
savelines(165) = yellowmemory(1).ToArgb
|
|
savelines(166) = yellowmemory(2).ToArgb
|
|
savelines(167) = yellowmemory(3).ToArgb
|
|
savelines(168) = yellowmemory(4).ToArgb
|
|
savelines(169) = yellowmemory(5).ToArgb
|
|
savelines(170) = yellowmemory(6).ToArgb
|
|
savelines(171) = yellowmemory(7).ToArgb
|
|
savelines(172) = yellowmemory(8).ToArgb
|
|
savelines(173) = yellowmemory(9).ToArgb
|
|
savelines(174) = yellowmemory(10).ToArgb
|
|
savelines(175) = yellowmemory(11).ToArgb
|
|
savelines(176) = yellowmemory(12).ToArgb
|
|
savelines(177) = yellowmemory(13).ToArgb
|
|
savelines(178) = yellowmemory(14).ToArgb
|
|
savelines(179) = yellowmemory(15).ToArgb
|
|
savelines(180) = orangememory(0).ToArgb
|
|
savelines(181) = orangememory(1).ToArgb
|
|
savelines(182) = orangememory(2).ToArgb
|
|
savelines(183) = orangememory(3).ToArgb
|
|
savelines(184) = orangememory(4).ToArgb
|
|
savelines(185) = orangememory(5).ToArgb
|
|
savelines(186) = orangememory(6).ToArgb
|
|
savelines(187) = orangememory(7).ToArgb
|
|
savelines(188) = orangememory(8).ToArgb
|
|
savelines(189) = orangememory(9).ToArgb
|
|
savelines(190) = orangememory(10).ToArgb
|
|
savelines(191) = orangememory(11).ToArgb
|
|
savelines(192) = orangememory(12).ToArgb
|
|
savelines(193) = orangememory(13).ToArgb
|
|
savelines(194) = orangememory(14).ToArgb
|
|
savelines(195) = orangememory(15).ToArgb
|
|
savelines(196) = brownmemory(0).ToArgb
|
|
savelines(197) = brownmemory(1).ToArgb
|
|
savelines(198) = brownmemory(2).ToArgb
|
|
savelines(199) = brownmemory(3).ToArgb
|
|
savelines(200) = brownmemory(4).ToArgb
|
|
savelines(201) = brownmemory(5).ToArgb
|
|
savelines(202) = brownmemory(6).ToArgb
|
|
savelines(203) = brownmemory(7).ToArgb
|
|
savelines(204) = brownmemory(8).ToArgb
|
|
savelines(205) = brownmemory(9).ToArgb
|
|
savelines(206) = brownmemory(10).ToArgb
|
|
savelines(207) = brownmemory(11).ToArgb
|
|
savelines(208) = brownmemory(12).ToArgb
|
|
savelines(209) = brownmemory(13).ToArgb
|
|
savelines(210) = brownmemory(14).ToArgb
|
|
savelines(211) = brownmemory(15).ToArgb
|
|
savelines(212) = redmemory(0).ToArgb
|
|
savelines(213) = redmemory(1).ToArgb
|
|
savelines(214) = redmemory(2).ToArgb
|
|
savelines(215) = redmemory(3).ToArgb
|
|
savelines(216) = redmemory(4).ToArgb
|
|
savelines(217) = redmemory(5).ToArgb
|
|
savelines(218) = redmemory(6).ToArgb
|
|
savelines(219) = redmemory(7).ToArgb
|
|
savelines(220) = redmemory(8).ToArgb
|
|
savelines(221) = redmemory(9).ToArgb
|
|
savelines(222) = redmemory(10).ToArgb
|
|
savelines(223) = redmemory(11).ToArgb
|
|
savelines(224) = redmemory(12).ToArgb
|
|
savelines(225) = redmemory(13).ToArgb
|
|
savelines(226) = redmemory(14).ToArgb
|
|
savelines(227) = redmemory(15).ToArgb
|
|
savelines(228) = pinkmemory(0).ToArgb
|
|
savelines(229) = pinkmemory(1).ToArgb
|
|
savelines(230) = pinkmemory(2).ToArgb
|
|
savelines(231) = pinkmemory(3).ToArgb
|
|
savelines(232) = pinkmemory(4).ToArgb
|
|
savelines(233) = pinkmemory(5).ToArgb
|
|
savelines(234) = pinkmemory(6).ToArgb
|
|
savelines(235) = pinkmemory(7).ToArgb
|
|
savelines(236) = pinkmemory(8).ToArgb
|
|
savelines(237) = pinkmemory(9).ToArgb
|
|
savelines(238) = pinkmemory(10).ToArgb
|
|
savelines(239) = pinkmemory(11).ToArgb
|
|
savelines(240) = pinkmemory(12).ToArgb
|
|
savelines(241) = pinkmemory(13).ToArgb
|
|
savelines(242) = pinkmemory(14).ToArgb
|
|
savelines(243) = pinkmemory(15).ToArgb
|
|
savelines(244) = titlebarcolour.ToArgb
|
|
savelines(245) = windowbordercolour.ToArgb
|
|
savelines(246) = windowbordersize
|
|
savelines(247) = titlebarheight
|
|
savelines(248) = closebuttoncolour.ToArgb
|
|
savelines(249) = closebuttonheight
|
|
savelines(250) = closebuttonwidth
|
|
savelines(251) = closebuttonside
|
|
savelines(252) = closebuttontop
|
|
savelines(253) = titletextcolour.ToArgb
|
|
savelines(254) = titletexttop
|
|
savelines(255) = titletextside
|
|
savelines(256) = titletextsize
|
|
savelines(257) = titletextfont
|
|
savelines(258) = titletextstyle
|
|
savelines(259) = desktoppanelcolour.ToArgb
|
|
savelines(260) = desktopbackgroundcolour.ToArgb
|
|
savelines(261) = desktoppanelheight
|
|
savelines(262) = desktoppanelposition
|
|
savelines(263) = clocktextcolour.ToArgb
|
|
savelines(264) = clockbackgroundcolor.ToArgb
|
|
savelines(265) = panelclocktexttop
|
|
savelines(266) = panelclocktextsize
|
|
savelines(267) = panelclocktextfont
|
|
savelines(268) = panelclocktextstyle
|
|
savelines(269) = applauncherbuttoncolour.ToArgb
|
|
savelines(270) = applauncherbuttonclickedcolour.ToArgb
|
|
savelines(271) = applauncherbackgroundcolour.ToArgb
|
|
savelines(272) = applaunchermouseovercolour.ToArgb
|
|
savelines(273) = applicationsbuttontextcolour.ToArgb
|
|
savelines(274) = applicationbuttonheight
|
|
savelines(275) = applicationbuttontextsize
|
|
savelines(276) = applicationbuttontextfont
|
|
savelines(277) = applicationbuttontextstyle
|
|
savelines(278) = applicationlaunchername
|
|
savelines(279) = titletextposition
|
|
savelines(280) = rollupbuttoncolour.ToArgb
|
|
savelines(281) = rollupbuttonheight
|
|
savelines(282) = rollupbuttonwidth
|
|
savelines(283) = rollupbuttonside
|
|
savelines(284) = rollupbuttontop
|
|
If boughtpong = True Then savelines(285) = 11 Else savelines(285) = 10
|
|
If boughtknowledgeinputicon = True Then savelines(286) = 11 Else savelines(286) = 10
|
|
If boughtshiftericon = True Then savelines(287) = 11 Else savelines(287) = 10
|
|
If boughtshiftoriumicon = True Then savelines(288) = 11 Else savelines(288) = 10
|
|
If boughtclockicon = True Then savelines(289) = 11 Else savelines(289) = 10
|
|
If boughtshutdownicon = True Then savelines(290) = 11 Else savelines(290) = 10
|
|
If boughtpongicon = True Then savelines(291) = 11 Else savelines(291) = 10
|
|
If boughtterminalicon = True Then savelines(292) = 11 Else savelines(292) = 10
|
|
If boughtalpong = True Then savelines(293) = 11 Else savelines(293) = 10
|
|
If boughtfileskimmer = True Then savelines(294) = 11 Else savelines(294) = 10
|
|
If boughtalfileskimmer = True Then savelines(295) = 11 Else savelines(295) = 10
|
|
If boughttextpad = True Then savelines(296) = 11 Else savelines(296) = 10
|
|
If boughtaltextpad = True Then savelines(297) = 11 Else savelines(297) = 10
|
|
If boughtfileskimmericon = True Then savelines(298) = 11 Else savelines(298) = 10
|
|
If boughttextpadicon = True Then savelines(299) = 11 Else savelines(299) = 10
|
|
If boughttextpadnew = True Then savelines(300) = 11 Else savelines(300) = 10
|
|
If boughttextpadsave = True Then savelines(301) = 11 Else savelines(301) = 10
|
|
If boughttextpadopen = True Then savelines(302) = 11 Else savelines(302) = 10
|
|
If boughtfileskimmernewfolder = True Then savelines(303) = 11 Else savelines(303) = 10
|
|
If boughtfileskimmerdelete = True Then savelines(304) = 11 Else savelines(304) = 10
|
|
If boughtkielements = True Then savelines(305) = 11 Else savelines(305) = 10
|
|
If boughtcolourpickericon = True Then savelines(306) = 11 Else savelines(306) = 10
|
|
If boughtinfoboxicon = True Then savelines(307) = 11 Else savelines(307) = 10
|
|
savelines(308) = artpadcolorpalletwidth
|
|
savelines(309) = artpadcolorpalletheight
|
|
savelines(310) = artpadcolorpalletsidegap
|
|
savelines(311) = artpadcolorpallettopgap
|
|
savelines(312) = artpadvisiblepallets
|
|
savelines(313) = artpadpixellimit
|
|
If boughtskinloader = True Then savelines(314) = 11 Else savelines(314) = 10
|
|
If boughtminimizebutton = True Then savelines(315) = 11 Else savelines(315) = 10
|
|
If boughtpanelbuttons = True Then savelines(316) = 11 Else savelines(316) = 10
|
|
If boughtshiftpanelbuttons = True Then savelines(317) = 11 Else savelines(317) = 10
|
|
If boughtartpad = True Then savelines(318) = 11 Else savelines(318) = 10
|
|
If boughtalartpad = True Then savelines(319) = 11 Else savelines(319) = 10
|
|
If boughtartpadicon = True Then savelines(320) = 11 Else savelines(320) = 10
|
|
If boughtskinning = True Then savelines(321) = 11 Else savelines(321) = 10
|
|
If boughtminimizecommand = True Then savelines(322) = 11 Else savelines(322) = 10
|
|
If boughtusefulpanelbuttons = True Then savelines(323) = 11 Else savelines(323) = 10
|
|
If boughtunitymode = True Then savelines(324) = 11 Else savelines(324) = 10
|
|
If boughtartpadpixellimit4 = True Then savelines(325) = 11 Else savelines(325) = 10
|
|
If boughtartpadpixellimit8 = True Then savelines(326) = 11 Else savelines(326) = 10
|
|
If boughtartpadpixellimit16 = True Then savelines(327) = 11 Else savelines(327) = 10
|
|
If boughtartpadpixellimit64 = True Then savelines(328) = 11 Else savelines(328) = 10
|
|
If boughtartpadpixellimit256 = True Then savelines(329) = 11 Else savelines(329) = 10
|
|
If boughtartpadpixellimit1024 = True Then savelines(330) = 11 Else savelines(330) = 10
|
|
If boughtartpadpixellimit4096 = True Then savelines(331) = 11 Else savelines(331) = 10
|
|
If boughtartpadpixellimit16384 = True Then savelines(332) = 11 Else savelines(332) = 10
|
|
If boughtartpadpixellimit65536 = True Then savelines(333) = 11 Else savelines(333) = 10
|
|
If boughtartpadlimitlesspixels = True Then savelines(334) = 11 Else savelines(334) = 10
|
|
If boughtartpad4colorpallets = True Then savelines(335) = 11 Else savelines(335) = 10
|
|
If boughtartpad8colorpallets = True Then savelines(336) = 11 Else savelines(336) = 10
|
|
If boughtartpad16colorpallets = True Then savelines(337) = 11 Else savelines(337) = 10
|
|
If boughtartpad32colorpallets = True Then savelines(338) = 11 Else savelines(338) = 10
|
|
If boughtartpad64colorpallets = True Then savelines(339) = 11 Else savelines(339) = 10
|
|
If boughtartpad128colorpallets = True Then savelines(340) = 11 Else savelines(340) = 10
|
|
If boughtartpadcustompallets = True Then savelines(341) = 11 Else savelines(341) = 10
|
|
If boughtartpadpixelplacer = True Then savelines(342) = 11 Else savelines(342) = 10
|
|
If boughtartpadpixelplacermovementmode = True Then savelines(343) = 11 Else savelines(343) = 10
|
|
If boughtartpadpencil = True Then savelines(344) = 11 Else savelines(344) = 10
|
|
If boughtartpadpaintbrush = True Then savelines(345) = 11 Else savelines(345) = 10
|
|
If boughtartpadlinetool = True Then savelines(346) = 11 Else savelines(346) = 10
|
|
If boughtartpadovaltool = True Then savelines(347) = 11 Else savelines(347) = 10
|
|
If boughtartpadrectangletool = True Then savelines(348) = 11 Else savelines(348) = 10
|
|
If boughtartpaderaser = True Then savelines(349) = 11 Else savelines(349) = 10
|
|
If boughtartpadfilltool = True Then savelines(350) = 11 Else savelines(350) = 10
|
|
If boughtartpadtexttool = True Then savelines(351) = 11 Else savelines(351) = 10
|
|
If boughtartpadundo = True Then savelines(352) = 11 Else savelines(352) = 10
|
|
If boughtartpadredo = True Then savelines(353) = 11 Else savelines(353) = 10
|
|
If boughtartpadsave = True Then savelines(354) = 11 Else savelines(354) = 10
|
|
If boughtartpadload = True Then savelines(355) = 11 Else savelines(355) = 10
|
|
For i = 0 To 127 : savelines(356 + i) = artpadcolourpallets(i).ToArgb : Next
|
|
If boughtartpadnew = True Then savelines(484) = 11 Else savelines(484) = 10
|
|
|
|
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)
|
|
|
|
Dim objWriter As New System.IO.StreamWriter("C:/ShiftOS/Shiftum42/HDAccess.sft", False)
|
|
objWriter.Write(actualshiftversion)
|
|
objWriter.Close()
|
|
|
|
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")
|
|
|
|
If loadlines(0) = 11 Then boughttitlebar = True Else boughttitlebar = False
|
|
If loadlines(1) = 11 Then boughtgray = True Else boughtgray = False
|
|
If loadlines(2) = 11 Then boughtsecondspastmidnight = True Else boughtsecondspastmidnight = False
|
|
If loadlines(3) = 11 Then boughtminutespastmidnight = True Else boughtminutespastmidnight = False
|
|
If loadlines(4) = 11 Then boughthourspastmidnight = True Else boughthourspastmidnight = False
|
|
If loadlines(5) = 11 Then boughtcustomusername = True Else boughtcustomusername = False
|
|
If loadlines(6) = 11 Then boughtwindowsanywhere = True Else boughtwindowsanywhere = False
|
|
If loadlines(7) = 11 Then boughtmultitasking = True Else boughtmultitasking = False
|
|
If loadlines(8) = 11 Then boughtautoscrollterminal = True Else boughtautoscrollterminal = False
|
|
codepoints = loadlines(9)
|
|
If loadlines(10) = 11 Then boughtmovablewindows = True Else boughtmovablewindows = False
|
|
If loadlines(11) = 11 Then boughtdraggablewindows = True Else boughtdraggablewindows = False
|
|
If loadlines(12) = 11 Then boughtwindowborders = True Else boughtwindowborders = False
|
|
If loadlines(13) = 11 Then boughtpmandam = True Else boughtpmandam = False
|
|
If loadlines(14) = 11 Then boughtminuteaccuracytime = True Else boughtminuteaccuracytime = False
|
|
If loadlines(15) = 11 Then boughtsplitsecondtime = True Else boughtsplitsecondtime = False
|
|
If loadlines(16) = 11 Then boughttitletext = True Else boughttitletext = False
|
|
If loadlines(17) = 11 Then boughtclosebutton = True Else boughtclosebutton = False
|
|
If loadlines(18) = 11 Then boughtdesktoppanel = True Else boughtdesktoppanel = False
|
|
If loadlines(19) = 11 Then boughtclock = True Else boughtclock = False
|
|
If loadlines(20) = 11 Then boughtwindowedterminal = True Else boughtwindowedterminal = False
|
|
If loadlines(21) = 11 Then boughtapplaunchermenu = True Else boughtapplaunchermenu = False
|
|
If loadlines(22) = 11 Then boughtalknowledgeinput = True Else boughtalknowledgeinput = False
|
|
If loadlines(23) = 11 Then boughtalclock = True Else boughtalclock = False
|
|
If loadlines(24) = 11 Then boughtalshiftorium = True Else boughtalshiftorium = False
|
|
If loadlines(25) = 11 Then boughtapplaunchershutdown = True Else boughtapplaunchershutdown = False
|
|
If loadlines(26) = 11 Then boughtdesktoppanelclock = True Else boughtdesktoppanelclock = False
|
|
If loadlines(27) = 11 Then boughtterminalscrollbar = True Else boughtterminalscrollbar = False
|
|
If loadlines(28) = 11 Then boughtkiaddons = True Else boughtkiaddons = False
|
|
If loadlines(29) = 11 Then boughtkicarbrands = True Else boughtkicarbrands = False
|
|
If loadlines(30) = 11 Then boughtkigameconsoles = True Else boughtkigameconsoles = False
|
|
username = loadlines(31)
|
|
If loadlines(32) = 11 Then terminalfullscreen = True Else terminalfullscreen = False
|
|
If loadlines(33) = 11 Then boughtshifter = True Else boughtshifter = False
|
|
If loadlines(34) = 11 Then boughtalshifter = True Else boughtalshifter = False
|
|
If loadlines(35) = 11 Then boughtrollupcommand = True Else boughtrollupcommand = False
|
|
If loadlines(36) = 11 Then boughtrollupbutton = True Else boughtrollupbutton = False
|
|
If loadlines(37) = 11 Then boughtshiftdesktop = True Else boughtshiftdesktop = False
|
|
If loadlines(38) = 11 Then boughtshiftpanelclock = True Else boughtshiftpanelclock = False
|
|
If loadlines(39) = 11 Then boughtshiftapplauncher = True Else boughtshiftapplauncher = False
|
|
If loadlines(40) = 11 Then boughtshiftdesktoppanel = True Else boughtshiftdesktoppanel = False
|
|
If loadlines(41) = 11 Then boughtshifttitlebar = True Else boughtshifttitlebar = False
|
|
If loadlines(42) = 11 Then boughtshifttitletext = True Else boughtshifttitletext = False
|
|
If loadlines(43) = 11 Then boughtshifttitlebuttons = True Else boughtshifttitlebuttons = False
|
|
If loadlines(44) = 11 Then boughtshiftborders = True Else boughtshiftborders = False
|
|
If loadlines(45) = 11 Then boughtgray2 = True Else boughtgray2 = False
|
|
If loadlines(46) = 11 Then boughtgray3 = True Else boughtgray3 = False
|
|
If loadlines(47) = 11 Then boughtgray4 = True Else boughtgray4 = False
|
|
If loadlines(48) = 11 Then boughtanycolour = True Else boughtanycolour = False
|
|
If loadlines(49) = 11 Then boughtanycolour2 = True Else boughtanycolour2 = False
|
|
If loadlines(50) = 11 Then boughtanycolour3 = True Else boughtanycolour3 = False
|
|
If loadlines(51) = 11 Then boughtanycolour4 = True Else boughtanycolour4 = False
|
|
If loadlines(52) = 11 Then boughtpurple = True Else boughtpurple = False
|
|
If loadlines(53) = 11 Then boughtpurple2 = True Else boughtpurple2 = False
|
|
If loadlines(54) = 11 Then boughtpurple3 = True Else boughtpurple3 = False
|
|
If loadlines(55) = 11 Then boughtpurple4 = True Else boughtpurple4 = False
|
|
If loadlines(56) = 11 Then boughtblue = True Else boughtblue = False
|
|
If loadlines(57) = 11 Then boughtblue2 = True Else boughtblue2 = False
|
|
If loadlines(58) = 11 Then boughtblue3 = True Else boughtblue3 = False
|
|
If loadlines(59) = 11 Then boughtblue4 = True Else boughtblue4 = False
|
|
If loadlines(60) = 11 Then boughtgreen = True Else boughtgreen = False
|
|
If loadlines(61) = 11 Then boughtgreen2 = True Else boughtgreen2 = False
|
|
If loadlines(62) = 11 Then boughtgreen3 = True Else boughtgreen3 = False
|
|
If loadlines(63) = 11 Then boughtgreen4 = True Else boughtgreen4 = False
|
|
If loadlines(64) = 11 Then boughtyellow = True Else boughtyellow = False
|
|
If loadlines(65) = 11 Then boughtyellow2 = True Else boughtyellow2 = False
|
|
If loadlines(66) = 11 Then boughtyellow3 = True Else boughtyellow3 = False
|
|
If loadlines(67) = 11 Then boughtyellow4 = True Else boughtyellow4 = False
|
|
If loadlines(68) = 11 Then boughtorange = True Else boughtorange = False
|
|
If loadlines(69) = 11 Then boughtorange2 = True Else boughtorange2 = False
|
|
If loadlines(70) = 11 Then boughtorange3 = True Else boughtorange3 = False
|
|
If loadlines(71) = 11 Then boughtorange4 = True Else boughtorange4 = False
|
|
If loadlines(72) = 11 Then boughtbrown = True Else boughtbrown = False
|
|
If loadlines(73) = 11 Then boughtbrown2 = True Else boughtbrown2 = False
|
|
If loadlines(74) = 11 Then boughtbrown3 = True Else boughtbrown3 = False
|
|
If loadlines(75) = 11 Then boughtbrown4 = True Else boughtbrown4 = False
|
|
If loadlines(76) = 11 Then boughtred = True Else boughtred = False
|
|
If loadlines(77) = 11 Then boughtred2 = True Else boughtred2 = False
|
|
If loadlines(78) = 11 Then boughtred3 = True Else boughtred3 = False
|
|
If loadlines(79) = 11 Then boughtred4 = True Else boughtred4 = False
|
|
If loadlines(80) = 11 Then boughtpink = True Else boughtpink = False
|
|
If loadlines(81) = 11 Then boughtpink2 = True Else boughtpink2 = False
|
|
If loadlines(82) = 11 Then boughtpink3 = True Else boughtpink3 = False
|
|
If loadlines(83) = 11 Then boughtpink4 = True Else boughtpink4 = False
|
|
anymemory(0) = Color.FromArgb(loadlines(84))
|
|
anymemory(1) = Color.FromArgb(loadlines(85))
|
|
anymemory(2) = Color.FromArgb(loadlines(86))
|
|
anymemory(3) = Color.FromArgb(loadlines(87))
|
|
anymemory(4) = Color.FromArgb(loadlines(88))
|
|
anymemory(5) = Color.FromArgb(loadlines(89))
|
|
anymemory(6) = Color.FromArgb(loadlines(90))
|
|
anymemory(7) = Color.FromArgb(loadlines(91))
|
|
anymemory(8) = Color.FromArgb(loadlines(92))
|
|
anymemory(9) = Color.FromArgb(loadlines(93))
|
|
anymemory(10) = Color.FromArgb(loadlines(94))
|
|
anymemory(11) = Color.FromArgb(loadlines(95))
|
|
anymemory(12) = Color.FromArgb(loadlines(96))
|
|
anymemory(13) = Color.FromArgb(loadlines(97))
|
|
anymemory(14) = Color.FromArgb(loadlines(98))
|
|
anymemory(15) = Color.FromArgb(loadlines(99))
|
|
graymemory(0) = Color.FromArgb(loadlines(100))
|
|
graymemory(1) = Color.FromArgb(loadlines(101))
|
|
graymemory(2) = Color.FromArgb(loadlines(102))
|
|
graymemory(3) = Color.FromArgb(loadlines(103))
|
|
graymemory(4) = Color.FromArgb(loadlines(104))
|
|
graymemory(5) = Color.FromArgb(loadlines(105))
|
|
graymemory(6) = Color.FromArgb(loadlines(106))
|
|
graymemory(7) = Color.FromArgb(loadlines(107))
|
|
graymemory(8) = Color.FromArgb(loadlines(108))
|
|
graymemory(9) = Color.FromArgb(loadlines(109))
|
|
graymemory(10) = Color.FromArgb(loadlines(110))
|
|
graymemory(11) = Color.FromArgb(loadlines(111))
|
|
graymemory(12) = Color.FromArgb(loadlines(112))
|
|
graymemory(13) = Color.FromArgb(loadlines(113))
|
|
graymemory(14) = Color.FromArgb(loadlines(114))
|
|
graymemory(15) = Color.FromArgb(loadlines(115))
|
|
purplememory(0) = Color.FromArgb(loadlines(116))
|
|
purplememory(1) = Color.FromArgb(loadlines(117))
|
|
purplememory(2) = Color.FromArgb(loadlines(118))
|
|
purplememory(3) = Color.FromArgb(loadlines(119))
|
|
purplememory(4) = Color.FromArgb(loadlines(120))
|
|
purplememory(5) = Color.FromArgb(loadlines(121))
|
|
purplememory(6) = Color.FromArgb(loadlines(122))
|
|
purplememory(7) = Color.FromArgb(loadlines(123))
|
|
purplememory(8) = Color.FromArgb(loadlines(124))
|
|
purplememory(9) = Color.FromArgb(loadlines(125))
|
|
purplememory(10) = Color.FromArgb(loadlines(126))
|
|
purplememory(11) = Color.FromArgb(loadlines(127))
|
|
purplememory(12) = Color.FromArgb(loadlines(128))
|
|
purplememory(13) = Color.FromArgb(loadlines(129))
|
|
purplememory(14) = Color.FromArgb(loadlines(130))
|
|
purplememory(15) = Color.FromArgb(loadlines(131))
|
|
bluememory(0) = Color.FromArgb(loadlines(132))
|
|
bluememory(1) = Color.FromArgb(loadlines(133))
|
|
bluememory(2) = Color.FromArgb(loadlines(134))
|
|
bluememory(3) = Color.FromArgb(loadlines(135))
|
|
bluememory(4) = Color.FromArgb(loadlines(136))
|
|
bluememory(5) = Color.FromArgb(loadlines(137))
|
|
bluememory(6) = Color.FromArgb(loadlines(138))
|
|
bluememory(7) = Color.FromArgb(loadlines(139))
|
|
bluememory(8) = Color.FromArgb(loadlines(140))
|
|
bluememory(9) = Color.FromArgb(loadlines(141))
|
|
bluememory(10) = Color.FromArgb(loadlines(142))
|
|
bluememory(11) = Color.FromArgb(loadlines(143))
|
|
bluememory(12) = Color.FromArgb(loadlines(144))
|
|
bluememory(13) = Color.FromArgb(loadlines(145))
|
|
bluememory(14) = Color.FromArgb(loadlines(146))
|
|
bluememory(15) = Color.FromArgb(loadlines(147))
|
|
greenmemory(0) = Color.FromArgb(loadlines(148))
|
|
greenmemory(1) = Color.FromArgb(loadlines(149))
|
|
greenmemory(2) = Color.FromArgb(loadlines(150))
|
|
greenmemory(3) = Color.FromArgb(loadlines(151))
|
|
greenmemory(4) = Color.FromArgb(loadlines(152))
|
|
greenmemory(5) = Color.FromArgb(loadlines(153))
|
|
greenmemory(6) = Color.FromArgb(loadlines(154))
|
|
greenmemory(7) = Color.FromArgb(loadlines(155))
|
|
greenmemory(8) = Color.FromArgb(loadlines(156))
|
|
greenmemory(9) = Color.FromArgb(loadlines(157))
|
|
greenmemory(10) = Color.FromArgb(loadlines(158))
|
|
greenmemory(11) = Color.FromArgb(loadlines(159))
|
|
greenmemory(12) = Color.FromArgb(loadlines(160))
|
|
greenmemory(13) = Color.FromArgb(loadlines(161))
|
|
greenmemory(14) = Color.FromArgb(loadlines(162))
|
|
greenmemory(15) = Color.FromArgb(loadlines(163))
|
|
yellowmemory(0) = Color.FromArgb(loadlines(164))
|
|
yellowmemory(1) = Color.FromArgb(loadlines(165))
|
|
yellowmemory(2) = Color.FromArgb(loadlines(166))
|
|
yellowmemory(3) = Color.FromArgb(loadlines(167))
|
|
yellowmemory(4) = Color.FromArgb(loadlines(168))
|
|
yellowmemory(5) = Color.FromArgb(loadlines(169))
|
|
yellowmemory(6) = Color.FromArgb(loadlines(170))
|
|
yellowmemory(7) = Color.FromArgb(loadlines(171))
|
|
yellowmemory(8) = Color.FromArgb(loadlines(172))
|
|
yellowmemory(9) = Color.FromArgb(loadlines(173))
|
|
yellowmemory(10) = Color.FromArgb(loadlines(174))
|
|
yellowmemory(11) = Color.FromArgb(loadlines(175))
|
|
yellowmemory(12) = Color.FromArgb(loadlines(176))
|
|
yellowmemory(13) = Color.FromArgb(loadlines(177))
|
|
yellowmemory(14) = Color.FromArgb(loadlines(178))
|
|
yellowmemory(15) = Color.FromArgb(loadlines(179))
|
|
orangememory(0) = Color.FromArgb(loadlines(180))
|
|
orangememory(1) = Color.FromArgb(loadlines(181))
|
|
orangememory(2) = Color.FromArgb(loadlines(182))
|
|
orangememory(3) = Color.FromArgb(loadlines(183))
|
|
orangememory(4) = Color.FromArgb(loadlines(184))
|
|
orangememory(5) = Color.FromArgb(loadlines(185))
|
|
orangememory(6) = Color.FromArgb(loadlines(186))
|
|
orangememory(7) = Color.FromArgb(loadlines(187))
|
|
orangememory(8) = Color.FromArgb(loadlines(188))
|
|
orangememory(9) = Color.FromArgb(loadlines(189))
|
|
orangememory(10) = Color.FromArgb(loadlines(190))
|
|
orangememory(11) = Color.FromArgb(loadlines(191))
|
|
orangememory(12) = Color.FromArgb(loadlines(192))
|
|
orangememory(13) = Color.FromArgb(loadlines(193))
|
|
orangememory(14) = Color.FromArgb(loadlines(194))
|
|
orangememory(15) = Color.FromArgb(loadlines(195))
|
|
brownmemory(0) = Color.FromArgb(loadlines(196))
|
|
brownmemory(1) = Color.FromArgb(loadlines(197))
|
|
brownmemory(2) = Color.FromArgb(loadlines(198))
|
|
brownmemory(3) = Color.FromArgb(loadlines(199))
|
|
brownmemory(4) = Color.FromArgb(loadlines(200))
|
|
brownmemory(5) = Color.FromArgb(loadlines(201))
|
|
brownmemory(6) = Color.FromArgb(loadlines(202))
|
|
brownmemory(7) = Color.FromArgb(loadlines(203))
|
|
brownmemory(8) = Color.FromArgb(loadlines(204))
|
|
brownmemory(9) = Color.FromArgb(loadlines(205))
|
|
brownmemory(10) = Color.FromArgb(loadlines(206))
|
|
brownmemory(11) = Color.FromArgb(loadlines(207))
|
|
brownmemory(12) = Color.FromArgb(loadlines(208))
|
|
brownmemory(13) = Color.FromArgb(loadlines(209))
|
|
brownmemory(14) = Color.FromArgb(loadlines(210))
|
|
brownmemory(15) = Color.FromArgb(loadlines(211))
|
|
redmemory(0) = Color.FromArgb(loadlines(212))
|
|
redmemory(1) = Color.FromArgb(loadlines(213))
|
|
redmemory(2) = Color.FromArgb(loadlines(214))
|
|
redmemory(3) = Color.FromArgb(loadlines(215))
|
|
redmemory(4) = Color.FromArgb(loadlines(216))
|
|
redmemory(5) = Color.FromArgb(loadlines(217))
|
|
redmemory(6) = Color.FromArgb(loadlines(218))
|
|
redmemory(7) = Color.FromArgb(loadlines(219))
|
|
redmemory(8) = Color.FromArgb(loadlines(220))
|
|
redmemory(9) = Color.FromArgb(loadlines(221))
|
|
redmemory(10) = Color.FromArgb(loadlines(222))
|
|
redmemory(11) = Color.FromArgb(loadlines(223))
|
|
redmemory(12) = Color.FromArgb(loadlines(224))
|
|
redmemory(13) = Color.FromArgb(loadlines(225))
|
|
redmemory(14) = Color.FromArgb(loadlines(226))
|
|
redmemory(15) = Color.FromArgb(loadlines(227))
|
|
pinkmemory(0) = Color.FromArgb(loadlines(228))
|
|
pinkmemory(1) = Color.FromArgb(loadlines(229))
|
|
pinkmemory(2) = Color.FromArgb(loadlines(230))
|
|
pinkmemory(3) = Color.FromArgb(loadlines(231))
|
|
pinkmemory(4) = Color.FromArgb(loadlines(232))
|
|
pinkmemory(5) = Color.FromArgb(loadlines(233))
|
|
pinkmemory(6) = Color.FromArgb(loadlines(234))
|
|
pinkmemory(7) = Color.FromArgb(loadlines(235))
|
|
pinkmemory(8) = Color.FromArgb(loadlines(236))
|
|
pinkmemory(9) = Color.FromArgb(loadlines(237))
|
|
pinkmemory(10) = Color.FromArgb(loadlines(238))
|
|
pinkmemory(11) = Color.FromArgb(loadlines(239))
|
|
pinkmemory(12) = Color.FromArgb(loadlines(240))
|
|
pinkmemory(13) = Color.FromArgb(loadlines(241))
|
|
pinkmemory(14) = Color.FromArgb(loadlines(242))
|
|
pinkmemory(15) = Color.FromArgb(loadlines(243))
|
|
titlebarcolour = Color.FromArgb(loadlines(244))
|
|
windowbordercolour = Color.FromArgb(loadlines(245))
|
|
windowbordersize = loadlines(246)
|
|
titlebarheight = loadlines(247)
|
|
closebuttoncolour = Color.FromArgb(loadlines(248))
|
|
closebuttonheight = loadlines(249)
|
|
closebuttonwidth = loadlines(250)
|
|
closebuttonside = loadlines(251)
|
|
closebuttontop = loadlines(252)
|
|
titletextcolour = Color.FromArgb(loadlines(253))
|
|
titletexttop = loadlines(254)
|
|
titletextside = loadlines(255)
|
|
titletextsize = loadlines(256)
|
|
titletextfont = loadlines(257)
|
|
titletextstyle = loadlines(258)
|
|
desktoppanelcolour = Color.FromArgb(loadlines(259))
|
|
desktopbackgroundcolour = Color.FromArgb(loadlines(260))
|
|
desktoppanelheight = loadlines(261)
|
|
desktoppanelposition = loadlines(262)
|
|
clocktextcolour = Color.FromArgb(loadlines(263))
|
|
clockbackgroundcolor = Color.FromArgb(loadlines(264))
|
|
panelclocktexttop = loadlines(265)
|
|
panelclocktextsize = loadlines(266)
|
|
panelclocktextfont = loadlines(267)
|
|
panelclocktextstyle = loadlines(268)
|
|
applauncherbuttoncolour = Color.FromArgb(loadlines(269))
|
|
applauncherbuttonclickedcolour = Color.FromArgb(loadlines(270))
|
|
applauncherbackgroundcolour = Color.FromArgb(loadlines(271))
|
|
applaunchermouseovercolour = Color.FromArgb(loadlines(272))
|
|
applicationsbuttontextcolour = Color.FromArgb(loadlines(273))
|
|
applicationbuttonheight = loadlines(274)
|
|
applicationbuttontextsize = loadlines(275)
|
|
applicationbuttontextfont = loadlines(276)
|
|
applicationbuttontextstyle = loadlines(277)
|
|
applicationlaunchername = loadlines(278)
|
|
titletextposition = loadlines(279)
|
|
rollupbuttoncolour = Color.FromArgb(loadlines(280))
|
|
rollupbuttonheight = loadlines(281)
|
|
rollupbuttonwidth = loadlines(282)
|
|
rollupbuttonside = loadlines(283)
|
|
rollupbuttontop = loadlines(284)
|
|
If loadlines(285) = 11 Then boughtpong = True Else boughtpong = False
|
|
If loadlines(286) = 11 Then boughtknowledgeinputicon = True Else boughtknowledgeinputicon = False
|
|
If loadlines(287) = 11 Then boughtshiftericon = True Else boughtshiftericon = False
|
|
If loadlines(288) = 11 Then boughtshiftoriumicon = True Else boughtshiftoriumicon = False
|
|
If loadlines(289) = 11 Then boughtclockicon = True Else boughtclockicon = False
|
|
If loadlines(290) = 11 Then boughtshutdownicon = True Else boughtshutdownicon = False
|
|
If loadlines(291) = 11 Then boughtpongicon = True Else boughtpongicon = False
|
|
If loadlines(292) = 11 Then boughtterminalicon = True Else boughtterminalicon = False
|
|
If loadlines(293) = 11 Then boughtalpong = True Else boughtalpong = False
|
|
If loadlines(294) = 11 Then boughtfileskimmer = True Else boughtfileskimmer = False
|
|
If loadlines(295) = 11 Then boughtalfileskimmer = True Else boughtalfileskimmer = False
|
|
If loadlines(296) = 11 Then boughttextpad = True Else boughttextpad = False
|
|
If loadlines(297) = 11 Then boughtaltextpad = True Else boughtaltextpad = False
|
|
If loadlines(298) = 11 Then boughtfileskimmericon = True Else boughtfileskimmericon = False
|
|
If loadlines(299) = 11 Then boughttextpadicon = True Else boughttextpadicon = False
|
|
If loadlines(300) = 11 Then boughttextpadnew = True Else boughttextpadnew = False
|
|
If loadlines(301) = 11 Then boughttextpadsave = True Else boughttextpadsave = False
|
|
If loadlines(302) = 11 Then boughttextpadopen = True Else boughttextpadopen = False
|
|
If loadlines(303) = 11 Then boughtfileskimmernewfolder = True Else boughtfileskimmernewfolder = False
|
|
If loadlines(304) = 11 Then boughtfileskimmerdelete = True Else boughtfileskimmerdelete = False
|
|
If loadlines(305) = 11 Then boughtkielements = True Else boughtkielements = False
|
|
If loadlines(306) = 11 Then boughtcolourpickericon = True Else boughtcolourpickericon = False
|
|
If loadlines(307) = 11 Then boughtinfoboxicon = True Else boughtinfoboxicon = False
|
|
artpadcolorpalletwidth = loadlines(308)
|
|
artpadcolorpalletheight = loadlines(309)
|
|
artpadcolorpalletsidegap = loadlines(310)
|
|
artpadcolorpallettopgap = loadlines(311)
|
|
artpadvisiblepallets = loadlines(312)
|
|
artpadpixellimit = loadlines(313)
|
|
If loadlines(314) = 11 Then boughtskinloader = True Else boughtskinloader = False
|
|
If loadlines(315) = 11 Then boughtminimizebutton = True Else boughtminimizebutton = False
|
|
If loadlines(316) = 11 Then boughtpanelbuttons = True Else boughtpanelbuttons = False
|
|
If loadlines(317) = 11 Then boughtshiftpanelbuttons = True Else boughtshiftpanelbuttons = False
|
|
If loadlines(318) = 11 Then boughtartpad = True Else boughtartpad = False
|
|
If loadlines(319) = 11 Then boughtalartpad = True Else boughtalartpad = False
|
|
If loadlines(320) = 11 Then boughtartpadicon = True Else boughtartpadicon = False
|
|
If loadlines(321) = 11 Then boughtskinning = True Else boughtskinning = False
|
|
If loadlines(322) = 11 Then boughtminimizecommand = True Else boughtminimizecommand = False
|
|
If loadlines(323) = 11 Then boughtusefulpanelbuttons = True Else boughtusefulpanelbuttons = False
|
|
If loadlines(324) = 11 Then boughtunitymode = True Else boughtunitymode = False
|
|
If loadlines(325) = 11 Then boughtartpadpixellimit4 = True Else boughtartpadpixellimit4 = False
|
|
If loadlines(326) = 11 Then boughtartpadpixellimit8 = True Else boughtartpadpixellimit8 = False
|
|
If loadlines(327) = 11 Then boughtartpadpixellimit16 = True Else boughtartpadpixellimit16 = False
|
|
If loadlines(328) = 11 Then boughtartpadpixellimit64 = True Else boughtartpadpixellimit64 = False
|
|
If loadlines(329) = 11 Then boughtartpadpixellimit256 = True Else boughtartpadpixellimit256 = False
|
|
If loadlines(330) = 11 Then boughtartpadpixellimit1024 = True Else boughtartpadpixellimit1024 = False
|
|
If loadlines(331) = 11 Then boughtartpadpixellimit4096 = True Else boughtartpadpixellimit4096 = False
|
|
If loadlines(332) = 11 Then boughtartpadpixellimit16384 = True Else boughtartpadpixellimit16384 = False
|
|
If loadlines(333) = 11 Then boughtartpadpixellimit65536 = True Else boughtartpadpixellimit65536 = False
|
|
If loadlines(334) = 11 Then boughtartpadlimitlesspixels = True Else boughtartpadlimitlesspixels = False
|
|
If loadlines(335) = 11 Then boughtartpad4colorpallets = True Else boughtartpad4colorpallets = False
|
|
If loadlines(336) = 11 Then boughtartpad8colorpallets = True Else boughtartpad8colorpallets = False
|
|
If loadlines(337) = 11 Then boughtartpad16colorpallets = True Else boughtartpad16colorpallets = False
|
|
If loadlines(338) = 11 Then boughtartpad32colorpallets = True Else boughtartpad32colorpallets = False
|
|
If loadlines(339) = 11 Then boughtartpad64colorpallets = True Else boughtartpad64colorpallets = False
|
|
If loadlines(340) = 11 Then boughtartpad128colorpallets = True Else boughtartpad128colorpallets = False
|
|
If loadlines(341) = 11 Then boughtartpadcustompallets = True Else boughtartpadcustompallets = False
|
|
If loadlines(342) = 11 Then boughtartpadpixelplacer = True Else boughtartpadpixelplacer = False
|
|
If loadlines(343) = 11 Then boughtartpadpixelplacermovementmode = True Else boughtartpadpixelplacermovementmode = False
|
|
If loadlines(344) = 11 Then boughtartpadpencil = True Else boughtartpadpencil = False
|
|
If loadlines(345) = 11 Then boughtartpadpaintbrush = True Else boughtartpadpaintbrush = False
|
|
If loadlines(346) = 11 Then boughtartpadlinetool = True Else boughtartpadlinetool = False
|
|
If loadlines(347) = 11 Then boughtartpadovaltool = True Else boughtartpadovaltool = False
|
|
If loadlines(348) = 11 Then boughtartpadrectangletool = True Else boughtartpadrectangletool = False
|
|
If loadlines(349) = 11 Then boughtartpaderaser = True Else boughtartpaderaser = False
|
|
If loadlines(350) = 11 Then boughtartpadfilltool = True Else boughtartpadfilltool = False
|
|
If loadlines(351) = 11 Then boughtartpadtexttool = True Else boughtartpadtexttool = False
|
|
If loadlines(352) = 11 Then boughtartpadundo = True Else boughtartpadundo = False
|
|
If loadlines(353) = 11 Then boughtartpadredo = True Else boughtartpadredo = False
|
|
If loadlines(354) = 11 Then boughtartpadsave = True Else boughtartpadsave = False
|
|
If loadlines(355) = 11 Then boughtartpadload = True Else boughtartpadload = False
|
|
For i = 0 To 127 : artpadcolourpallets(i) = Color.FromArgb(loadlines(356 + i)) : Next
|
|
If loadlines(484) = "" Then Else If loadlines(484) = 11 Then boughtartpadnew = True Else boughtartpadnew = False
|
|
|
|
If IO.File.Exists("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat") Then loadcurrentskin()
|
|
If My.Computer.FileSystem.DirectoryExists("C:\ShiftOS\Shiftum42\Icons") Then setupicons()
|
|
End Sub
|
|
|
|
Private Sub ShiftOSDesktop_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
|
If newgame = True Then
|
|
savegame()
|
|
Else
|
|
loadgame()
|
|
End If
|
|
ToolStripManager.Renderer = New MyToolStripRenderer()
|
|
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
|
|
Me.WindowState = FormWindowState.Maximized
|
|
loadskinfiles()
|
|
setupdesktop()
|
|
setupskins()
|
|
End Sub
|
|
|
|
Public Sub loadcurrentskin()
|
|
skinlines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Skins\Current\skindata.dat")
|
|
titlebarcolour = Color.FromArgb(skinlines(0))
|
|
windowbordercolour = Color.FromArgb(skinlines(1))
|
|
windowbordersize = skinlines(2)
|
|
titlebarheight = skinlines(3)
|
|
closebuttoncolour = Color.FromArgb(skinlines(4))
|
|
closebuttonheight = skinlines(5)
|
|
closebuttonwidth = skinlines(6)
|
|
closebuttonside = skinlines(7)
|
|
closebuttontop = skinlines(8)
|
|
titletextcolour = Color.FromArgb(skinlines(9))
|
|
titletexttop = skinlines(10)
|
|
titletextside = skinlines(11)
|
|
titletextsize = skinlines(12)
|
|
titletextfont = skinlines(13)
|
|
titletextstyle = skinlines(14)
|
|
desktoppanelcolour = Color.FromArgb(skinlines(15))
|
|
desktopbackgroundcolour = Color.FromArgb(skinlines(16))
|
|
desktoppanelheight = skinlines(17)
|
|
desktoppanelposition = skinlines(18)
|
|
clocktextcolour = Color.FromArgb(skinlines(19))
|
|
clockbackgroundcolor = Color.FromArgb(skinlines(20))
|
|
panelclocktexttop = skinlines(21)
|
|
panelclocktextsize = skinlines(22)
|
|
panelclocktextfont = skinlines(23)
|
|
panelclocktextstyle = skinlines(24)
|
|
applauncherbuttoncolour = Color.FromArgb(skinlines(25))
|
|
applauncherbuttonclickedcolour = Color.FromArgb(skinlines(26))
|
|
applauncherbackgroundcolour = Color.FromArgb(skinlines(27))
|
|
applaunchermouseovercolour = Color.FromArgb(skinlines(28))
|
|
applicationsbuttontextcolour = Color.FromArgb(skinlines(29))
|
|
applicationbuttonheight = skinlines(30)
|
|
applicationbuttontextsize = skinlines(31)
|
|
applicationbuttontextfont = skinlines(32)
|
|
applicationbuttontextstyle = skinlines(33)
|
|
applicationlaunchername = skinlines(34)
|
|
titletextposition = skinlines(35)
|
|
rollupbuttoncolour = Color.FromArgb(skinlines(36))
|
|
If skinlines(37) = "" Then Else rollupbuttonheight = skinlines(37)
|
|
If skinlines(38) = "" Then Else rollupbuttonwidth = skinlines(38)
|
|
If skinlines(39) = "" Then Else rollupbuttonside = skinlines(39)
|
|
If skinlines(40) = "" Then Else rollupbuttontop = skinlines(40)
|
|
If skinlines(41) = "" Then Else titlebariconside = skinlines(41)
|
|
If skinlines(42) = "" Then Else titlebaricontop = skinlines(42)
|
|
If skinlines(43) = "" Then Else showwindowcorners = skinlines(43)
|
|
If skinlines(44) = "" Then Else titlebarcornerwidth = skinlines(44)
|
|
If skinlines(45) = "" Then Else titlebarrightcornercolour = Color.FromArgb(skinlines(45))
|
|
If skinlines(46) = "" Then Else titlebarleftcornercolour = Color.FromArgb(skinlines(46))
|
|
If skinlines(47) = "" Then Else applaunchermenuholderwidth = skinlines(47)
|
|
If skinlines(48) = "" Then Else windowborderleftcolour = Color.FromArgb(skinlines(48))
|
|
If skinlines(49) = "" Then Else windowborderrightcolour = Color.FromArgb(skinlines(49))
|
|
If skinlines(50) = "" Then Else windowborderbottomcolour = Color.FromArgb(skinlines(50))
|
|
If skinlines(51) = "" Then Else windowborderbottomrightcolour = Color.FromArgb(skinlines(51))
|
|
If skinlines(52) = "" Then Else windowborderbottomleftcolour = Color.FromArgb(skinlines(52))
|
|
If skinlines(53) = "" Then Else panelbuttonicontop = skinlines(53)
|
|
If skinlines(54) = "" Then Else panelbuttoniconside = skinlines(54)
|
|
If skinlines(55) = "" Then Else panelbuttoniconsize = skinlines(55)
|
|
If skinlines(56) = "" Then Else panelbuttoniconsize = skinlines(56)
|
|
If skinlines(57) = "" Then Else panelbuttonheight = skinlines(57)
|
|
If skinlines(58) = "" Then Else panelbuttonwidth = skinlines(58)
|
|
If skinlines(59) = "" Then Else panelbuttoncolour = Color.FromArgb(skinlines(59))
|
|
If skinlines(60) = "" Then Else panelbuttontextcolour = Color.FromArgb(skinlines(60))
|
|
If skinlines(61) = "" Then Else panelbuttontextsize = skinlines(61)
|
|
If skinlines(62) = "" Then Else panelbuttontextfont = skinlines(62)
|
|
If skinlines(63) = "" Then Else panelbuttontextstyle = skinlines(63)
|
|
If skinlines(64) = "" Then Else panelbuttontextside = skinlines(64)
|
|
If skinlines(65) = "" Then Else panelbuttontexttop = skinlines(65)
|
|
If skinlines(66) = "" Then Else panelbuttongap = skinlines(66)
|
|
If skinlines(67) = "" Then Else panelbuttonfromtop = skinlines(67)
|
|
If skinlines(68) = "" Then Else panelbuttoninitialgap = skinlines(68)
|
|
If skinlines(69) = "" Then Else minimizebuttoncolour = Color.FromArgb(skinlines(69))
|
|
If skinlines(70) = "" Then Else minimizebuttonheight = skinlines(70)
|
|
If skinlines(71) = "" Then Else minimizebuttonwidth = skinlines(71)
|
|
If skinlines(72) = "" Then Else minimizebuttonside = skinlines(72)
|
|
If skinlines(73) = "" Then Else minimizebuttontop = skinlines(73)
|
|
|
|
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
|
|
|
|
End Sub
|
|
|
|
Private Sub shortdisposecode(ByVal skinloadervarible As Array, ByVal shiftosdesktopvarible As Array, ByVal shiftervarible As Array, ByVal includedesktop As Boolean)
|
|
If includedesktop = True Then
|
|
If shiftosdesktopvarible(0) Is Nothing Then Else shiftosdesktopvarible(0).Dispose()
|
|
If shiftosdesktopvarible(1) Is Nothing Then Else shiftosdesktopvarible(1).Dispose()
|
|
If shiftosdesktopvarible(2) Is Nothing Then Else shiftosdesktopvarible(2).Dispose()
|
|
shiftosdesktopvarible(0) = Nothing
|
|
shiftosdesktopvarible(1) = Nothing
|
|
shiftosdesktopvarible(2) = Nothing
|
|
End If
|
|
If Shifter.Visible Then
|
|
If shiftervarible(0) Is Nothing Then Else shiftervarible(0).Dispose()
|
|
If shiftervarible(1) Is Nothing Then Else shiftervarible(1).Dispose()
|
|
If shiftervarible(2) Is Nothing Then Else shiftervarible(2).Dispose()
|
|
shiftervarible(0) = Nothing
|
|
shiftervarible(1) = Nothing
|
|
shiftervarible(2) = Nothing
|
|
End If
|
|
If Skin_Loader.Visible Then
|
|
If skinloadervarible(0) Is Nothing Then Else skinloadervarible(0).Dispose()
|
|
If skinloadervarible(1) Is Nothing Then Else skinloadervarible(1).Dispose()
|
|
If skinloadervarible(2) Is Nothing Then Else skinloadervarible(2).Dispose()
|
|
skinloadervarible(0) = Nothing
|
|
skinloadervarible(1) = Nothing
|
|
skinloadervarible(2) = Nothing
|
|
End If
|
|
End Sub
|
|
|
|
Public Sub setupdesktop()
|
|
|
|
If unitymode = False Then
|
|
Me.BackColor = desktopbackgroundcolour
|
|
If skindesktopbackground(0) Is Nothing Then Me.BackgroundImage = Nothing Else Me.BackgroundImage = skindesktopbackground(0)
|
|
Me.BackgroundImageLayout = skindesktopbackgroundstyle
|
|
Else
|
|
Me.BackColor = globaltransparencycolour
|
|
Me.BackgroundImage = Nothing
|
|
Me.TransparencyKey = globaltransparencycolour
|
|
End If
|
|
|
|
shiftwindowsontop()
|
|
ToolStripManager.Renderer = New MyToolStripRenderer()
|
|
|
|
If boughtdesktoppanel = True Then
|
|
If skindesktoppanel(0) Is Nothing Then
|
|
desktoppanel.BackColor = desktoppanelcolour
|
|
desktoppanel.BackgroundImage = Nothing
|
|
Else
|
|
desktoppanel.BackgroundImage = skindesktoppanel(0)
|
|
desktoppanel.BackgroundImageLayout = skindesktoppanelstyle
|
|
desktoppanel.BackColor = Color.Transparent
|
|
End If
|
|
|
|
desktoppanel.Size = New Size(desktoppanel.Size.Width, desktoppanelheight)
|
|
Select Case desktoppanelposition
|
|
Case "Top"
|
|
desktoppanel.Dock = DockStyle.Top
|
|
desktopappmenu.Dock = DockStyle.Top
|
|
Case "Bottom"
|
|
desktoppanel.Dock = DockStyle.Bottom
|
|
desktopappmenu.Dock = DockStyle.Bottom
|
|
End Select
|
|
desktoppanel.Show()
|
|
Else
|
|
desktoppanel.Hide()
|
|
End If
|
|
|
|
If boughtapplaunchermenu = True Then
|
|
|
|
ApplicationsToolStripMenuItem.Font = New Font(applicationbuttontextfont, applicationbuttontextsize, 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)
|
|
desktopappmenu.ImageScalingSize = New Size(launchericonsize, launchericonsize)
|
|
KnowledgeInputToolStripMenuItem.Text = knowledgeinputname
|
|
ShiftoriumToolStripMenuItem.Text = shiftoriumname
|
|
ClockToolStripMenuItem.Text = clockname
|
|
ShifterToolStripMenuItem.Text = shiftername
|
|
TerminalToolStripMenuItem.Text = terminalname
|
|
PongToolStripMenuItem.Text = pongname
|
|
FileSkimmerToolStripMenuItem.Text = fileskimmername
|
|
TextPadToolStripMenuItem.Text = textpadname
|
|
SkinLoaderToolStripMenuItem.Text = skinloadername
|
|
ArtpadToolStripMenuItem.Text = artpadname
|
|
CalculatorToolStripMenuItem.Text = calculatorname
|
|
AudioplayerToolStripMenuItem.Text = audioplayername
|
|
WebBrowserToolStripMenuItem.Text = webbrowsername
|
|
VideoplayerToolStripMenuItem.Text = videoplayername
|
|
NameChangerToolStripMenuItem.Text = namechangername
|
|
IconManagerToolStripMenuItem.Text = iconmanagername
|
|
BitnoteWalletToolStripMenuItem.Text = bitnotewalletname
|
|
BitnoteDiggerToolStripMenuItem.Text = bitnotediggername
|
|
SkinShifterToolStripMenuItem.Text = skinshiftername
|
|
ShiftnetToolStripMenuItem.Text = shiftnetname
|
|
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
|
|
applaunchermenuholder.Size = ApplicationsToolStripMenuItem.Size
|
|
ApplicationsToolStripMenuItem.ForeColor = applicationsbuttontextcolour
|
|
ApplicationsToolStripMenuItem.BackColor = applauncherbuttoncolour
|
|
applaunchermenuholder.Height = applicationbuttonheight
|
|
desktopappmenu.Height = applicationbuttonheight
|
|
ApplicationsToolStripMenuItem.Height = 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.Text = ""
|
|
End If
|
|
|
|
Else
|
|
ApplicationsToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalclock = True Then
|
|
ClockToolStripMenuItem.Visible = True
|
|
If boughtclockicon = True Then
|
|
ClockToolStripMenuItem.Image = clockiconlauncher
|
|
End If
|
|
Else
|
|
ClockToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalknowledgeinput = True Then
|
|
KnowledgeInputToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
KnowledgeInputToolStripMenuItem.Image = knowledgeinputiconlauncher
|
|
End If
|
|
Else
|
|
KnowledgeInputToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalshiftorium = True Then
|
|
ShiftoriumToolStripMenuItem.Visible = True
|
|
If boughtshiftoriumicon = True Then
|
|
ShiftoriumToolStripMenuItem.Image = shiftoriumiconlauncher
|
|
End If
|
|
Else
|
|
ShiftoriumToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalshifter = True Then
|
|
ShifterToolStripMenuItem.Visible = True
|
|
If boughtshiftericon = True Then
|
|
ShifterToolStripMenuItem.Image = shiftericonlauncher
|
|
End If
|
|
Else
|
|
ShifterToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalpong = True Then
|
|
PongToolStripMenuItem.Visible = True
|
|
If boughtpongicon = True Then
|
|
PongToolStripMenuItem.Image = pongiconlauncher
|
|
End If
|
|
Else
|
|
PongToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalfileskimmer = True Then
|
|
FileSkimmerToolStripMenuItem.Visible = True
|
|
If boughtfileskimmericon = True Then
|
|
FileSkimmerToolStripMenuItem.Image = fileskimmericonlauncher
|
|
End If
|
|
Else
|
|
FileSkimmerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtaltextpad = True Then
|
|
TextPadToolStripMenuItem.Visible = True
|
|
If boughttextpadicon = True Then
|
|
TextPadToolStripMenuItem.Image = textpadiconlauncher
|
|
End If
|
|
Else
|
|
TextPadToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtskinning = True Then
|
|
SkinLoaderToolStripMenuItem.Visible = True
|
|
SkinLoaderToolStripMenuItem.Image = skinloadericonlauncher
|
|
Else
|
|
SkinLoaderToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtalartpad = True Then
|
|
ArtpadToolStripMenuItem.Visible = True
|
|
If boughtartpadicon = True Then
|
|
ArtpadToolStripMenuItem.Image = artpadiconlauncher
|
|
End If
|
|
Else
|
|
ArtpadToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtcalculator = True Then
|
|
CalculatorToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
CalculatorToolStripMenuItem.Image = calculatoriconlauncher
|
|
End If
|
|
Else
|
|
CalculatorToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtaudioplayer = True Then
|
|
AudioplayerToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
AudioplayerToolStripMenuItem.Image = audioplayericonlauncher
|
|
End If
|
|
Else
|
|
AudioplayerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtwebbrowser = True Then
|
|
WebBrowserToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
WebBrowserToolStripMenuItem.Image = webbrowsericonlauncher
|
|
End If
|
|
Else
|
|
WebBrowserToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtvideoplayer = True Then
|
|
VideoplayerToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
VideoplayerToolStripMenuItem.Image = videoplayericonlauncher
|
|
End If
|
|
Else
|
|
VideoplayerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtnamechanger = True Then
|
|
NameChangerToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
NameChangerToolStripMenuItem.Image = namechangericonlauncher
|
|
End If
|
|
Else
|
|
NameChangerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughticonmanager = True Then
|
|
IconManagerToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
IconManagerToolStripMenuItem.Image = iconmanagericonlauncher
|
|
End If
|
|
Else
|
|
IconManagerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtbitnotewallet = True Then
|
|
BitnoteWalletToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
BitnoteWalletToolStripMenuItem.Image = bitnotewalleticonlauncher
|
|
End If
|
|
Else
|
|
BitnoteWalletToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtbitnotedigger = True Then
|
|
BitnoteDiggerToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
BitnoteDiggerToolStripMenuItem.Image = bitnotediggericonlauncher
|
|
End If
|
|
Else
|
|
BitnoteDiggerToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtskinshifter = True Then
|
|
SkinShifterToolStripMenuItem.Visible = True
|
|
If boughtknowledgeinputicon = True Then
|
|
SkinShifterToolStripMenuItem.Image = skinshiftericonlauncher
|
|
End If
|
|
Else
|
|
SkinShifterToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtshiftnet = True Then
|
|
SkinShifterToolStripMenuItem.Visible = True
|
|
If boughtshiftneticon = True Then
|
|
ShiftnetToolStripMenuItem.Image = shiftneticonlauncher
|
|
End If
|
|
Else
|
|
ShiftnetToolStripMenuItem.Visible = False
|
|
End If
|
|
|
|
If boughtdesktoppanelclock = True Then
|
|
setclocktime()
|
|
paneltimetext.ForeColor = clocktextcolour
|
|
|
|
If skindesktoppaneltime(0) Is Nothing Then
|
|
timepanel.BackColor = clockbackgroundcolor
|
|
timepanel.BackgroundImage = Nothing
|
|
Else
|
|
timepanel.BackColor = Color.Transparent
|
|
timepanel.BackgroundImage = skindesktoppaneltime(0)
|
|
timepanel.BackgroundImageLayout = skindesktoppaneltimestyle
|
|
End If
|
|
paneltimetext.Font = New Font(panelclocktextfont, panelclocktextsize, panelclocktextstyle)
|
|
timepanel.Size = New Size(paneltimetext.Width + 3, timepanel.Height)
|
|
paneltimetext.Location = New Point(0, panelclocktexttop)
|
|
timepanel.Show()
|
|
Else
|
|
timepanel.Hide()
|
|
End If
|
|
|
|
If boughtapplaunchershutdown = True Then
|
|
ShutdownToolStripMenuItem.Visible = True
|
|
ToolStripSeparator1.Visible = True
|
|
If boughtshutdownicon = True Then
|
|
ShutdownToolStripMenuItem.Image = shutdowniconlauncher
|
|
End If
|
|
Else
|
|
ShutdownToolStripMenuItem.Visible = False
|
|
ToolStripSeparator1.Visible = False
|
|
End If
|
|
|
|
If boughtterminalicon = True Then
|
|
TerminalToolStripMenuItem.Image = terminaliconlauncher
|
|
End If
|
|
|
|
If boughttitlebar = False Then
|
|
titlebarheight = 0
|
|
End If
|
|
|
|
If boughtwindowborders = False Then
|
|
windowbordersize = 0
|
|
End If
|
|
|
|
setuppanelbuttons()
|
|
|
|
End Sub
|
|
|
|
Public Sub setuppanelbuttons()
|
|
If boughtpanelbuttons Then
|
|
If Knowledge_Input.Visible Then pnlpanelbuttonknowledgeinput.Show() Else pnlpanelbuttonknowledgeinput.Hide()
|
|
If Shiftorium.Visible Then pnlpanelbuttonshiftorium.Show() Else pnlpanelbuttonshiftorium.Hide()
|
|
If Clock.Visible Then pnlpanelbuttonclock.Show() Else pnlpanelbuttonclock.Hide()
|
|
If Shifter.Visible Then pnlpanelbuttonshifter.Show() Else pnlpanelbuttonshifter.Hide()
|
|
If Colour_Picker.Visible Then pnlpanelbuttoncolourpicker.Show() Else pnlpanelbuttoncolourpicker.Hide()
|
|
If infobox.Visible Then pnlpanelbuttoninfobox.Show() Else pnlpanelbuttoninfobox.Hide()
|
|
If Pong.Visible Then pnlpanelbuttonpong.Show() Else pnlpanelbuttonpong.Hide()
|
|
If File_Skimmer.Visible Then pnlpanelbuttonfileskimmer.Show() Else pnlpanelbuttonfileskimmer.Hide()
|
|
If File_Opener.Visible Then pnlpanelbuttonfileopener.Show() Else pnlpanelbuttonfileopener.Hide()
|
|
If File_Saver.Visible Then pnlpanelbuttonfilesaver.Show() Else pnlpanelbuttonfilesaver.Hide()
|
|
If TextPad.Visible Then pnlpanelbuttontextpad.Show() Else pnlpanelbuttontextpad.Hide()
|
|
If Graphic_Picker.Visible Then pnlpanelbuttongraphicpicker.Show() Else pnlpanelbuttongraphicpicker.Hide()
|
|
If Skin_Loader.Visible Then pnlpanelbuttonskinloader.Show() Else pnlpanelbuttonskinloader.Hide()
|
|
If ArtPad.Visible Then pnlpanelbuttonartpad.Show() Else pnlpanelbuttonartpad.Hide()
|
|
If Calculator.Visible Then pnlpanelbuttoncalculator.Show() Else pnlpanelbuttoncalculator.Hide()
|
|
If Audio_Player.Visible Then pnlpanelbuttonaudioplayer.Show() Else pnlpanelbuttonaudioplayer.Hide()
|
|
If Web_Browser.Visible Then pnlpanelbuttonwebbrowser.Show() Else pnlpanelbuttonwebbrowser.Hide()
|
|
If Video_Player.Visible Then pnlpanelbuttonvideoplayer.Show() Else pnlpanelbuttonvideoplayer.Hide()
|
|
If Name_Changer.Visible Then pnlpanelbuttonnamechanger.Show() Else pnlpanelbuttonnamechanger.Hide()
|
|
If Icon_Manager.Visible Then pnlpanelbuttoniconmanager.Show() Else pnlpanelbuttoniconmanager.Hide()
|
|
If Bitnote_Wallet.Visible Then pnlpanelbuttonbitnotewallet.Show() Else pnlpanelbuttonbitnotewallet.Hide()
|
|
If Bitnote_Digger.Visible Then pnlpanelbuttonbitnotedigger.Show() Else pnlpanelbuttonbitnotedigger.Hide()
|
|
If Skinshifter.Visible Then pnlpanelbuttonskinshifter.Show() Else pnlpanelbuttonskinshifter.Hide()
|
|
If Shiftnet.Visible Then pnlpanelbuttonshiftnet.Show() Else pnlpanelbuttonshiftnet.Hide()
|
|
If Downloader.Visible Then pnlpanelbuttondownloader.Show() Else pnlpanelbuttondownloader.Hide()
|
|
If Terminal.Visible Then pnlpanelbuttonterminal.Show() Else pnlpanelbuttonterminal.Hide()
|
|
|
|
tbknowledgeinputicon.Image = knowledgeinputiconpanelbutton.Clone
|
|
|
|
tbknowledgeinputtext.Text = knowledgeinputname
|
|
tbshiftoriumtext.Text = shiftoriumname
|
|
tbclocktext.Text = clockname
|
|
tbshiftertext.Text = shiftername
|
|
tbcolourpickertext.Text = colourpickername
|
|
tbpongtext.Text = pongname
|
|
tbfileskimmertext.Text = fileskimmername
|
|
tbfileopenertext.Text = fileopenername
|
|
tbfilesavertext.Text = filesavername
|
|
tbtextpadtext.Text = textpadname
|
|
tbgraphicpickertext.Text = graphicpickername
|
|
tbskinloadertext.Text = skinloadername
|
|
tbartpadtext.Text = artpadname
|
|
tbcalculatortext.Text = calculatorname
|
|
tbaudioplayertext.Text = audioplayername
|
|
tbwebbrowsertext.Text = webbrowsername
|
|
tbvideoplayertext.Text = videoplayername
|
|
tbnamechangertext.Text = namechangername
|
|
tbiconmanagertext.Text = iconmanagername
|
|
tbbitnotewallettext.Text = bitnotewalletname
|
|
tbbitnotediggertext.Text = bitnotediggername
|
|
tbskinshiftertext.Text = skinshiftername
|
|
tbshiftnettext.Text = shiftnetname
|
|
tbdownloadertext.Text = downloadername
|
|
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)
|
|
|
|
setpanelbuttonappearnce(pnlpanelbuttonknowledgeinput, tbknowledgeinputicon, tbknowledgeinputtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonshiftorium, tbshiftoriumicon, tbshiftoriumtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonclock, tbclockicon, tbclocktext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonshifter, tbshiftericon, tbshiftertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttoncolourpicker, tbcolourpickericon, tbcolourpickertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttoninfobox, tbinfoboxicon, tbinfoboxtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonpong, tbpongicon, tbpongtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonfileskimmer, tbfileskimmericon, tbfileskimmertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonfileopener, tbfileopenericon, tbfileopenertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonfilesaver, tbfilesavericon, tbfilesavertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttontextpad, tbtextpadicon, tbtextpadtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttongraphicpicker, tbgraphicpickericon, tbgraphicpickertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonskinloader, tbskinloadericon, tbskinloadertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonartpad, tbartpadicon, tbartpadtext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttoncalculator, tbcalculatoricon, tbcalculatortext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonaudioplayer, tbaudioplayericon, tbaudioplayertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonwebbrowser, tbwebbrowsericon, tbwebbrowsertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonvideoplayer, tbvideoplayericon, tbvideoplayertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonnamechanger, tbnamechangericon, tbnamechangertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttoniconmanager, tbiconmanagericon, tbiconmanagertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonbitnotewallet, tbbitnotewalleticon, tbbitnotewallettext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonbitnotedigger, tbbitnotediggericon, tbbitnotediggertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonskinshifter, tbskinshiftericon, tbskinshiftertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonshiftnet, tbshiftneticon, tbshiftnettext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttondownloader, tbdownloadericon, tbdownloadertext, False)
|
|
setpanelbuttonappearnce(pnlpanelbuttonterminal, tbterminalicon, tbterminaltext, False)
|
|
|
|
setuppanelbuttonicons(tbknowledgeinputicon, knowledgeinputiconpanelbutton)
|
|
setuppanelbuttonicons(tbshiftoriumicon, shiftoriumiconpanelbutton)
|
|
setuppanelbuttonicons(tbclockicon, clockiconpanelbutton)
|
|
setuppanelbuttonicons(tbshiftericon, shiftericonpanelbutton)
|
|
setuppanelbuttonicons(tbcolourpickericon, colourpickericonpanelbutton)
|
|
setuppanelbuttonicons(tbinfoboxicon, infoboxiconpanelbutton)
|
|
setuppanelbuttonicons(tbpongicon, pongiconpanelbutton)
|
|
setuppanelbuttonicons(tbfileskimmericon, fileskimmericonpanelbutton)
|
|
setuppanelbuttonicons(tbfileopenericon, fileopenericonpanelbutton)
|
|
setuppanelbuttonicons(tbfilesavericon, filesavericonpanelbutton)
|
|
setuppanelbuttonicons(tbtextpadicon, textpadiconpanelbutton)
|
|
setuppanelbuttonicons(tbgraphicpickericon, graphicpickericonpanelbutton)
|
|
setuppanelbuttonicons(tbskinloadericon, skinloadericonpanelbutton)
|
|
setuppanelbuttonicons(tbartpadicon, artpadiconpanelbutton)
|
|
setuppanelbuttonicons(tbcalculatoricon, calculatoriconpanelbutton)
|
|
setuppanelbuttonicons(tbaudioplayericon, audioplayericonpanelbutton)
|
|
setuppanelbuttonicons(tbwebbrowsericon, webbrowsericonpanelbutton)
|
|
setuppanelbuttonicons(tbvideoplayericon, videoplayericonpanelbutton)
|
|
setuppanelbuttonicons(tbnamechangericon, namechangericonpanelbutton)
|
|
setuppanelbuttonicons(tbiconmanagericon, iconmanagericonpanelbutton)
|
|
setuppanelbuttonicons(tbbitnotewalleticon, bitnotewalleticonpanelbutton)
|
|
setuppanelbuttonicons(tbbitnotediggericon, bitnotediggericonpanelbutton)
|
|
setuppanelbuttonicons(tbskinshiftericon, skinshiftericonpanelbutton)
|
|
setuppanelbuttonicons(tbshiftneticon, shiftneticonpanelbutton)
|
|
setuppanelbuttonicons(tbdownloadericon, downloadericonpanelbutton)
|
|
setuppanelbuttonicons(tbterminalicon, terminaliconpanelbutton)
|
|
|
|
pnlpanelbuttonholder.Padding = New Padding(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)
|
|
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)
|
|
End Sub
|
|
|
|
Private Sub ShiftOSDesktop_keydown(sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
|
|
If e.KeyCode = Keys.T AndAlso e.Control Then
|
|
Terminal.Show()
|
|
Terminal.BringToFront()
|
|
If terminalfullscreen = True Then Terminal.fullterminal()
|
|
End If
|
|
End Sub
|
|
|
|
Public Sub closeeverything()
|
|
|
|
If boughtmultitasking = False Then
|
|
'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"
|
|
'do nothing
|
|
Case Else
|
|
f.Close()
|
|
End Select
|
|
Next
|
|
|
|
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"
|
|
'do nothing
|
|
Case Else
|
|
f.Close()
|
|
End Select
|
|
Next
|
|
|
|
End If
|
|
forceclose = False
|
|
End Sub
|
|
|
|
Public Sub shutdownshiftos()
|
|
forceclose = True
|
|
closeeverything()
|
|
Terminal.txtterm.Text = Terminal.txtterm.Text & Environment.NewLine & "System Is Shutting Down..." & Environment.NewLine
|
|
log = log & My.Computer.Clock.LocalTime & " ShutDown ShiftOS with " & codepoints & " Code Points!" & Environment.NewLine
|
|
savegame()
|
|
Terminal.tmrshutdown.Start()
|
|
End Sub
|
|
|
|
Public Sub addtitlebars()
|
|
|
|
'attempted future code to dramatically increase development time and simplify code
|
|
'For Each f In My.Application.OpenForms.Cast(Of Form)().ToArray()
|
|
' Select Case f.Name
|
|
' Case "ShiftOSDesktop", "HijackScreen", "ShiftOS Save File Converter"
|
|
' 'do nothing
|
|
' Case Else
|
|
' If f.Visible = True Then
|
|
' f.titlebar.Show()
|
|
' f.setuptitlebar()
|
|
' f.Size = New Size(f.Width, f.Size.Height + f.titlebar.Height)
|
|
' End If
|
|
' End Select
|
|
'Next
|
|
|
|
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
|
|
End Sub
|
|
|
|
Public Sub addborders()
|
|
Knowledge_Input.pgleft.Show()
|
|
Knowledge_Input.pgbottom.Show()
|
|
Knowledge_Input.pgright.Show()
|
|
Knowledge_Input.Size = New Size(Knowledge_Input.Width + Knowledge_Input.pgleft.Width + Knowledge_Input.pgright.Width, Knowledge_Input.Height + Knowledge_Input.pgbottom.Height)
|
|
If boughttitlebar = True Then Knowledge_Input.setuptitlebar()
|
|
|
|
Shiftorium.pgleft.Show()
|
|
Shiftorium.pgbottom.Show()
|
|
Shiftorium.pgright.Show()
|
|
Shiftorium.Size = New Size(Shiftorium.Width + Shiftorium.pgleft.Width + Shiftorium.pgright.Width, Shiftorium.Height + Shiftorium.pgbottom.Height)
|
|
If boughttitlebar = True Then Shiftorium.setuptitlebar()
|
|
|
|
Clock.pgleft.Show()
|
|
Clock.pgbottom.Show()
|
|
Clock.pgright.Show()
|
|
Clock.Size = New Size(Clock.Width + Clock.pgleft.Width + Clock.pgright.Width, Clock.Height + Clock.pgbottom.Height)
|
|
If boughttitlebar = True Then Clock.setuptitlebar()
|
|
|
|
Shifter.pgleft.Show()
|
|
Shifter.pgbottom.Show()
|
|
Shifter.pgright.Show()
|
|
Shifter.Size = New Size(Shifter.Width + Shifter.pgleft.Width + Shifter.pgright.Width, Shifter.Height + Shifter.pgbottom.Height)
|
|
If boughttitlebar = True Then Shifter.setuptitlebar()
|
|
|
|
Colour_Picker.pgleft.Show()
|
|
Colour_Picker.pgbottom.Show()
|
|
Colour_Picker.pgright.Show()
|
|
Colour_Picker.Size = New Size(Colour_Picker.Width + Colour_Picker.pgleft.Width + Colour_Picker.pgright.Width, Colour_Picker.Height + Colour_Picker.pgbottom.Height)
|
|
If boughttitlebar = True Then Colour_Picker.setuptitlebar()
|
|
|
|
infobox.pgleft.Show()
|
|
infobox.pgbottom.Show()
|
|
infobox.pgright.Show()
|
|
infobox.Size = New Size(infobox.Width + infobox.pgleft.Width + infobox.pgright.Width, infobox.Height + infobox.pgbottom.Height)
|
|
If boughttitlebar = True Then infobox.setuptitlebar()
|
|
|
|
Pong.pgleft.Show()
|
|
Pong.pgbottom.Show()
|
|
Pong.pgright.Show()
|
|
Pong.Size = New Size(Pong.Width + Pong.pgleft.Width + Pong.pgright.Width, Pong.Height + Pong.pgbottom.Height)
|
|
If boughttitlebar = True Then Pong.setuptitlebar()
|
|
|
|
File_Skimmer.pgleft.Show()
|
|
File_Skimmer.pgbottom.Show()
|
|
File_Skimmer.pgright.Show()
|
|
File_Skimmer.Size = New Size(File_Skimmer.Width + File_Skimmer.pgleft.Width + File_Skimmer.pgright.Width, File_Skimmer.Height + File_Skimmer.pgbottom.Height)
|
|
If boughttitlebar = True Then File_Skimmer.setuptitlebar()
|
|
|
|
TextPad.pgleft.Show()
|
|
TextPad.pgbottom.Show()
|
|
TextPad.pgright.Show()
|
|
TextPad.Size = New Size(File_Skimmer.Width + TextPad.pgleft.Width + TextPad.pgright.Width, TextPad.Height + TextPad.pgbottom.Height)
|
|
If boughttitlebar = True Then TextPad.setuptitlebar()
|
|
|
|
File_Opener.pgleft.Show()
|
|
File_Opener.pgbottom.Show()
|
|
File_Opener.pgright.Show()
|
|
File_Opener.Size = New Size(File_Skimmer.Width + File_Opener.pgleft.Width + File_Opener.pgright.Width, File_Opener.Height + File_Opener.pgbottom.Height)
|
|
If boughttitlebar = True Then File_Opener.setuptitlebar()
|
|
|
|
File_Saver.pgleft.Show()
|
|
File_Saver.pgbottom.Show()
|
|
File_Saver.pgright.Show()
|
|
File_Saver.Size = New Size(File_Skimmer.Width + File_Saver.pgleft.Width + File_Saver.pgright.Width, File_Saver.Height + File_Saver.pgbottom.Height)
|
|
If boughttitlebar = True Then File_Saver.setuptitlebar()
|
|
|
|
Graphic_Picker.pgleft.Show()
|
|
Graphic_Picker.pgbottom.Show()
|
|
Graphic_Picker.pgright.Show()
|
|
Graphic_Picker.Size = New Size(Graphic_Picker.Width + Graphic_Picker.pgleft.Width + Graphic_Picker.pgright.Width, Graphic_Picker.Height + Graphic_Picker.pgbottom.Height)
|
|
If boughttitlebar = True Then Graphic_Picker.setuptitlebar()
|
|
|
|
Skin_Loader.pgleft.Show()
|
|
Skin_Loader.pgbottom.Show()
|
|
Skin_Loader.pgright.Show()
|
|
Skin_Loader.Size = New Size(Skin_Loader.Width + Skin_Loader.pgleft.Width + Skin_Loader.pgright.Width, Skin_Loader.Height + Skin_Loader.pgbottom.Height)
|
|
If boughttitlebar = True Then Skin_Loader.setuptitlebar()
|
|
|
|
ArtPad.pgleft.Show()
|
|
ArtPad.pgbottom.Show()
|
|
ArtPad.pgright.Show()
|
|
ArtPad.Size = New Size(ArtPad.Width + ArtPad.pgleft.Width + ArtPad.pgright.Width, ArtPad.Height + ArtPad.pgbottom.Height)
|
|
If boughttitlebar = True Then ArtPad.setuptitlebar()
|
|
|
|
Calculator.pgleft.Show()
|
|
Calculator.pgbottom.Show()
|
|
Calculator.pgright.Show()
|
|
Calculator.Size = New Size(Calculator.Width + Calculator.pgleft.Width + Calculator.pgright.Width, Calculator.Height + Calculator.pgbottom.Height)
|
|
If boughttitlebar = True Then Calculator.setuptitlebar()
|
|
|
|
Audio_Player.pgleft.Show()
|
|
Audio_Player.pgbottom.Show()
|
|
Audio_Player.pgright.Show()
|
|
Audio_Player.Size = New Size(Audio_Player.Width + Audio_Player.pgleft.Width + Audio_Player.pgright.Width, Audio_Player.Height + Audio_Player.pgbottom.Height)
|
|
If boughttitlebar = True Then Audio_Player.setuptitlebar()
|
|
|
|
Web_Browser.pgleft.Show()
|
|
Web_Browser.pgbottom.Show()
|
|
Web_Browser.pgright.Show()
|
|
Web_Browser.Size = New Size(Web_Browser.Width + Web_Browser.pgleft.Width + Web_Browser.pgright.Width, Web_Browser.Height + Web_Browser.pgbottom.Height)
|
|
If boughttitlebar = True Then Web_Browser.setuptitlebar()
|
|
|
|
Video_Player.pgleft.Show()
|
|
Video_Player.pgbottom.Show()
|
|
Video_Player.pgright.Show()
|
|
Video_Player.Size = New Size(Video_Player.Width + Video_Player.pgleft.Width + Video_Player.pgright.Width, Video_Player.Height + Video_Player.pgbottom.Height)
|
|
If boughttitlebar = True Then Video_Player.setuptitlebar()
|
|
|
|
Name_Changer.pgleft.Show()
|
|
Name_Changer.pgbottom.Show()
|
|
Name_Changer.pgright.Show()
|
|
Name_Changer.Size = New Size(Name_Changer.Width + Name_Changer.pgleft.Width + Name_Changer.pgright.Width, Name_Changer.Height + Name_Changer.pgbottom.Height)
|
|
If boughttitlebar = True Then Name_Changer.setuptitlebar()
|
|
|
|
Icon_Manager.pgleft.Show()
|
|
Icon_Manager.pgbottom.Show()
|
|
Icon_Manager.pgright.Show()
|
|
Icon_Manager.Size = New Size(Icon_Manager.Width + Icon_Manager.pgleft.Width + Icon_Manager.pgright.Width, Icon_Manager.Height + Icon_Manager.pgbottom.Height)
|
|
If boughttitlebar = True Then Icon_Manager.setuptitlebar()
|
|
|
|
Bitnote_Wallet.pgleft.Show()
|
|
Bitnote_Wallet.pgbottom.Show()
|
|
Bitnote_Wallet.pgright.Show()
|
|
Bitnote_Wallet.Size = New Size(Bitnote_Wallet.Width + Bitnote_Wallet.pgleft.Width + Bitnote_Wallet.pgright.Width, Bitnote_Wallet.Height + Bitnote_Wallet.pgbottom.Height)
|
|
If boughttitlebar = True Then Bitnote_Wallet.setuptitlebar()
|
|
|
|
Bitnote_Digger.pgleft.Show()
|
|
Bitnote_Digger.pgbottom.Show()
|
|
Bitnote_Digger.pgright.Show()
|
|
Bitnote_Digger.Size = New Size(Bitnote_Digger.Width + Bitnote_Digger.pgleft.Width + Bitnote_Digger.pgright.Width, Bitnote_Digger.Height + Bitnote_Digger.pgbottom.Height)
|
|
If boughttitlebar = True Then Bitnote_Digger.setuptitlebar()
|
|
|
|
Skinshifter.pgleft.Show()
|
|
Skinshifter.pgbottom.Show()
|
|
Skinshifter.pgright.Show()
|
|
Skinshifter.Size = New Size(Skinshifter.Width + Skinshifter.pgleft.Width + Skinshifter.pgright.Width, Skinshifter.Height + Skinshifter.pgbottom.Height)
|
|
If boughttitlebar = True Then Skinshifter.setuptitlebar()
|
|
|
|
Shiftnet.pgleft.Show()
|
|
Shiftnet.pgbottom.Show()
|
|
Shiftnet.pgright.Show()
|
|
Shiftnet.Size = New Size(Shiftnet.Width + Shiftnet.pgleft.Width + Shiftnet.pgright.Width, Shiftnet.Height + Shiftnet.pgbottom.Height)
|
|
If boughttitlebar = True Then Shiftnet.setuptitlebar()
|
|
|
|
Downloader.pgleft.Show()
|
|
Downloader.pgbottom.Show()
|
|
Downloader.pgright.Show()
|
|
Downloader.Size = New Size(Downloader.Width + Downloader.pgleft.Width + Downloader.pgright.Width, Downloader.Height + Downloader.pgbottom.Height)
|
|
If boughttitlebar = True Then Downloader.setuptitlebar()
|
|
|
|
template.pgleft.Show()
|
|
template.pgbottom.Show()
|
|
template.pgright.Show()
|
|
template.Size = New Size(template.Width + template.pgleft.Width + template.pgright.Width, template.Height + template.pgbottom.Height)
|
|
If boughttitlebar = True Then ArtPad.setuptitlebar()
|
|
|
|
If terminalfullscreen = False Then
|
|
Terminal.pgleft.Show()
|
|
Terminal.pgbottom.Show()
|
|
Terminal.pgright.Show()
|
|
Terminal.Size = New Size(Terminal.Width + Terminal.pgleft.Width + Terminal.pgright.Width, Terminal.Height + Terminal.pgbottom.Height)
|
|
If boughttitlebar = True Then Terminal.setuptitlebar()
|
|
End If
|
|
End Sub
|
|
|
|
Public Sub 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
|
|
Knowledge_Input.TopMost = False
|
|
Shiftorium.TopMost = False
|
|
Clock.TopMost = False
|
|
Shifter.TopMost = False
|
|
Colour_Picker.TopMost = False
|
|
infobox.TopMost = False
|
|
Pong.TopMost = False
|
|
File_Skimmer.TopMost = False
|
|
TextPad.TopMost = False
|
|
File_Opener.TopMost = False
|
|
File_Saver.TopMost = False
|
|
Graphic_Picker.TopMost = False
|
|
Skin_Loader.TopMost = False
|
|
ArtPad.TopMost = False
|
|
Calculator.TopMost = False
|
|
Audio_Player.TopMost = False
|
|
Web_Browser.TopMost = False
|
|
Video_Player.TopMost = False
|
|
Name_Changer.TopMost = False
|
|
Icon_Manager.TopMost = False
|
|
Bitnote_Wallet.TopMost = False
|
|
Bitnote_Digger.TopMost = False
|
|
Skinshifter.TopMost = False
|
|
Shiftnet.TopMost = False
|
|
Downloader.TopMost = False
|
|
template.TopMost = False
|
|
Terminal.TopMost = False
|
|
Else
|
|
Me.BringToFront()
|
|
Knowledge_Input.TopMost = True
|
|
Shiftorium.TopMost = True
|
|
Clock.TopMost = True
|
|
Shifter.TopMost = True
|
|
Colour_Picker.TopMost = True
|
|
infobox.TopMost = True
|
|
Pong.TopMost = True
|
|
File_Skimmer.TopMost = True
|
|
TextPad.TopMost = True
|
|
File_Opener.TopMost = True
|
|
File_Saver.TopMost = True
|
|
Graphic_Picker.TopMost = True
|
|
Skin_Loader.TopMost = True
|
|
ArtPad.TopMost = True
|
|
Calculator.TopMost = True
|
|
Audio_Player.TopMost = True
|
|
Web_Browser.TopMost = True
|
|
Video_Player.TopMost = True
|
|
Name_Changer.TopMost = True
|
|
Icon_Manager.TopMost = True
|
|
Bitnote_Wallet.TopMost = True
|
|
Bitnote_Digger.TopMost = True
|
|
Skinshifter.TopMost = True
|
|
Shiftnet.TopMost = True
|
|
Downloader.TopMost = True
|
|
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))
|
|
End Sub
|
|
|
|
Private Function GetImage(ByVal fileName As String) As Bitmap
|
|
Dim ret As Bitmap
|
|
Using img As Image = Image.FromFile(fileName)
|
|
ret = New Bitmap(img)
|
|
End Using
|
|
Return ret
|
|
End Function
|
|
|
|
Public Sub setcolours()
|
|
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 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")
|
|
End If
|
|
End Sub
|
|
|
|
Public Sub setupicons()
|
|
|
|
iconmanagericondatalines = IO.File.ReadAllLines("C:\ShiftOS\Shiftum42\Icons\icondata.dat")
|
|
titlebariconsize = iconmanagericondatalines(0)
|
|
panelbuttoniconsize = iconmanagericondatalines(1)
|
|
launchericonsize = iconmanagericondatalines(2)
|
|
|
|
setupiconprocess("titlebarartpadicon", artpadicontitlebar)
|
|
setupiconprocess("titlebaraudioplayericon", audioplayericontitlebar)
|
|
setupiconprocess("titlebarcalculatoricon", calculatoricontitlebar)
|
|
setupiconprocess("titlebarclockicon", clockicontitlebar)
|
|
setupiconprocess("titlebarcolourpickericon", colourpickericontitlebar)
|
|
setupiconprocess("titlebarfileopenericon", fileopenericontitlebar)
|
|
setupiconprocess("titlebarfilesavericon", filesavericontitlebar)
|
|
setupiconprocess("titlebarfileskimmericon", fileskimmericontitlebar)
|
|
setupiconprocess("titlebargraphicpickericon", graphicpickericontitlebar)
|
|
setupiconprocess("titlebarinfoboxicon", infoboxicontitlebar)
|
|
setupiconprocess("titlebarknowledgeinputicon", knowledgeinputicontitlebar)
|
|
setupiconprocess("titlebarpongicon", pongicontitlebar)
|
|
setupiconprocess("titlebarshiftericon", shiftericontitlebar)
|
|
setupiconprocess("titlebarshiftoriumicon", shiftoriumicontitlebar)
|
|
setupiconprocess("titlebarskinloadericon", skinloadericontitlebar)
|
|
setupiconprocess("titlebarterminalicon", terminalicontitlebar)
|
|
setupiconprocess("titlebartextpadicon", textpadicontitlebar)
|
|
setupiconprocess("titlebarvideoplayericon", videoplayericontitlebar)
|
|
setupiconprocess("titlebarwebbrowsericon", webbrowsericontitlebar)
|
|
setupiconprocess("titlebarnamechangericon", namechangericontitlebar)
|
|
setupiconprocess("titlebariconmanagericon", iconmanagericontitlebar)
|
|
setupiconprocess("titlebarbitnotewalleticon", bitnotewalleticontitlebar)
|
|
setupiconprocess("titlebarbitnotediggericon", bitnotediggericontitlebar)
|
|
setupiconprocess("titlebarbitnotediggericon", bitnotediggericontitlebar)
|
|
|
|
setupiconprocess("panelbuttonartpadicon", artpadiconpanelbutton)
|
|
setupiconprocess("panelbuttonaudioplayericon", audioplayericonpanelbutton)
|
|
setupiconprocess("panelbuttoncalculatoricon", calculatoriconpanelbutton)
|
|
setupiconprocess("panelbuttonclockicon", clockiconpanelbutton)
|
|
setupiconprocess("panelbuttoncolourpickericon", colourpickericonpanelbutton)
|
|
setupiconprocess("panelbuttonfileopenericon", fileopenericonpanelbutton)
|
|
setupiconprocess("panelbuttonfilesavericon", filesavericonpanelbutton)
|
|
setupiconprocess("panelbuttonfileskimmericon", fileskimmericonpanelbutton)
|
|
setupiconprocess("panelbuttongraphicpickericon", graphicpickericonpanelbutton)
|
|
setupiconprocess("panelbuttoninfoboxicon", infoboxiconpanelbutton)
|
|
setupiconprocess("panelbuttonknowledgeinputicon", knowledgeinputiconpanelbutton)
|
|
setupiconprocess("panelbuttonpongicon", pongiconpanelbutton)
|
|
setupiconprocess("panelbuttonshiftericon", shiftericonpanelbutton)
|
|
setupiconprocess("panelbuttonshiftoriumicon", shiftoriumiconpanelbutton)
|
|
setupiconprocess("panelbuttonskinloadericon", skinloadericonpanelbutton)
|
|
setupiconprocess("panelbuttonterminalicon", terminaliconpanelbutton)
|
|
setupiconprocess("panelbuttontextpadicon", textpadiconpanelbutton)
|
|
setupiconprocess("panelbuttonvideoplayericon", videoplayericonpanelbutton)
|
|
setupiconprocess("panelbuttonwebbrowsericon", webbrowsericonpanelbutton)
|
|
setupiconprocess("panelbuttonnamechangericon", namechangericonpanelbutton)
|
|
setupiconprocess("panelbuttoniconmanagericon", iconmanagericonpanelbutton)
|
|
setupiconprocess("panelbuttonbitnotewalleticon", bitnotewalleticonpanelbutton)
|
|
setupiconprocess("panelbuttonbitnotediggericon", bitnotediggericonpanelbutton)
|
|
setupiconprocess("panelbuttonbitnotediggericon", bitnotediggericonpanelbutton)
|
|
|
|
setupiconprocess("launcherartpadicon", artpadiconlauncher)
|
|
setupiconprocess("launcheraudioplayericon", audioplayericonlauncher)
|
|
setupiconprocess("launchercalculatoricon", calculatoriconlauncher)
|
|
setupiconprocess("launcherclockicon", clockiconlauncher)
|
|
setupiconprocess("launchercolourpickericon", colourpickericonlauncher)
|
|
setupiconprocess("launcherfileopenericon", fileopenericonlauncher)
|
|
setupiconprocess("launcherfilesavericon", filesavericonlauncher)
|
|
setupiconprocess("launcherfileskimmericon", fileskimmericonlauncher)
|
|
setupiconprocess("launchergraphicpickericon", graphicpickericonlauncher)
|
|
setupiconprocess("launcherinfoboxicon", infoboxiconlauncher)
|
|
setupiconprocess("launcherknowledgeinputicon", knowledgeinputiconlauncher)
|
|
setupiconprocess("launcherpongicon", pongiconlauncher)
|
|
setupiconprocess("launchershiftericon", shiftericonlauncher)
|
|
setupiconprocess("launchershiftoriumicon", shiftoriumiconlauncher)
|
|
setupiconprocess("launcherskinloadericon", skinloadericonlauncher)
|
|
setupiconprocess("launcherterminalicon", terminaliconlauncher)
|
|
setupiconprocess("launchertextpadicon", textpadiconlauncher)
|
|
setupiconprocess("launchervideoplayericon", videoplayericonlauncher)
|
|
setupiconprocess("launcherwebbrowsericon", webbrowsericonlauncher)
|
|
setupiconprocess("launchernamechangericon", namechangericonlauncher)
|
|
setupiconprocess("launchericonmanagericon", iconmanagericonlauncher)
|
|
setupiconprocess("launcherbitnotewalleticon", bitnotewalleticonlauncher)
|
|
setupiconprocess("launcherbitnotediggericon", bitnotediggericonlauncher)
|
|
setupiconprocess("launcherbitnotediggericon", bitnotediggericonlauncher)
|
|
|
|
setupiconprocess("launchershutdownicon", shutdowniconlauncher)
|
|
End Sub
|
|
|
|
Private Sub KnowledgeInputToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KnowledgeInputToolStripMenuItem.Click
|
|
closeeverything()
|
|
log = log & My.Computer.Clock.LocalTime & " User opened Knowledge Input from the app launcher" & Environment.NewLine
|
|
Knowledge_Input.Show()
|
|
Knowledge_Input.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub ShiftoriumToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShiftoriumToolStripMenuItem.Click
|
|
closeeverything()
|
|
log = log & My.Computer.Clock.LocalTime & " User opened Shiftorium from the app launcher" & Environment.NewLine
|
|
Shiftorium.Show()
|
|
Shiftorium.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub ClockToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClockToolStripMenuItem.Click
|
|
closeeverything()
|
|
log = log & My.Computer.Clock.LocalTime & " User opened Clock from the app launcher" & Environment.NewLine
|
|
Clock.Show()
|
|
Clock.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub TerminalToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TerminalToolStripMenuItem.Click
|
|
closeeverything()
|
|
log = log & My.Computer.Clock.LocalTime & " User opened Terminal from the app launcher" & Environment.NewLine
|
|
Terminal.Show()
|
|
Terminal.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub CalculatorToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CalculatorToolStripMenuItem.Click
|
|
closeeverything()
|
|
Calculator.Show()
|
|
Calculator.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub ApplicationsToolStripMenuItem_MouseEnter(sender As Object, e As EventArgs) Handles ApplicationsToolStripMenuItem.MouseEnter
|
|
Me.Focus()
|
|
ToolStripManager.Renderer = New MyToolStripRenderer()
|
|
End Sub
|
|
|
|
Private Sub ShutdownToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShutdownToolStripMenuItem.Click
|
|
Terminal.Show()
|
|
Terminal.BringToFront()
|
|
log = log & My.Computer.Clock.LocalTime & " User Shut Down ShiftOS from the app launcher" & Environment.NewLine
|
|
shutdownshiftos()
|
|
End Sub
|
|
|
|
Private Sub clocktick_Tick(sender As Object, e As EventArgs) Handles clocktick.Tick
|
|
setclocktime()
|
|
End Sub
|
|
|
|
Private Sub setclocktime()
|
|
If boughtsplitsecondtime = True Then
|
|
paneltimetext.Text = TimeOfDay
|
|
Else
|
|
If boughtminuteaccuracytime = True Then
|
|
If Date.Now.Hour < 12 Then
|
|
paneltimetext.Text = TimeOfDay.Hour & ":" & Format(TimeOfDay.Minute, "00") & " AM"
|
|
Else
|
|
paneltimetext.Text = TimeOfDay.Hour - 12 & ":" & Format(TimeOfDay.Minute, "00") & " PM"
|
|
End If
|
|
Else
|
|
If boughtpmandam = True Then
|
|
If Date.Now.Hour < 12 Then
|
|
paneltimetext.Text = TimeOfDay.Hour & " AM"
|
|
Else
|
|
paneltimetext.Text = TimeOfDay.Hour - 12 & " PM"
|
|
End If
|
|
Else
|
|
If boughthourspastmidnight = True Then
|
|
paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60 / 60)
|
|
Else
|
|
If boughtminutespastmidnight = True Then
|
|
paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds / 60)
|
|
Else
|
|
If boughtsecondspastmidnight = True Then
|
|
paneltimetext.Text = Math.Floor(Date.Now.Subtract(Date.Today).TotalSeconds)
|
|
End If
|
|
End If
|
|
End If
|
|
End If
|
|
End If
|
|
End If
|
|
End Sub
|
|
|
|
Private Sub ShifterToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShifterToolStripMenuItem.Click
|
|
closeeverything()
|
|
log = log & My.Computer.Clock.LocalTime & " User opened Shifter from the app launcher" & Environment.NewLine
|
|
Shifter.Show()
|
|
Shifter.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub PongToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PongToolStripMenuItem.Click
|
|
closeeverything()
|
|
Pong.Show()
|
|
Pong.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub FileSkimmerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles FileSkimmerToolStripMenuItem.Click
|
|
closeeverything()
|
|
File_Skimmer.Show()
|
|
File_Skimmer.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub TextPadToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TextPadToolStripMenuItem.Click
|
|
closeeverything()
|
|
TextPad.Show()
|
|
TextPad.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub SkinLoaderToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SkinLoaderToolStripMenuItem.Click
|
|
closeeverything()
|
|
Skin_Loader.Show()
|
|
Skin_Loader.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub ArtpadToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ArtpadToolStripMenuItem.Click
|
|
closeeverything()
|
|
ArtPad.Show()
|
|
ArtPad.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub AudioplayerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AudioplayerToolStripMenuItem.Click
|
|
closeeverything()
|
|
Audio_Player.Show()
|
|
Audio_Player.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub WebBrowserToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles WebBrowserToolStripMenuItem.Click
|
|
closeeverything()
|
|
Web_Browser.Show()
|
|
Web_Browser.BringToFront()
|
|
If Web_Browser.Location.Y <= 0 Then Web_Browser.Location = New Point(Web_Browser.Location.X, Web_Browser.Location.Y + 5000)
|
|
Web_Browser.resettitlebar()
|
|
End Sub
|
|
|
|
Private Sub VideoplayerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles VideoplayerToolStripMenuItem.Click
|
|
closeeverything()
|
|
Video_Player.Show()
|
|
Video_Player.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub NameChangerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NameChangerToolStripMenuItem.Click
|
|
closeeverything()
|
|
Name_Changer.Show()
|
|
Name_Changer.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub IconManagerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles IconManagerToolStripMenuItem.Click
|
|
closeeverything()
|
|
Icon_Manager.Show()
|
|
Icon_Manager.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub bitnotewalletToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BitnoteWalletToolStripMenuItem.Click
|
|
closeeverything()
|
|
Bitnote_Wallet.Show()
|
|
Bitnote_Wallet.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub bitnotediggerToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BitnoteDiggerToolStripMenuItem.Click
|
|
closeeverything()
|
|
Bitnote_Digger.Show()
|
|
Bitnote_Digger.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub SkinshifterToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SkinShifterToolStripMenuItem.Click
|
|
closeeverything()
|
|
Skinshifter.Show()
|
|
Skinshifter.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub ShiftnetToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShiftnetToolStripMenuItem.Click
|
|
closeeverything()
|
|
Shiftnet.Show()
|
|
Shiftnet.BringToFront()
|
|
End Sub
|
|
|
|
Private Sub 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
|
|
Else
|
|
e.Graphics.DrawImage(skinapplauncherbutton(0), 0, 0, skinapplauncherbutton(0).Width, skinapplauncherbutton(0).Height)
|
|
End If
|
|
End Sub
|
|
|
|
Public Sub minimizeprogram(ByVal whatprogram As Form)
|
|
If whatprogram.Location.Y > 0 Then
|
|
whatprogram.Location = New Point(whatprogram.Location.X, whatprogram.Location.Y - 5000)
|
|
Else
|
|
whatprogram.Location = New Point(whatprogram.Location.X, whatprogram.Location.Y + 5000)
|
|
whatprogram.BringToFront()
|
|
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)
|
|
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)
|
|
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)
|
|
End If
|
|
End Sub
|
|
|
|
Private Sub pnlpanelbuttonfilesaver_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonfilesaver.Click, tbfilesavericon.Click, tbfilesavertext.Click
|
|
If boughtusefulpanelbuttons = True Then
|
|
minimizeprogram(File_Saver)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
End If
|
|
End Sub
|
|
|
|
Private Sub pnlpanelbuttonshifter_Click(sender As Object, e As EventArgs) Handles pnlpanelbuttonshifter.Click, tbshiftericon.Click, tbshiftertext.Click
|
|
If boughtusefulpanelbuttons = True Then
|
|
minimizeprogram(Shifter)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
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)
|
|
End If
|
|
End Sub
|
|
End Class |