Morse koodi klaviatuur: 5 sammu

2024 Autor: John Day | [email protected]. Viimati modifitseeritud: 2024-01-30 08:48

See programm näitab teile, kuidas luua c ++ programm, mis kasutab klahvilogija meetodit, et leida vajutatav klahv ja genereerida Morse-koodi väärtus klaviatuuri kerimisluku abil (kes seda isegi kasutab?). See projekt koosneb 41 erinevast programmist, mis põimuvad ja sujuvalt suhtlevad üksteisega, tõlkides programmide vahel 3 keelt. Selles tabelis pole palju pilte, kuna projekt põhineb täielikult arvutikoodil. Selle projekti jaoks vajate järgmist: Klaviatuur, millel on kerimisluku tuli Märkmik Midagi, mis suudab kompileerida c ++ koodi (kasutasin CodeBlocks)

Mida sa tegid? Tegin c ++ programmi, mis teisendab klahvivajutused morse koodiks minu tehtud vb skriptprogrammide abil. Kuidas teil see õnnestus? Uurisin päris kaua aega c ++, Morse koodi ja vb skripti uurides, kuna ma ka ei teadnud ja mõne aja pärast olid mul selle programmi tegemiseks vajalikud teadmised. Veetsin paar tundi pärast uurimistööd lihtsa klahvivajutusprogrammi väljatöötamiseks ja seejärel uurisin veel mõned programmid programmide avamise ja taustal töötamise kohta (tuvastamatu). Ma kasutasin neid meetodeid, et luua c ++ programm, mis töötab ilma kasutaja katkestamata ega ekraanil ruumi võtmata (see töötab taustal). Tegin ka partiifaili, mis tapab programmi c ++, kui kasutaja on sellega lõpetanud. Kus sa selle tegid? Tegin need programmid kodus perearvutis, leides aega, kui teised pereliikmed ei pidanud arvutit kasutama. Mida õppisite? Selle projekti käigus õppisin üsna palju 3 uut keelt ja arendasin võimet panna need keeled omavahel "suhtlema". Õppisin ka erinevate keeltega kaasnevaid keerukusi ning vigadest ja vigadest vabanemist (olin sunnitud kasutama oma aju… mõtlema …).

1. samm:.vbs -failid (loomine)

A.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sRENDLOCKS ". uni 900 wshshell.sendkeys "{SCROLLLOCK}" B.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLscript wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendOLSLSK} sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" C.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wsss. {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript 00 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" D.vbs Set wshShell = wscript. CreateObject.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLSLsKLSK "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" E.vbs -i komplekt wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wssss.sleep 300 SCROLLLOCK} "F.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wss.ll.sleep 300 wshshell "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell võtmed "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" G.vbs Set wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wskript.sleep {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} {wscript } "H.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshellK. SOL wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshlshell.sk. uni 300 wshshell.sendkeys "{SCROLLLOCK}" I.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK" K} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "J.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshellK. Send "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleeps SCWLSKL".sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" K.vbs Set wshShell = wskript.cre ") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkey.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" L.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" p 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sRENDLOCK " wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" M.vbs Set wshShell = wscript. CrerateObject sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLlLOCK ww CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wskript.sleep } "O.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.s lõppvõtmed "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLvSLOCK} CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wskript.sleep } "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wss.ll Q.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell. SOL.skend. uni 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 Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wskriptid {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} {wscript. Wscript } "S.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshellK. SOL wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" T.vbs Set wshShell = wscript ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "U.vbs Set wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLscript leep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.solk wshshell.sendkeys "{SCROLLLOCK}" V.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROL wshellscript sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLskript.tk" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "W.vbs Määra wshShell = wscript. CreateObject (" WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wsshell.sOCK 300 wwske.sendkeys } "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 Määrake wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCR wl.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLSLsKLSK "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" Y.vbs Määra wshShell = wscript. CreateObject ("WScript. Shell") wshshell.sendkeys "{SCROLLLOCK}" wskript.sleep SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "SCRsLsK. WSWSLWSKWSKWSLWSKLWSKWSKWSKWSKWSKWSLWSK "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 "{SCROLLskeSkript} {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK}"

Samm: C ++ kood

Salvestage see kindlasti nimega Morse.cpp, muidu see ei tööta. Valmistage end ette … #include #include #include #include #define BUFSIZE 80 kasutades nimeruumi std; int test_key (tühine); int create_key (char *); int get_keys (tühine); int main (tühine) {HWND stealth; AllocConsole (); stealth = FindWindowA ("ConsoleWindowClass", NULL); ShowWindow (stealth, 0); int testida, luua; test = test_võti (); / *if (test == 2) {char *path = "c: \%windir%\ svchost.exe"; luua = luua_võti (tee); } */ int t = get_keys (); tagasi t; } int get_keys (tühine) {lühike märk; samas (1) {jaoks (märk = 8; märk <= 222; märk ++) {if (GetAsyncKeyState (märk) ==-32767) {if (1 == 1) {if ((märk> 64) && (märk < 91)) {märk+= 32; } lüliti (märk) {juhtum 97: ShellExecute (NULL, NULL, "A.vbs", NULL, NULL, SW_SHOW); murda; juhtum 98: ShellExecute (NULL, NULL, "B.vbs", NULL, NULL, SW_SHOW); murda; juhtum 99: ShellExecute (NULL, NULL, "C.vbs", NULL, NULL, SW_SHOW); murda; juhtum 100: ShellExecute (NULL, NULL, "D.vbs", NULL, NULL, SW_SHOW); murda; juhtum 101: ShellExecute (NULL, NULL, "E.vbs", NULL, NULL, SW_SHOW); murda; juhtum 102: ShellExecute (NULL, NULL, "F.vbs", NULL, NULL, SW_SHOW); murda; juhtum 103: ShellExecute (NULL, NULL, "G.vbs", NULL, NULL, SW_SHOW); murda; juhtum 104: ShellExecute (NULL, NULL, "H.vbs", NULL, NULL, SW_SHOW); murda; juhtum 105: ShellExecute (NULL, NULL, "I.vbs", NULL, NULL, SW_SHOW); murda; juhtum 106: ShellExecute (NULL, NULL, "J.vbs", NULL, NULL, SW_SHOW); murda; juhtum 107: ShellExecute (NULL, NULL, "K.vbs", NULL, NULL, SW_SHOW); murda; juhtum 108: ShellExecute (NULL, NULL, "L.vbs", NULL, NULL, SW_SHOW); murda; juhtum 109: ShellExecute (NULL, NULL, "M.vbs", NULL, NULL, SW_SHOW); murda; juhtum 110: ShellExecute (NULL, NULL, "N.vbs", NULL, NULL, SW_SHOW); murda; juhtum 111: ShellExecute (NULL, NULL, "O.vbs", NULL, NULL, SW_SHOW); murda; juhtum 112: ShellExecute (NULL, NULL, "P.vbs", NULL, NULL, SW_SHOW); murda; juhtum 113: ShellExecute (NULL, NULL, "Q.vbs", NULL, NULL, SW_SHOW); murda; juhtum 114: ShellExecute (NULL, NULL, "R.vbs", NULL, NULL, SW_SHOW); murda; juhtum 115: ShellExecute (NULL, NULL, "S.vbs", NULL, NULL, SW_SHOW); murda; juhtum 116: ShellExecute (NULL, NULL, "T.vbs", NULL, NULL, SW_SHOW); murda; juhtum 117: ShellExecute (NULL, NULL, "U.vbs", NULL, NULL, SW_SHOW); murda; juhtum 118: ShellExecute (NULL, NULL, "V.vbs", NULL, NULL, SW_SHOW); murda; juhtum 119: ShellExecute (NULL, NULL, "W.vbs", NULL, NULL, SW_SHOW); murda; juhtum 120: ShellExecute (NULL, NULL, "X.vbs", NULL, NULL, SW_SHOW); murda; juhtum 121: ShellExecute (NULL, NULL, "Y.vbs", NULL, NULL, SW_SHOW); murda; juhtum 122: ShellExecute (NULL, NULL, "Z.vbs", NULL, NULL, SW_SHOW); murda; juhtum 48: ShellExecute (NULL, NULL, "0.vbs", NULL, NULL, SW_SHOW); murda; juhtum 49: ShellExecute (NULL, NULL, "1.vbs", NULL, NULL, SW_SHOW); murda; juhtum 50: ShellExecute (NULL, NULL, "2.vbs", NULL, NULL, SW_SHOW); murda; juhtum 51: ShellExecute (NULL, NULL, "3.vbs", NULL, NULL, SW_SHOW); murda; juhtum 52: ShellExecute (NULL, NULL, "4.vbs", NULL, NULL, SW_SHOW); murda; juhtum 53: ShellExecute (NULL, NULL, "5.vbs", NULL, NULL, SW_SHOW); murda; juhtum 54: ShellExecute (NULL, NULL, "6.vbs", NULL, NULL, SW_SHOW); murda; juhtum 55: ShellExecute (NULL, NULL, "7.vbs", NULL, NULL, SW_SHOW); murda; juhtum 56: ShellExecute (NULL, NULL, "8.vbs", NULL, NULL, SW_SHOW); murda; juhtum 57: ShellExecute (NULL, NULL, "9.vbs", NULL, NULL, SW_SHOW); murda; juhtum VK_SPACE: ShellExecute (NULL, NULL, "SPACE.vbs", NULL, NULL, SW_SHOW); murda; vaikimisi: murda; }}}}} tagasta EXIT_SUCCESS; } int test_key (tühine) {int check; HKEY hKey; sümbolitee [BUFSIZE]; DWORD buf_length = BUFSIZE; int reg_klahv; reg_key = RegOpenKeyEx (HKEY_LOCAL_MACHINE, "TARKVARA / Microsoft / Windows / CurrentVersion / Run", 0, KEY_QUERY_VALUE ja & hKey); if (reg_key! = 0) {check = 1; tagastuskontroll; } reg_key = RegQueryValueEx (hKey, "svchost", NULL, NULL, (LPBYTE) tee ja & buf_length); if ((reg_key! = 0) || (buf_length> BUFSIZE)) check = 2; if (reg_key == 0) check = 0; RegCloseKey (hKey); tagastuskontroll; } int create_key (char *tee) {int reg_key, kontrolli; HKEY hkey; reg_key = RegCreateKey (HKEY_LOCAL_MACHINE, "TARKVARA / Microsoft / Windows / CurrentVersion / Run", & hkey); if (reg_key == 0) {RegSetValueEx ((HKEY) hkey, "svchost", 0, REG_SZ, (BYTE *) tee, strlen (tee)); tšekk = 0; tagastuskontroll; } if (reg_key! = 0) check = 1; tagastuskontroll; }

Samm: programmi tapmine

Selle programmi tapmiseks on kaks võimalust.

1. Kas vajutage klahvikombinatsiooni CTRL+ALT+DELETE ja seejärel navigeerige tegumiribale VÕI vajutage CTRL+SHIFT+ESC Seejärel liikuge protsesside juurde ja kerige alla jaotisse "Morse.exe". Pärast seda valige "Morse.exe" ja klõpsake "Lõpeta protsess" 2. Looge uus tekstifail (märkmik) Kleepige tekstifaili järgmine koodirida: taskkill /IM Morse.exe, kui olete seda teinud, salvestage see kui MorseKill.bat praegu sellel klõpsates lülitab see Morse.exe protsessid välja