Updated to v1.1

 - The secret product key will be verified as well but in way less time
 - Moved and updated README
 - Updated copyright year inside LICENSE

README.md → .github/README.md

@@ -1,19 +1,23 @@
-### A fake Windows Activation pop-up programmed to waste scammers' time.
+# Fake Windows Activation Client
 
-![](https://puu.sh/BxBQP.png)
+A fake Windows Activation pop-up programmed to waste scammers' time.
+
+![Preview](images/slui.png)
 
 ## Running the program
-You can copy **slui.exe** whenever you want, ideally where scammers don't usually go (like Documents and sometimes system32).
+
+You can copy **slui.exe** whenever you want, ideally where scammers don't usually go.
 
 Every time the program opens or reappears the following processes will be killed: *iexplore*, *msinfo32*, *mmc*, *dxdiag*, *msconfig*, *taskmgr*, *cmd*, *notepad*, *syskey*.
 
-Any product key, except ```5T0PW-4ST1N-GURT1-M35C4-MM1NG``` will take about 8 minutes to verify and the process will always fail, showing a network error. The program will close itself afterwards.
+Any product key, except ```5T0PW-4ST1N-GURT1-M35C4-MM1NG``` will take about 8 minutes to verify and the process will always fail, showing a network error. The program will close itself afterwards. You can reopen it either manually or with a script.
 
-In Windows 7, the Task Manager will be closed as soon as it is opened. In Windows 8 and greater you want to use a PowerShell script to keep the program alive because Task Manager cannot be suppressed.
+In Windows 7, the Task Manager will be closed as soon as it is opened. In Windows 8 and greater you may want to use a PowerShell script to keep this program alive because Task Manager cannot be suppressed any longer, therefore the scammer will most likely kill the program.
 
 ## Todo
+
 - [ ] Suppress Task Manager when the program is hidden
 - [ ] \(maybe) Reset forms position before hiding them instead of preventing them from being moved
-- [ ] Verify the secret code as well, but take less time
+- [x] Verify the secret code as well, but take less time
 - [ ] Add a dash every five characters
 - [ ] Fix bottom panel weird positioning when using Windows classic theme

LICENSE

@@ -1,6 +1,6 @@
 MIT License
 
-Copyright (c) 2018 Alberto Strappazzon
+Copyright (c) 2019 Alberto Strappazzon
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal

Windows Activation Client/Form2.vb

@@ -42,16 +42,10 @@
             MessageBoxButtons.OK,
             MessageBoxIcon.Warning,
             MessageBoxDefaultButton.Button1)
-        ElseIf productKeyTextBox.Text = "5T0PW-4ST1N-GURT1-M35C4-MM1NG" Then 'Using this product key will result in a succefull Windows activation
-            Me.Enabled = False
-            Me.Cursor = Cursors.WaitCursor()
-            Threading.Thread.Sleep(3500)
-
-            'Hide the current form and show the "Activation was succefull" form
-            Me.Hide()
-            Success.Show()
         Else
-            'This will open a form that will pretend to check the Product Key online
+            'Store the typed product key
+            productKey = productKeyTextBox.Text.ToString()
+            'Open the form that will pretend to check the Product Key online
             Me.Hide()
             Verification.Show()
         End If
@@ -66,8 +60,8 @@
         ExecProcess.StartInfo.WorkingDirectory = Application.StartupPath
         ExecProcess.Start()
 
-        'Hide the application...
         Me.productKeyTextBox.Clear()
+        'Hide the application...
         Me.Hide()
         '...for 2 minutes (120000ms)
         Threading.Thread.Sleep(120000)

Windows Activation Client/My Project/AssemblyInfo.vb

@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.0.0.0")>
+<Assembly: AssemblyVersion("1.1.0.0")>
 <Assembly: AssemblyFileVersion("6.1.7601.17514")>
 <Assembly: NeutralResourcesLanguage("en-US")>

Windows Activation Client/Var.vb

@@ -0,0 +1,3 @@
+Module Var
+    Public Property productKey As String
+End Module

Windows Activation Client/Verification.vb

@@ -17,10 +17,15 @@
     Private Sub Verification_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         verificationBar.Maximum = 100
         verificationBar.Value = 0
-        'This will take a long time...
-        '5 seconds per step
-        Timer1.Interval = 5000
-        'Timer1.Interval = 50 'Testing
+
+        If productKey = "5T0PW-4ST1N-GURT1-M35C4-MM1NG" Then
+            Timer1.Interval = 100
+        Else
+            'This will take a long time...
+            'Timer1.Interval = 100 'Debug
+            Timer1.Interval = 5000
+        End If
+
         Timer1.Enabled = True
     End Sub
 
@@ -34,16 +39,20 @@
 
     Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
         If verificationBar.Value = verificationBar.Maximum Then
-            'When the progress bar reaches the maximum value disable the timer and show a connection error...
-            Timer1.Enabled = False
-            MessageBox.Show("An error occured while connecting to the activation server. Please try again later.",
-            "Connection error",
-            MessageBoxButtons.OK,
-            MessageBoxIcon.Error,
-            MessageBoxDefaultButton.Button1)
+            If productKey = "5T0PW-4ST1N-GURT1-M35C4-MM1NG" Then
+                Success.Show()
+            Else
+                'When the progress bar reaches the maximum value disable the timer and show a connection error...
+                Timer1.Enabled = False
+                MessageBox.Show("An error occured while connecting to the activation server. Please try again later.",
+                "Connection error",
+                MessageBoxButtons.OK,
+                MessageBoxIcon.Error,
+                MessageBoxDefaultButton.Button1)
 
-            '...then close the application
-            Application.Exit()
+                '...then close the application
+                Application.Exit()
+            End If
         Else
             'Increase the progress bar by 1 step
             verificationBar.Value = verificationBar.Value + 1

Windows Activation Client/Windows Activation Client.vbproj

@@ -128,6 +128,7 @@
     <Compile Include="Success.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="Var.vb" />
     <Compile Include="Verification.Designer.vb">
       <DependentUpon>Verification.vb</DependentUpon>
     </Compile>