1 files changed, 13 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/DebugWindow.vb b/ShiftOS-TheRevival/MainForms/DebugWindow.vb
new file mode 100644
index 0000000..e9f4f0b
--- /dev/null
+++ b/ShiftOS-TheRevival/MainForms/DebugWindow.vb
@@ -0,0 +1,13 @@
+Public Class DebugWindow
+
+    Public ShouldDebug As Boolean
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Clipboard.SetText(TextBox1.Text)
+    End Sub
+
+    Public Sub AddLine(subs As String, int As String, str As String, action As String)
+        If ShouldDebug = True Then
+            TextBox1.Text = TextBox1.Text & Environment.NewLine & subs & " Sub with " & str & " string and " & int & " integer did " & action
+        End If
+    End Sub
+End Class
+\ No newline at end of file