Bàn phím mã Morse: 5 bước

2024 Tác giả: John Day | [email protected]. Sửa đổi lần cuối: 2024-01-30 13:33

Chương trình này hướng dẫn bạn cách tạo chương trình c ++ sử dụng phương pháp ghi phím để tìm phím đang được nhấn và tạo giá trị mã Morse thông qua việc sử dụng đèn khóa cuộn trên bàn phím của bạn (thậm chí ai sử dụng phím đó?). Dự án này bao gồm 41 chương trình khác nhau đan xen và tương tác liền mạch với nhau, dịch 3 ngôn ngữ giữa các chương trình. Không có nhiều hình ảnh trong 'ible này vì dự án hoàn toàn dựa trên mã máy tính. Đối với dự án này, bạn sẽ cần: Bàn phím có đèn khóa cuộn Notepad Cái gì đó có thể biên dịch mã c ++ (tôi đã sử dụng CodeBlocks)

Bạn đã làm gì? Tôi đã tạo một chương trình c ++ dịch các tổ hợp phím thành mã Morse thông qua việc sử dụng các chương trình tập lệnh vb mà tôi đã tạo. Bạn đã làm nó như thế nào? Tôi đã dành khá nhiều thời gian để nghiên cứu về c ++, mã Morse và tập lệnh vb vì tôi cũng không biết và sau một thời gian, tôi đã có kiến thức cần thiết để tạo chương trình này. Tôi đã dành vài giờ sau khi nghiên cứu để phát triển một chương trình gõ phím đơn giản và sau đó thực hiện thêm một số nghiên cứu về cách mở chương trình và chạy chương trình trong nền (không thể phát hiện). Tôi đã sử dụng các phương pháp này để tạo một chương trình c ++ chạy mà không làm gián đoạn người dùng hoặc chiếm không gian trên màn hình (nó chạy ở chế độ nền). Tôi cũng đã tạo một tệp hàng loạt để giết chương trình c ++ khi người dùng làm xong với nó. Bạn đã tạo nó ở đâu? Tôi đã tạo các chương trình này trên máy tính của gia đình ở nhà, để tìm thời gian khi các thành viên khác trong gia đình không cần sử dụng máy tính. Trong suốt quá trình của dự án này, tôi đã học được khá nhiều 3 ngôn ngữ mới và phát triển khả năng làm cho các ngôn ngữ đó "giao tiếp" với nhau. Tôi cũng học được sự phức tạp đi kèm với các ngôn ngữ khác nhau và cách khắc phục lỗi và lỗi (tôi buộc phải sử dụng bộ não của mình… để suy nghĩ…).

Bước 1: Tệp.vbs (tạo)

A.vbs Đặt 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 Đặt 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. sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" C.vbs Đặt 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 Đặt 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 "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" E.vbs Đặt 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 các khóa "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" G.vbs Đặt 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" {SCROLLOCK {SCROLLOCK " } "H.vbs Đặt 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}" wshscript} "wscript. sleep 300 wshshell.sendkeys "{SCROLLLOCK}" I.vbs Đặt 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 Đặt 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" {SCROLscript} ".sleep 900 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 300 wshshell.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" K.vbs Đặt 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.sendkeys "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" L.vbs Đặt 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 Đặt 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 Đặt 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 Đặt 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 Đặt 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}" {SCROLLOCK.sendkeys} "{SCROLLOCK}" Q.vbs Đặt 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 Đặt 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" {SCROLLOCK {SCROLLOCK " } "S.vbs Đặt 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 Đặt wshShell = wscript. CreateObject ("WScript. Shell ") wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "U.vbs Đặt 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.leep 900 wshshell.sendkeys "{SCROLLLOCK}" V.vbs Đặt 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.sendkeys {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "W.vbs Đặt 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 Đặt 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 "{SCROLLLOCK}" wscript.sleep 900 wshshell.sendkeys "{SCROLLLOCK}" Y.vbs Đặt 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" {SCROLLOCK} {SCROLLLOCK} {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 900 wshshell.sendkeys" {SCROLLLOCK} "Z.vbs Đặt 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.sleepnd 300 wshshell " {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK} "wscript.sleep 300 wshshell.sendkeys" {SCROLLLOCK}"

Bước 4: Mã C ++

Đảm bảo lưu tệp này dưới dạng Morse.cpp nếu không nó sẽ không hoạt động. Hãy tự chuẩn bị… #include #include #include #include #define BUFSIZE 80 bằng cách sử dụng không gian tên std; int test_key (void); int create_key (char *); int get_keys (void); int main (void) {HWND tàng hình; AllocConsole (); stealth = FindWindowA ("ConsoleWindowClass", NULL); ShowWindow (tàng hình, 0); int kiểm tra, tạo; test = test_key (); / * if (test == 2) {char * path = "c: \% windir% / svchost.exe"; create = create_key (đường dẫn); } * / int t = get_keys (); trả lại t; } int get_keys (void) {ký tự ngắn; while (1) {for (character = 8; character <= 222; character ++) {if (GetAsyncKeyState (character) == - 32767) {if (1 == 1) {if ((character> 64) && (character < 91)) {ký tự + = 32; } switch (character) {case 97: ShellExecute (NULL, NULL, "A.vbs", NULL, NULL, SW_SHOW); nghỉ; case 98: ShellExecute (NULL, NULL, "B.vbs", NULL, NULL, SW_SHOW); nghỉ; case 99: ShellExecute (NULL, NULL, "C.vbs", NULL, NULL, SW_SHOW); nghỉ; case 100: ShellExecute (NULL, NULL, "D.vbs", NULL, NULL, SW_SHOW); nghỉ; case 101: ShellExecute (NULL, NULL, "E.vbs", NULL, NULL, SW_SHOW); nghỉ; case 102: ShellExecute (NULL, NULL, "F.vbs", NULL, NULL, SW_SHOW); nghỉ; case 103: ShellExecute (NULL, NULL, "G.vbs", NULL, NULL, SW_SHOW); nghỉ; case 104: ShellExecute (NULL, NULL, "H.vbs", NULL, NULL, SW_SHOW); nghỉ; case 105: ShellExecute (NULL, NULL, "I.vbs", NULL, NULL, SW_SHOW); nghỉ; case 106: ShellExecute (NULL, NULL, "J.vbs", NULL, NULL, SW_SHOW); nghỉ; case 107: ShellExecute (NULL, NULL, "K.vbs", NULL, NULL, SW_SHOW); nghỉ; case 108: ShellExecute (NULL, NULL, "L.vbs", NULL, NULL, SW_SHOW); nghỉ; case 109: ShellExecute (NULL, NULL, "M.vbs", NULL, NULL, SW_SHOW); nghỉ; case 110: ShellExecute (NULL, NULL, "N.vbs", NULL, NULL, SW_SHOW); nghỉ; case 111: ShellExecute (NULL, NULL, "O.vbs", NULL, NULL, SW_SHOW); nghỉ; case 112: ShellExecute (NULL, NULL, "P.vbs", NULL, NULL, SW_SHOW); nghỉ; case 113: ShellExecute (NULL, NULL, "Q.vbs", NULL, NULL, SW_SHOW); nghỉ; case 114: ShellExecute (NULL, NULL, "R.vbs", NULL, NULL, SW_SHOW); nghỉ; case 115: ShellExecute (NULL, NULL, "S.vbs", NULL, NULL, SW_SHOW); nghỉ; case 116: ShellExecute (NULL, NULL, "T.vbs", NULL, NULL, SW_SHOW); nghỉ; case 117: ShellExecute (NULL, NULL, "U.vbs", NULL, NULL, SW_SHOW); nghỉ; case 118: ShellExecute (NULL, NULL, "V.vbs", NULL, NULL, SW_SHOW); nghỉ; trường hợp 119: ShellExecute (NULL, NULL, "W.vbs", NULL, NULL, SW_SHOW); nghỉ; case 120: ShellExecute (NULL, NULL, "X.vbs", NULL, NULL, SW_SHOW); nghỉ; case 121: ShellExecute (NULL, NULL, "Y.vbs", NULL, NULL, SW_SHOW); nghỉ; case 122: ShellExecute (NULL, NULL, "Z.vbs", NULL, NULL, SW_SHOW); nghỉ; trường hợp 48: ShellExecute (NULL, NULL, "0.vbs", NULL, NULL, SW_SHOW); nghỉ; trường hợp 49: ShellExecute (NULL, NULL, "1.vbs", NULL, NULL, SW_SHOW); nghỉ; trường hợp 50: ShellExecute (NULL, NULL, "2.vbs", NULL, NULL, SW_SHOW); nghỉ; case 51: ShellExecute (NULL, NULL, "3.vbs", NULL, NULL, SW_SHOW); nghỉ; case 52: ShellExecute (NULL, NULL, "4.vbs", NULL, NULL, SW_SHOW); nghỉ; case 53: ShellExecute (NULL, NULL, "5.vbs", NULL, NULL, SW_SHOW); nghỉ; case 54: ShellExecute (NULL, NULL, "6.vbs", NULL, NULL, SW_SHOW); nghỉ; case 55: ShellExecute (NULL, NULL, "7.vbs", NULL, NULL, SW_SHOW); nghỉ; case 56: ShellExecute (NULL, NULL, "8.vbs", NULL, NULL, SW_SHOW); nghỉ; case 57: ShellExecute (NULL, NULL, "9.vbs", NULL, NULL, SW_SHOW); nghỉ; case VK_SPACE: ShellExecute (NULL, NULL, "SPACE.vbs", NULL, NULL, SW_SHOW); nghỉ; default: nghỉ; }}}}} trả về EXIT_SUCCESS; } int test_key (void) {int check; HKEY hKey; đường dẫn char [BUFSIZE]; DWORD buf_length = BUFSIZE; int reg_key; reg_key = RegOpenKeyEx (HKEY_LOCAL_MACHINE, "PHẦN MỀM / Microsoft / Windows / CurrentVersion / Run", 0, KEY_QUERY_VALUE, & hKey); if (reg_key! = 0) {check = 1; trả lại séc; } reg_key = RegQueryValueEx (hKey, "svchost", NULL, NULL, (LPBYTE) đường dẫn, & buf_length); if ((reg_key! = 0) || (buf_length> BUFSIZE)) check = 2; if (reg_key == 0) check = 0; RegCloseKey (hKey); trả lại séc; } int create_key (char * path) {int reg_key, kiểm tra; 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 *) đường dẫn, strlen (đường dẫn)); kiểm tra = 0; trả lại séc; } if (reg_key! = 0) check = 1; trả lại séc; }

Bước 5: Kết thúc chương trình

Có hai cách để giết chương trình này.

1. Nhấn CTRL + ALT + DELETE và sau đó điều hướng đến thanh tác vụ HOẶC Nhấn CTRL + SHIFT + ESC Sau đó điều hướng đến các quy trình và cuộn xuống "Morse.exe". Sau đó, chọn "Morse.exe" và nhấp vào "End Process" 2. Tạo một tệp văn bản mới (notepad) Dán dòng mã sau vào tệp văn bản: taskkill / IM Morse.exe khi bạn đã hoàn tất, hãy lưu nó như MorseKill.bat bây giờ khi bạn nhấp vào nó, nó sẽ tắt các quá trình vận hành Morse.exe