#1 - File Skimmer bug fix + Fullscreen Login Screen

Fixed a bug with the File Skimmer, as well as adding a FullScreen Login
Screen test that can be utilized using the "test fullscreen login"
terminal command. There's also a "test fullscreen login customizer"
command to test the Customization Options for the login screen, though I
haven't even gotten close to completing that.

I've also referenced another DLL, one that I made called
"MichaelsMovableControlSuite.dll" that contains movable variations of
Windows Forms Controls. By movable, I mean that at run-time, the user
can drag these controls around, however some functions (such as the
ability to type in a MovableTextBox) have been disabled. These controls
are used for the Login Screen customizer.

1 files changed, 228 insertions, 151 deletions

diff --git a/ShiftOS/skins.vb b/ShiftOS/skins.vb
index 5224708..d38e80d 100644
--- a/ShiftOS/skins.vb
+++ b/ShiftOS/skins.vb
@@ -172,6 +172,43 @@ Module Skins
     Public pwrPanelBackgroundLayout As ImageLayout = ImageLayout.Stretch
     Public useClassicAppLauncher As Boolean = True
 
+
+    '0.0.9 ALPHA 2
+
+    'Login Screen
+
+    Public autologin As Boolean = True
+    Public fullScreen As Boolean = False
+    Public inputfont As String = "Trebuchet MS"
+    Public inputfontsize As Integer = 12
+    Public inputfontstyle As FontStyle = FontStyle.Regular
+    Public inputforecolor As Color = Color.Gray
+    Public inputbackcolor As Color = Color.Black
+    Public buttonfont As String = "Trebuchet MS"
+    Public buttonfontsize As Integer = 12
+    Public buttonfontstyle As FontStyle = FontStyle.Italic
+
+    Public userimagesize As Integer = 128
+    Public userimagelocation As Point = New Point(36, 202)
+    Public userimage As Image
+    Public userimagelayout As ImageLayout = ImageLayout.Stretch
+
+    Public loginbg As Image
+    Public loginbgcolor As Color = Color.Black
+    Public loginbglayout As ImageLayout = ImageLayout.Stretch
+
+    'Locations...
+
+    Public userTextboxX As Integer = 171
+    Public userTextBoxY As Integer = 202
+    Public passTextBoxX As Integer = 171
+    Public passTextBoxY As Integer = 243
+    Public loginbtnX As Integer = 268
+    Public loginbtnY As Integer = 286
+    Public shutdownbtnX As Integer = 1755
+    Public shutdownbtnY As Integer = 979
+
+
     Private Function GetImage(ByVal fileName As String) As Bitmap
         Dim ret As Bitmap
         Using img As Image = Image.FromFile(fileName)
@@ -191,6 +228,12 @@ Module Skins
     End Sub
     ' LOAD SKIN FROM SAVE FOLDER
     Public Sub loadimages()
+        If File.Exists(loadedskin & "userpic") Then
+            userimage = GetImage(loadedskin & "userpic")
+        End If
+        If File.Exists(loadedskin & "loginbg") Then
+            loginbg = GetImage(loadedskin & "loginbg")
+        End If
         If File.Exists(loadedskin & "userbar") Then
             userNamePanelBackground = GetImage(loadedskin & "userbar")
         End If
@@ -298,163 +341,178 @@ Module Skins
         If File.Exists(loadedskin & "data.dat") Then
             Dim sr As StreamReader = New StreamReader(loadedskin & "data.dat")
 
-                For i As Integer = 0 To 200 Step 1
-                    loaddata(i) = sr.ReadLine
-                    If i = 200 Then
-                        sr.Close()
-                        Exit For
-                    End If
-                Next
-
-                ' settings
-                closebtnsize = New Size(loaddata(1), loaddata(2))
-                rollbtnsize = New Size(loaddata(3), loaddata(4))
-                minbtnsize = New Size(loaddata(5), loaddata(6))
-                titlebarheight = loaddata(7)
-                closebtnfromtop = loaddata(8)
-                closebtnfromside = loaddata(9)
-                rollbtnfromtop = loaddata(10)
-                rollbtnfromside = loaddata(11)
-                minbtnfromtop = loaddata(12)
-                minbtnfromside = loaddata(13)
-                borderwidth = loaddata(14)
-                enablecorners = loaddata(15)
-                titlebarcornerwidth = loaddata(16)
-                titleiconfromside = loaddata(17)
-                titleiconfromtop = loaddata(18)
-                titlebarcolour = Color.FromArgb(loaddata(19))
-                borderleftcolour = Color.FromArgb(loaddata(20))
-                borderrightcolour = Color.FromArgb(loaddata(21))
-                borderbottomcolour = Color.FromArgb(loaddata(22))
-                closebtncolour = Color.FromArgb(loaddata(23))
-                closebtnhovercolour = Color.FromArgb(loaddata(24))
-                closebtnclickcolour = Color.FromArgb(loaddata(25))
-                rollbtncolour = Color.FromArgb(loaddata(26))
-                rollbtnhovercolour = Color.FromArgb(loaddata(27))
-                rollbtnclickcolour = Color.FromArgb(loaddata(28))
-                minbtncolour = Color.FromArgb(loaddata(29))
-                minbtnhovercolour = Color.FromArgb(loaddata(30))
-                minbtnclickcolour = Color.FromArgb(loaddata(31))
-                rightcornercolour = Color.FromArgb(loaddata(32))
-                leftcornercolour = Color.FromArgb(loaddata(33))
-                bottomrightcornercolour = Color.FromArgb(loaddata(34))
-                bottomleftcornercolour = Color.FromArgb(loaddata(35))
-                titletextfontfamily = loaddata(36)
-                titletextfontsize = loaddata(37)
-                titletextfontstyle = loaddata(38)
-                titletextpos = loaddata(39)
-                titletextfromtop = loaddata(40)
-                titletextfromside = loaddata(41)
-                titletextcolour = Color.FromArgb(loaddata(42))
-                desktoppanelcolour = Color.FromArgb(loaddata(43))
-                desktopbackgroundcolour = Color.FromArgb(loaddata(44))
-                desktoppanelheight = loaddata(45)
-                desktoppanelposition = loaddata(46)
-                clocktextcolour = Color.FromArgb(loaddata(47))
-                clockbackgroundcolor = Color.FromArgb(loaddata(48))
-                panelclocktexttop = loaddata(49)
-                panelclocktextsize = loaddata(50)
-                panelclocktextfont = loaddata(51)
-                panelclocktextstyle = loaddata(52)
-                applauncherbuttoncolour = Color.FromArgb(loaddata(53))
-                applauncherbuttonclickedcolour = Color.FromArgb(loaddata(54))
-                applauncherbackgroundcolour = Color.FromArgb(loaddata(55))
-                applaunchermouseovercolour = Color.FromArgb(loaddata(56))
-                applicationsbuttontextcolour = Color.FromArgb(loaddata(57))
-                applicationbuttonheight = loaddata(58)
-                applicationbuttontextsize = loaddata(59)
-                applicationbuttontextfont = loaddata(60)
-                applicationbuttontextstyle = loaddata(61)
-                applicationlaunchername = loaddata(62)
-                titletextposition = loaddata(63)
-                applaunchermenuholderwidth = loaddata(64)
-                panelbuttonicontop = loaddata(65)
-                panelbuttoniconside = loaddata(66)
-                panelbuttoniconsize = loaddata(67)
-                panelbuttonheight = loaddata(68)
-                panelbuttonwidth = loaddata(69)
-                panelbuttoncolour = Color.FromArgb(loaddata(70))
-                panelbuttontextcolour = Color.FromArgb(loaddata(71))
-                panelbuttontextsize = loaddata(72)
-                panelbuttontextfont = loaddata(73)
-                panelbuttontextstyle = loaddata(74)
-                panelbuttontextside = loaddata(75)
-                panelbuttontexttop = loaddata(76)
-                panelbuttongap = loaddata(77)
-                panelbuttonfromtop = loaddata(78)
-                panelbuttoninitialgap = loaddata(79)
+            For i As Integer = 0 To 200 Step 1
+                loaddata(i) = sr.ReadLine
+                If i = 200 Then
+                    sr.Close()
+                    Exit For
+                End If
+            Next
 
-                'layout stuff
-                titlebarlayout = loaddata(89)
-                borderleftlayout = loaddata(90)
-                borderrightlayout = loaddata(91)
-                borderbottomlayout = loaddata(92)
-                closebtnlayout = loaddata(93)
-                rollbtnlayout = loaddata(94)
-                minbtnlayout = loaddata(95)
-                rightcornerlayout = loaddata(96)
-                leftcornerlayout = loaddata(97)
-                desktoppanellayout = loaddata(98)
-                desktopbackgroundlayout = loaddata(99)
-                panelclocklayout = loaddata(100)
-                applauncherlayout = loaddata(101)
-                panelbuttonlayout = loaddata(102)
-                bottomleftcornerlayout = loaddata(103)
-                bottomrightcornerlayout = loaddata(104)
-                ' End of 0.0.8 beta 6 save file, check if exists for future features 
-                If Not loaddata(105) = "" Then launcheritemcolour = Color.FromArgb(loaddata(105))
-                If Not loaddata(106) = "" Then launcheritemfont = loaddata(106)
-                If Not loaddata(107) = "" Then launcheritemsize = loaddata(107)
-                If Not loaddata(108) = "" Then launcheritemstyle = loaddata(108)
-                If Not loaddata(109) = "" Then enablebordercorners = loaddata(109)
+            ' settings
+            closebtnsize = New Size(loaddata(1), loaddata(2))
+            rollbtnsize = New Size(loaddata(3), loaddata(4))
+            minbtnsize = New Size(loaddata(5), loaddata(6))
+            titlebarheight = loaddata(7)
+            closebtnfromtop = loaddata(8)
+            closebtnfromside = loaddata(9)
+            rollbtnfromtop = loaddata(10)
+            rollbtnfromside = loaddata(11)
+            minbtnfromtop = loaddata(12)
+            minbtnfromside = loaddata(13)
+            borderwidth = loaddata(14)
+            enablecorners = loaddata(15)
+            titlebarcornerwidth = loaddata(16)
+            titleiconfromside = loaddata(17)
+            titleiconfromtop = loaddata(18)
+            titlebarcolour = Color.FromArgb(loaddata(19))
+            borderleftcolour = Color.FromArgb(loaddata(20))
+            borderrightcolour = Color.FromArgb(loaddata(21))
+            borderbottomcolour = Color.FromArgb(loaddata(22))
+            closebtncolour = Color.FromArgb(loaddata(23))
+            closebtnhovercolour = Color.FromArgb(loaddata(24))
+            closebtnclickcolour = Color.FromArgb(loaddata(25))
+            rollbtncolour = Color.FromArgb(loaddata(26))
+            rollbtnhovercolour = Color.FromArgb(loaddata(27))
+            rollbtnclickcolour = Color.FromArgb(loaddata(28))
+            minbtncolour = Color.FromArgb(loaddata(29))
+            minbtnhovercolour = Color.FromArgb(loaddata(30))
+            minbtnclickcolour = Color.FromArgb(loaddata(31))
+            rightcornercolour = Color.FromArgb(loaddata(32))
+            leftcornercolour = Color.FromArgb(loaddata(33))
+            bottomrightcornercolour = Color.FromArgb(loaddata(34))
+            bottomleftcornercolour = Color.FromArgb(loaddata(35))
+            titletextfontfamily = loaddata(36)
+            titletextfontsize = loaddata(37)
+            titletextfontstyle = loaddata(38)
+            titletextpos = loaddata(39)
+            titletextfromtop = loaddata(40)
+            titletextfromside = loaddata(41)
+            titletextcolour = Color.FromArgb(loaddata(42))
+            desktoppanelcolour = Color.FromArgb(loaddata(43))
+            desktopbackgroundcolour = Color.FromArgb(loaddata(44))
+            desktoppanelheight = loaddata(45)
+            desktoppanelposition = loaddata(46)
+            clocktextcolour = Color.FromArgb(loaddata(47))
+            clockbackgroundcolor = Color.FromArgb(loaddata(48))
+            panelclocktexttop = loaddata(49)
+            panelclocktextsize = loaddata(50)
+            panelclocktextfont = loaddata(51)
+            panelclocktextstyle = loaddata(52)
+            applauncherbuttoncolour = Color.FromArgb(loaddata(53))
+            applauncherbuttonclickedcolour = Color.FromArgb(loaddata(54))
+            applauncherbackgroundcolour = Color.FromArgb(loaddata(55))
+            applaunchermouseovercolour = Color.FromArgb(loaddata(56))
+            applicationsbuttontextcolour = Color.FromArgb(loaddata(57))
+            applicationbuttonheight = loaddata(58)
+            applicationbuttontextsize = loaddata(59)
+            applicationbuttontextfont = loaddata(60)
+            applicationbuttontextstyle = loaddata(61)
+            applicationlaunchername = loaddata(62)
+            titletextposition = loaddata(63)
+            applaunchermenuholderwidth = loaddata(64)
+            panelbuttonicontop = loaddata(65)
+            panelbuttoniconside = loaddata(66)
+            panelbuttoniconsize = loaddata(67)
+            panelbuttonheight = loaddata(68)
+            panelbuttonwidth = loaddata(69)
+            panelbuttoncolour = Color.FromArgb(loaddata(70))
+            panelbuttontextcolour = Color.FromArgb(loaddata(71))
+            panelbuttontextsize = loaddata(72)
+            panelbuttontextfont = loaddata(73)
+            panelbuttontextstyle = loaddata(74)
+            panelbuttontextside = loaddata(75)
+            panelbuttontexttop = loaddata(76)
+            panelbuttongap = loaddata(77)
+            panelbuttonfromtop = loaddata(78)
+            panelbuttoninitialgap = loaddata(79)
 
-                'for adding extra features, check:
+            'layout stuff
+            titlebarlayout = loaddata(89)
+            borderleftlayout = loaddata(90)
+            borderrightlayout = loaddata(91)
+            borderbottomlayout = loaddata(92)
+            closebtnlayout = loaddata(93)
+            rollbtnlayout = loaddata(94)
+            minbtnlayout = loaddata(95)
+            rightcornerlayout = loaddata(96)
+            leftcornerlayout = loaddata(97)
+            desktoppanellayout = loaddata(98)
+            desktopbackgroundlayout = loaddata(99)
+            panelclocklayout = loaddata(100)
+            applauncherlayout = loaddata(101)
+            panelbuttonlayout = loaddata(102)
+            bottomleftcornerlayout = loaddata(103)
+            bottomrightcornerlayout = loaddata(104)
+            ' End of 0.0.8 beta 6 save file, check if exists for future features 
+            If Not loaddata(105) = "" Then launcheritemcolour = Color.FromArgb(loaddata(105))
+            If Not loaddata(106) = "" Then launcheritemfont = loaddata(106)
+            If Not loaddata(107) = "" Then launcheritemsize = loaddata(107)
+            If Not loaddata(108) = "" Then launcheritemstyle = loaddata(108)
+            If Not loaddata(109) = "" Then enablebordercorners = loaddata(109)
 
-                If loaddata(110) = "" Or loaddata(110) = "End of skin data" Then loaddata(110) = enabledraggableicons Else enabledraggableicons = loaddata(110)
-                If loaddata(111) = "" Or loaddata(111) = "End of skin data" Then loaddata(111) = icontextcolor.ToArgb Else icontextcolor = Color.FromArgb(loaddata(111))
-                If loaddata(112) = "" Or loaddata(112) = "End of skin data" Then loaddata(112) = showicons Else showicons = loaddata(112)
-                If loaddata(113) = "" Or loaddata(113) = "End of skin data" Then loaddata(113) = iconview1 Else iconview1 = loaddata(113)
-                Try
-                    If loaddata(114) = "" Then topBarHeight = 50 Else topBarHeight = loaddata(114)
-                Catch ex As Exception
-                    topBarHeight = 50
-                    infobox.showinfo("Error - Bad Skin File", "It appears that there was an error loading parts of this skin. The unloadable data has been reset to default values.")
-                End Try
-                If loaddata(115) = "" Then bottomBarHeight = 50 Else bottomBarHeight = loaddata(115)
-                If loaddata(116) = "" Then placesSide = "Left" Else placesSide = loaddata(116)
-                If loaddata(117) = "" Then startHeight = 526 Else startHeight = loaddata(117)
-                If loaddata(118) = "" Then startWidth = 320 Else startWidth = loaddata(118)
-                If loaddata(119) = "" Then shutdownstring = "Shut Down ShiftOS" Else shutdownstring = loaddata(119)
-                If loaddata(120) = "" Then userNamePosition = "Middle, Right" Else userNamePosition = loaddata(120)
-                If loaddata(121) = "" Then recentIconsHorizontal = False Else recentIconsHorizontal = loaddata(121)
-                If loaddata(122) = "" Then usernametextcolor = Color.White Else usernametextcolor = Color.FromArgb(loaddata(122))
-                If loaddata(123) = "" Then usernamefont = "Trebuchet MS" Else usernamefont = loaddata(123)
-                If loaddata(124) = "" Then usernamefontsize = 12 Else usernamefontsize = loaddata(124)
-                If loaddata(125) = "" Then usernamefontstyle = FontStyle.Bold Else usernamefontstyle = loaddata(125)
-                If loaddata(126) = "" Then userNamePanelBackgroundColor = Color.Gray Else userNamePanelBackgroundColor = Color.FromArgb(loaddata(126))
-                If loaddata(127) = "" Then powerPanelBackgroundColor = Color.Gray Else powerPanelBackgroundColor = Color.FromArgb(loaddata(127))
-                If loaddata(128) = "" Then shutdownTextColor = Color.White Else shutdownTextColor = Color.FromArgb(loaddata(128))
-                If loaddata(129) = "" Then shutdownTextFont = "Trebuchet MS" Else shutdownTextFont = loaddata(129)
-                If loaddata(130) = "" Then shutdownTextSize = 12 Else shutdownTextSize = loaddata(130)
-                If loaddata(131) = "" Then shutdownTextStyle = FontStyle.Italic Else shutdownTextStyle = loaddata(132)
-                If loaddata(132) = "" Then usrPanelBackgroundLayout = ImageLayout.Stretch Else usrPanelBackgroundLayout = loaddata(132)
-                If loaddata(133) = "" Then pwrPanelBackgroundLayout = ImageLayout.Stretch Else pwrPanelBackgroundLayout = loaddata(133)
-                If loaddata(134) = "" Then useClassicAppLauncher = False Else useClassicAppLauncher = loaddata(134)
+            'for adding extra features, check:
 
-            Else
-                setupdefaults()
-            End If
-            ' Christmas easteregg
-            Try ' If user's PC uses weird/non-numeric dating system - eg: http://puu.sh/eFq6l/8da8a03617.png
-                Dim d() As String = Split(Date.Today, "/")
-                If (d(0) = 25 And d(1) = 12) Or (d(0) = 12 And d(1) = 25) Then
-                    desktopbackground = My.Resources.christmaseasteregg
-                    desktopbackgroundlayout = 2
-                    desktopbackgroundcolour = Color.Black
-                End If
+            If loaddata(110) = "" Or loaddata(110) = "End of skin data" Then loaddata(110) = enabledraggableicons Else enabledraggableicons = loaddata(110)
+            If loaddata(111) = "" Or loaddata(111) = "End of skin data" Then loaddata(111) = icontextcolor.ToArgb Else icontextcolor = Color.FromArgb(loaddata(111))
+            If loaddata(112) = "" Or loaddata(112) = "End of skin data" Then loaddata(112) = showicons Else showicons = loaddata(112)
+            If loaddata(113) = "" Or loaddata(113) = "End of skin data" Then loaddata(113) = iconview1 Else iconview1 = loaddata(113)
+            Try
+                If loaddata(114) = "" Then topBarHeight = 50 Else topBarHeight = loaddata(114)
             Catch ex As Exception
+                topBarHeight = 50
+                infobox.showinfo("Error - Bad Skin File", "It appears that there was an error loading parts of this skin. The unloadable data has been reset to default values.")
             End Try
-            applyskin()
+            If loaddata(115) = "" Then bottomBarHeight = 50 Else bottomBarHeight = loaddata(115)
+            If loaddata(116) = "" Then placesSide = "Left" Else placesSide = loaddata(116)
+            If loaddata(117) = "" Then startHeight = 526 Else startHeight = loaddata(117)
+            If loaddata(118) = "" Then startWidth = 320 Else startWidth = loaddata(118)
+            If loaddata(119) = "" Then shutdownstring = "Shut Down ShiftOS" Else shutdownstring = loaddata(119)
+            If loaddata(120) = "" Then userNamePosition = "Middle, Right" Else userNamePosition = loaddata(120)
+            If loaddata(121) = "" Then recentIconsHorizontal = False Else recentIconsHorizontal = loaddata(121)
+            If loaddata(122) = "" Then usernametextcolor = Color.White Else usernametextcolor = Color.FromArgb(loaddata(122))
+            If loaddata(123) = "" Then usernamefont = "Trebuchet MS" Else usernamefont = loaddata(123)
+            If loaddata(124) = "" Then usernamefontsize = 12 Else usernamefontsize = loaddata(124)
+            If loaddata(125) = "" Then usernamefontstyle = FontStyle.Bold Else usernamefontstyle = loaddata(125)
+            If loaddata(126) = "" Then userNamePanelBackgroundColor = Color.Gray Else userNamePanelBackgroundColor = Color.FromArgb(loaddata(126))
+            If loaddata(127) = "" Then powerPanelBackgroundColor = Color.Gray Else powerPanelBackgroundColor = Color.FromArgb(loaddata(127))
+            If loaddata(128) = "" Then shutdownTextColor = Color.White Else shutdownTextColor = Color.FromArgb(loaddata(128))
+            If loaddata(129) = "" Then shutdownTextFont = "Trebuchet MS" Else shutdownTextFont = loaddata(129)
+            If loaddata(130) = "" Then shutdownTextSize = 12 Else shutdownTextSize = loaddata(130)
+            If loaddata(131) = "" Then shutdownTextStyle = FontStyle.Italic Else shutdownTextStyle = loaddata(132)
+            If loaddata(132) = "" Then usrPanelBackgroundLayout = ImageLayout.Stretch Else usrPanelBackgroundLayout = loaddata(132)
+            If loaddata(133) = "" Then pwrPanelBackgroundLayout = ImageLayout.Stretch Else pwrPanelBackgroundLayout = loaddata(133)
+            If loaddata(134) = "" Then useClassicAppLauncher = False Else useClassicAppLauncher = loaddata(134)
+            If loaddata(135) = "" Then autologin = True Else autologin = loaddata(135)
+            If loaddata(136) = "" Then fullScreen = False Else fullScreen = loaddata(136)
+            If loaddata(137) = "" Then inputfont = "Trebuchet MS" Else inputfont = loaddata(137)
+            If loaddata(138) = "" Then inputfontsize = 12 Else inputfontsize = loaddata(138)
+            If loaddata(139) = "" Then inputfontstyle = FontStyle.Regular Else inputfontstyle = loaddata(139)
+            If loaddata(140) = "" Then inputforecolor = Color.Gray Else inputforecolor = Color.FromArgb(loaddata(140))
+            If loaddata(141) = "" Then inputbackcolor = Color.Black Else inputbackcolor = Color.FromArgb(loaddata(141))
+            If loaddata(142) = "" Then buttonfont = "Trebuchet MS" Else buttonfont = loaddata(142)
+            If loaddata(143) = "" Then buttonfontsize = 12 Else buttonfontsize = loaddata(143)
+            If loaddata(144) = "" Then buttonfontstyle = FontStyle.Italic Else buttonfontstyle = loaddata(144)
+            If loaddata(145) = "" Then userimagesize = 128 Else userimagesize = loaddata(145)
+            If loaddata(146) = "" And loaddata(147) = "" Then userimagelocation = New Point(36, 202) Else userimagelocation = New Point(loaddata(146), loaddata(147))
+            If loaddata(148) = "" Then userimagelayout = ImageLayout.Stretch Else userimagelayout = loaddata(148)
+            If loaddata(149) = "" Then loginbgcolor = Color.Black Else loginbgcolor = Color.FromArgb(loaddata(149))
+            If loaddata(150) = "" Then loginbglayout = ImageLayout.Stretch Else loginbglayout = loaddata(150)
+
+        Else
+            setupdefaults()
+        End If
+        ' Christmas easteregg
+        Try ' If user's PC uses weird/non-numeric dating system - eg: http://puu.sh/eFq6l/8da8a03617.png
+            Dim d() As String = Split(Date.Today, "/")
+            If (d(0) = 25 And d(1) = 12) Or (d(0) = 12 And d(1) = 25) Then
+                desktopbackground = My.Resources.christmaseasteregg
+                desktopbackgroundlayout = 2
+                desktopbackgroundcolour = Color.Black
+            End If
+        Catch ex As Exception
+        End Try
+        applyskin()
     End Sub
     ' SET SKIN
     Public Sub applyskin()
@@ -508,6 +566,8 @@ Module Skins
         saveimage(bottomrightcorner, "bottomrightcorner")
         saveimage(userNamePanelBackground, "userbar")
         saveimage(powerPanelBackgroundImage, "powerbar")
+        saveimage(userimage, "userpic")
+        saveimage(loginbg, "loginbg")
         'save settings to dat file
         Dim savedata(200) As String
         ' setting and colour as saved in the order they are declared, image's are saved in sepporate preset files,
@@ -640,6 +700,23 @@ Module Skins
         savedata(132) = usrPanelBackgroundLayout
         savedata(133) = pwrPanelBackgroundLayout
         savedata(134) = useClassicAppLauncher
+        savedata(135) = autologin
+        savedata(136) = fullScreen
+        savedata(137) = inputfont
+        savedata(138) = inputfontsize
+        savedata(139) = inputfontstyle
+        savedata(140) = inputforecolor.ToArgb
+        savedata(141) = inputbackcolor.ToArgb
+        savedata(142) = buttonfont
+        savedata(143) = buttonfontsize
+        savedata(144) = buttonfontstyle
+        savedata(145) = userimagesize
+        savedata(146) = userimagelocation.X
+        savedata(147) = userimagelocation.Y
+        savedata(148) = userimagelayout
+        savedata(149) = loginbgcolor.ToArgb
+        savedata(150) = loginbglayout
+
 
         ' End of skin data text was at line 110, if adding future items, check for "End of skin data" on line 110
         savedata(200) = "End of skin data"