Merge pull request #5 from TheUltimateHacker/master

Add shutdown sounds

10 files changed, 28 insertions, 12 deletions

diff --git a/windows 95/Resources/Windows 2000 Shutdown.wav b/windows 95/Resources/Windows 2000 Shutdown.wav
new file mode 100644
index 0000000..149bc98
--- /dev/null
+++ b/windows 95/Resources/Windows 2000 Shutdown.wav
diff --git a/windows 95/Resources/Windows 2000 Startup.wav b/windows 95/Resources/Windows 2000 Startup.wav
new file mode 100644
index 0000000..8dfcf7b
--- /dev/null
+++ b/windows 95/Resources/Windows 2000 Startup.wav
diff --git a/windows 95/Resources/Windows 95 Shutdown.wav b/windows 95/Resources/Windows 95 Shutdown.wav
new file mode 100644
index 0000000..b3127d1
--- /dev/null
+++ b/windows 95/Resources/Windows 95 Shutdown.wav
diff --git a/windows 95/Resources/Windows 98 Shutdown.wav b/windows 95/Resources/Windows 98 Shutdown.wav
new file mode 100644
index 0000000..6bbae35
--- /dev/null
+++ b/windows 95/Resources/Windows 98 Shutdown.wav
diff --git a/windows 95/Resources/Windows ME Startup.wav b/windows 95/Resources/Windows ME Startup.wav
new file mode 100644
index 0000000..3541a5a
--- /dev/null
+++ b/windows 95/Resources/Windows ME Startup.wav
diff --git a/windows 95/Resources/Windows Vista Shutdown.wav b/windows 95/Resources/Windows Vista Shutdown.wav
new file mode 100644
index 0000000..38d93a6
--- /dev/null
+++ b/windows 95/Resources/Windows Vista Shutdown.wav
diff --git a/windows 95/Windows2000.vb b/windows 95/Windows2000.vb
index ab92355..bb19828 100755
--- a/windows 95/Windows2000.vb
+++ b/windows 95/Windows2000.vb
@@ -10,9 +10,9 @@
 

     Private Sub windows95_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load

         desktopicons.Show()

-        If My.Resources.windows_2000_boot_sound.CanRead Then

-            Dim bStr(My.Resources.windows_2000_boot_sound.Length) As Byte

-            My.Resources.windows_2000_boot_sound.Read(bStr, 0, My.Resources.windows_2000_boot_sound.Length)

+        If My.Resources.Windows_2000_Startup.CanRead Then

+            Dim bStr(My.Resources.Windows_2000_Startup.Length) As Byte

+            My.Resources.Windows_2000_Startup.Read(bStr, 0, My.Resources.Windows_2000_Startup.Length)

             My.Computer.Audio.Play(bStr, AudioPlayMode.Background)

         End If

         startmenu.Hide()

@@ -263,8 +263,8 @@
         taskbar.Hide()

         startbutton.Hide()

 

-        Dim bStr(My.Resources.Windows_ME_Shutdown.Length) As Byte

-        My.Resources.Windows_ME_Shutdown.Read(bStr, 0, My.Resources.Windows_ME_Shutdown.Length)

+        Dim bStr(My.Resources.Windows_2000_Shutdown.Length) As Byte

+        My.Resources.Windows_2000_Shutdown.Read(bStr, 0, My.Resources.Windows_2000_Shutdown.Length)

         My.Computer.Audio.Play(bStr, AudioPlayMode.WaitToComplete)

         Me.Close()

     End Sub

diff --git a/windows 95/Windows98.vb b/windows 95/Windows98.vb
index e86f07b..4b484d3 100755
--- a/windows 95/Windows98.vb
+++ b/windows 95/Windows98.vb
@@ -163,8 +163,16 @@
         startmenu.Hide()

     End Sub

 

-    Private Sub ShutdownToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ShutdownToolStripMenuItem1.Click

-        Title_Screen.Close()

+    Private Sub ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ShutdownToolStripMenuItem1.Click

+        startmenu.Hide()

+        desktopicons.Hide()

+        taskbar.Hide()

+        startbutton.Hide()

+

+        Dim bStr(My.Resources.Windows_98_Shutdown.Length) As Byte

+        My.Resources.Windows_98_Shutdown.Read(bStr, 0, My.Resources.Windows_98_Shutdown.Length)

+        My.Computer.Audio.Play(bStr, AudioPlayMode.WaitToComplete)

+        Me.Close()

     End Sub

 

     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

diff --git a/windows 95/Windowsxp2002damaged.vb b/windows 95/Windowsxp2002damaged.vb
index 86a93df..88d1f0a 100755
--- a/windows 95/Windowsxp2002damaged.vb
+++ b/windows 95/Windowsxp2002damaged.vb
@@ -156,8 +156,16 @@
 

     End Sub

 

-    Private Sub turnoffcomputerbutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles turnoffcomputerbutton.Click

-        Title_Screen.Close()

+    Private Sub ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles turnoffcomputerbutton.Click

+        startmenu.Hide()

+        desktopicons.Hide()

+        taskbar.Hide()

+        startbutton.Hide()

+

+        Dim bStr(My.Resources.Windows_XP_Shutdown.Length) As Byte

+        My.Resources.Windows_XP_Shutdown.Read(bStr, 0, My.Resources.Windows_XP_Shutdown.Length)

+        My.Computer.Audio.Play(bStr, AudioPlayMode.WaitToComplete)

+        Me.Close()

     End Sub

 

     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

diff --git a/windows 95/windows me.vb b/windows 95/windows me.vb
index 658c903..412349c 100755
--- a/windows 95/windows me.vb
+++ b/windows 95/windows me.vb
@@ -9,9 +9,9 @@
 

     Private Sub windows95_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load

         desktopicons.Show()

-        If My.Resources.windows_2000_boot_sound.CanRead Then

-            Dim bStr(My.Resources.windows_2000_boot_sound.Length) As Byte

-            My.Resources.windows_2000_boot_sound.Read(bStr, 0, My.Resources.windows_2000_boot_sound.Length)

+        If My.Resources.Windows_ME_Shutdown.CanRead Then

+            Dim bStr(My.Resources.Windows_ME_Shutdown.Length) As Byte

+            My.Resources.Windows_ME_Shutdown.Read(bStr, 0, My.Resources.Windows_ME_Shutdown.Length)

             My.Computer.Audio.Play(bStr, AudioPlayMode.Background)

         End If

         startmenu.Hide()