Шифрование

Тема в разделе "WASM.BEGINNERS", создана пользователем 2FED, 28 апр 2008.

  1. 2FED

    2FED New Member

    Публикаций:
    0
    Регистрация:
    20 фев 2008
    Сообщения:
    1.002
    написал две простеньких процедурки
    которые просто шифруют строку

    Код (Text):
    1. Encrypt proc a:dword,key:dword
    2.     invoke  lstrlen,a
    3.     mov     ecx,eax
    4.     mov     edx,a
    5.     mov     eax,key
    6. nxt:
    7.     xor     byte ptr [edx],al
    8.     add     al,byte ptr [edx]
    9.     inc     edx
    10.     loop    nxt
    11.     ret
    12. Encrypt endp
    13.  
    14. Decrupt proc a:dword,key:dword
    15.     invoke  lstrlen,a
    16.     mov     ecx,eax
    17.     dec     ecx
    18.     mov     edx,a
    19.     mov     eax,key
    20.     mov     ah,byte ptr [edx]
    21.     xor     byte ptr [edx],al
    22.     add     al,ah
    23.     inc     edx
    24.     jmp     x
    25. nxt:
    26.     add     al,ah
    27. x:
    28.     mov     ah,byte ptr [edx]
    29.     xor     byte ptr [edx],al
    30.    
    31.     inc     edx
    32.     loop    nxt
    33.     ret
    34. Decrupt endp
    Вопрос, на выходе получается просто набор байтов, а как получить это в текстовом виде?
     
  2. MSoft

    MSoft New Member

    Публикаций:
    0
    Регистрация:
    16 дек 2006
    Сообщения:
    2.854
    перевод числа в строку - это самая избитая тема
    если влом искать по форуму/сайту и/или писать руками, то использу wsprintf
     
  3. 2FED

    2FED New Member

    Публикаций:
    0
    Регистрация:
    20 фев 2008
    Сообщения:
    1.002
    к стате да тоже вариант, как это я об этом не подумал =) не я просто сразу подумал про что то типо base64 чтобы подогнать это всё под коды символом