elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Introducción a la Factorización De Semiprimos (RSA)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  ASM (Moderador: Eternal Idol)
| | | |-+  pequeño encriptador de 16 byts echo en tasm
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: pequeño encriptador de 16 byts echo en tasm  (Leído 3,040 veces)
B14573R

Desconectado Desconectado

Mensajes: 30


Aprende a defenderte para luego saver como atacar


Ver Perfil
pequeño encriptador de 16 byts echo en tasm
« en: 23 Enero 2010, 23:24 pm »

bueno chicos este es mi primer aporte para los que empiesan en  tasm  el lenguaje que la lleba en todos los sentidos tantos como software y hardware  bueno espero les guste y lo disfruten y aprendan y lo modifiquen a gusto




Código
  1. .model small
  2. .code
  3.  
  4. encryp     segment
  5.             assume  cs:encryp, ds:encryp, ss:encryp
  6.  
  7. org 100h
  8.  
  9. start:  jmp index
  10. .stack
  11. tb1 equ  13
  12. tb2 equ  10
  13. crep   db 200,0,200 dup('$')
  14. crypt1     db 'Insert una cadena:',tb1,tb2,'$'
  15.  
  16. crypt2   db  'cadena cifrada:','$'
  17.  
  18.  
  19. index:
  20. mov ax,encryp
  21. mov ds,ax
  22.  
  23. lea dx,crypt1
  24. mov ah,09h
  25. int 21h
  26.  
  27. mov ah,0Ah                  ;pedimos la cadena
  28. mov     dx,offset crep             ;la guardamos en  crep
  29. int 21h
  30.  
  31. mov si, offset crep+1    
  32. lea bx,crep+1
  33. mov cl,byte ptr [si]
  34.  
  35. bucle:
  36. inc bx
  37. mov ax,[bx]                     ;ciframos
  38. add ax,0035h                   ;le sumamos 35 en hexadecimal a la cadena que en decimal es 53
  39. mov [bx],ax
  40.  
  41. loop bucle
  42.  
  43. lea     dx,crypt2
  44. mov ah,09h
  45. int 21h
  46.  
  47. mov dx,offset crep+2                   ;mostramos la cadena cifrada
  48. mov ah,9h
  49. int 21h
  50.  
  51. mov ah,10h
  52. int 16h
  53. encryp ends
  54. end start

aca el lin del ejecutable:  http://rapidshare.com/files/339576258/Encriptadorbasico.rar.html

EI: juntando mensajes.

no es el gran programa pero sirve para aprender
sip


« Última modificación: 24 Enero 2010, 00:42 am por Eternal Idol » En línea

SI SAVES DEFENDERTE SABRAS COMO ATACAR
SI SAVES COMO ATACAR SABRAS DEFENDERTE
.......................
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
PEQUEÑO ENCRIPTADOR EN BATCH « 1 2 »
Scripting
catkill 13 10,886 Último mensaje 8 Octubre 2018, 03:50 am
por El_Andaluz
como instalar tasm
ASM
karmi 1 5,492 Último mensaje 4 Febrero 2011, 00:34 am
por Garfield07
Declaracion de segmentos en TASM « 1 2 3 »
ASM
Usuario887 22 9,440 Último mensaje 9 Mayo 2020, 20:38 pm
por Usuario887
Documentacion de TASM.
ASM
Usuario887 5 4,156 Último mensaje 10 Julio 2020, 20:08 pm
por Eternal Idol
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines