Morsecode-Tastatur - Gunook

2024 Autor: John Day | [email protected]. Zuletzt bearbeitet: 2024-01-30 07:19

Dieses Programm zeigt Ihnen, wie Sie ein C++-Programm erstellen, das einen Key-Logger-Ansatz verwendet, um die gedrückte Taste zu finden und den Morse-Code-Wert mithilfe des Scroll-Lock-Lichts auf Ihrer Tastatur zu generieren (wer verwendet das überhaupt?). Dieses Projekt besteht aus 41 verschiedenen Programmen, die miteinander verwoben sind und nahtlos miteinander interagieren und 3 Sprachen zwischen den Programmen übersetzen. Es gibt nicht viele Bilder in diesem ible, da das Projekt vollständig auf Computercode basiert. Für dieses Projekt benötigen Sie: Eine Tastatur mit einem Scroll-Lock-Licht Notepad Etwas, das C++-Code kompilieren kann (ich habe CodeBlocks verwendet)

Was hast du gemacht? Ich habe ein c++-Programm erstellt, das Tastenanschläge in Morsecode übersetzt, indem ich die von mir erstellten vb-Skriptprogramme verwende. Wie hast du es gemacht? Ich verbrachte eine ganze Weile damit, c++, Morsecode und Vb-Skript zu recherchieren, da ich es auch nicht kannte und nach einer Weile hatte ich das notwendige Wissen, um dieses Programm zu erstellen. Nach den Recherchen verbrachte ich einige Stunden damit, ein einfaches Tastenanschlagprogramm zu entwickeln und recherchierte dann weiter über das Öffnen von Programmen und das Ausführen von Programmen im Hintergrund (nicht nachweisbar). Ich habe diese Methoden verwendet, um ein c++-Programm zu erstellen, das ausgeführt wird, ohne den Benutzer zu unterbrechen oder Platz auf dem Bildschirm zu belegen (es läuft im Hintergrund). Ich habe auch eine Batch-Datei erstellt, die das C++-Programm beendet, wenn der Benutzer damit fertig ist. Wo haben Sie es erstellt? Ich habe diese Programme auf dem Familiencomputer zu Hause erstellt und Zeit gefunden, wenn andere Familienmitglieder den Computer nicht benutzen mussten. Was haben Sie gelernt? Im Laufe dieses Projekts habe ich so ziemlich 3 neue Sprachen gelernt und die Fähigkeit entwickelt, diese Sprachen miteinander "kommunizieren" zu lassen. Ich lernte auch die Komplexität, die mit den verschiedenen Sprachen einhergeht, und wie man Fehler und Bugs umgeht (ich war gezwungen, mein Gehirn zu benutzen… um zu denken…).

Schritt 1:.vbs-Dateien (Erstellung)

A.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript. sleep 900 wshshell.sendkeys "{SCROLLLOCK}"B.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell. sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"C.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys " {SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 9 00 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"D.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkey "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"E.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{ SCROLLLOCK}"F.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" " wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.send Schlüssel "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"G.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys " {SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK }"H.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript. sleep 300 wshshell.sendkeys "{SCROLLLOCK}"I.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOC K}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"J.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK} " wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"K.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshs.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"L.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.slee p 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"M.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell. sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"N.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK." }"O.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.s endkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"P.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK." }" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" Q.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript. sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendk eys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"R.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys " {SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK }"S.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"T.vbs Set wshShell =wscript. CreateObject("WScript. Shell ") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"U.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.s leep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"V.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell. sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys " {SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"W.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK." }" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"X.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshell.sendkey "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"Y.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{ SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK} " wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}"Z.vbs Set wshShell =wscript. CreateObject("WScript. Shell") wshshell.se ndkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys " {SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}"

Schritt 4: Der C++-Code

Stellen Sie sicher, dass Sie dies als Morse.cpp speichern, sonst funktioniert es nicht. Bereiten Sie sich vor … #include #include #include #include #define BUFSIZE 80 using namespace std; int test_key(void); int create_key(char *); int get_keys(void); int main(void) { HWND Stealth; AllocConsole(); Stealth=FindWindowA("ConsoleWindowClass", NULL); ShowWindow(Stealth, 0); int testen, erstellen; test=test_key(); /*if (test==2) { char *path="c:\%windir%\svchost.exe"; create=create_key(Pfad); } */ int t=get_keys(); Rückkehr t; } int get_keys(void) { kurzes Zeichen; while(1) { for(character=8;character<=222;character++) { if(GetAsyncKeyState(character)==-32767) { if(1==1) { if((character>64)&&(character< 91)) { Zeichen+=32; } switch(character) { case 97: ShellExecute(NULL, NULL, "A.vbs", NULL, NULL, SW_SHOW); brechen; Fall 98: ShellExecute(NULL, NULL, "B.vbs", NULL, NULL, SW_SHOW); brechen; Fall 99: ShellExecute(NULL, NULL, "C.vbs", NULL, NULL, SW_SHOW); brechen; Fall 100: ShellExecute(NULL, NULL, "D.vbs", NULL, NULL, SW_SHOW); brechen; Fall 101: ShellExecute(NULL, NULL, "E.vbs", NULL, NULL, SW_SHOW); brechen; Fall 102: ShellExecute(NULL, NULL, "F.vbs", NULL, NULL, SW_SHOW); brechen; Fall 103: ShellExecute(NULL, NULL, "G.vbs", NULL, NULL, SW_SHOW); brechen; Fall 104: ShellExecute(NULL, NULL, "H.vbs", NULL, NULL, SW_SHOW); brechen; Fall 105: ShellExecute(NULL, NULL, "I.vbs", NULL, NULL, SW_SHOW); brechen; Fall 106: ShellExecute(NULL, NULL, "J.vbs", NULL, NULL, SW_SHOW); brechen; Fall 107: ShellExecute(NULL, NULL, "K.vbs", NULL, NULL, SW_SHOW); brechen; Fall 108: ShellExecute(NULL, NULL, "L.vbs", NULL, NULL, SW_SHOW); brechen; Fall 109: ShellExecute(NULL, NULL, "M.vbs", NULL, NULL, SW_SHOW); brechen; Fall 110: ShellExecute(NULL, NULL, "N.vbs", NULL, NULL, SW_SHOW); brechen; Fall 111: ShellExecute(NULL, NULL, "O.vbs", NULL, NULL, SW_SHOW); brechen; Fall 112: ShellExecute(NULL, NULL, "P.vbs", NULL, NULL, SW_SHOW); brechen; Fall 113: ShellExecute(NULL, NULL, "Q.vbs", NULL, NULL, SW_SHOW); brechen; Fall 114: ShellExecute(NULL, NULL, "R.vbs", NULL, NULL, SW_SHOW); brechen; Fall 115: ShellExecute(NULL, NULL, "S.vbs", NULL, NULL, SW_SHOW); brechen; Fall 116: ShellExecute(NULL, NULL, "T.vbs", NULL, NULL, SW_SHOW); brechen; Fall 117: ShellExecute(NULL, NULL, "U.vbs", NULL, NULL, SW_SHOW); brechen; Fall 118: ShellExecute(NULL, NULL, "V.vbs", NULL, NULL, SW_SHOW); brechen; Fall 119: ShellExecute(NULL, NULL, "W.vbs", NULL, NULL, SW_SHOW); brechen; Fall 120: ShellExecute(NULL, NULL, "X.vbs", NULL, NULL, SW_SHOW); brechen; Fall 121: ShellExecute(NULL, NULL, "Y.vbs", NULL, NULL, SW_SHOW); brechen; Fall 122: ShellExecute(NULL, NULL, "Z.vbs", NULL, NULL, SW_SHOW); brechen; Fall 48: ShellExecute(NULL, NULL, "0.vbs", NULL, NULL, SW_SHOW); brechen; Fall 49: ShellExecute(NULL, NULL, "1.vbs", NULL, NULL, SW_SHOW); brechen; Fall 50: ShellExecute(NULL, NULL, "2.vbs", NULL, NULL, SW_SHOW); brechen; Fall 51: ShellExecute(NULL, NULL, "3.vbs", NULL, NULL, SW_SHOW); brechen; Fall 52: ShellExecute(NULL, NULL, "4.vbs", NULL, NULL, SW_SHOW); brechen; Fall 53: ShellExecute(NULL, NULL, "5.vbs", NULL, NULL, SW_SHOW); brechen; Fall 54: ShellExecute(NULL, NULL, "6.vbs", NULL, NULL, SW_SHOW); brechen; Fall 55: ShellExecute(NULL, NULL, "7.vbs", NULL, NULL, SW_SHOW); brechen; Fall 56: ShellExecute(NULL, NULL, "8.vbs", NULL, NULL, SW_SHOW); brechen; Fall 57: ShellExecute(NULL, NULL, "9.vbs", NULL, NULL, SW_SHOW); brechen; Fall VK_SPACE: ShellExecute(NULL, NULL, "SPACE.vbs", NULL, NULL, SW_SHOW); brechen; Vorgabe: Pause; } } } } } return EXIT_SUCCESS; } int test_key (void) { int check; HKEY hKey; Zeichenpfad[BUFSIZE]; DWORD buf_length=BUFSIZE; int reg_key; reg_key=RegOpenKeyEx(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run", 0, KEY_QUERY_VALUE, &hKey); if(reg_key!=0) { check=1; Rückscheck; } reg_key=RegQueryValueEx(hKey, "svchost", NULL, NULL, (LPBYTE)Pfad, &buf_length); if((reg_key!=0)||(buf_length>BUFSIZE)) check=2; if(reg_key==0) check=0; RegCloseKey(hKey); Rückscheck; } int create_key (char *path) { int reg_key, check; HKEY hkey; reg_key=RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run", &hkey); if(reg_key==0) { RegSetValueEx((HKEY)hkey, "svchost", 0, REG_SZ, (BYTE *)path, strlen(path)); check=0; Rückscheck; } if(reg_key!=0) check=1; Rückscheck; }

Schritt 5: Beenden des Programms

Es gibt zwei Möglichkeiten, dieses Programm zu beenden.

1. Entweder STRG+ALT+ENTF drücken und dann zur Taskleiste navigieren ODER STRG+UMSCHALT+ESC drücken Dann zu Prozessen navigieren und nach unten zu "Morse.exe" scrollen. Wählen Sie danach "Morse.exe" und klicken Sie auf "Prozess beenden" 2. Erstellen Sie eine neue Textdatei (Notepad) Fügen Sie die folgende Codezeile in die Textdatei ein:taskkill /IM Morse.exe, sobald Sie das getan haben, speichern Sie es als MorseKill.bat jetzt, wenn Sie darauf klicken, wird die Morse.exe durch Prozesse heruntergefahren