macro  MacroYSTEncript Posicion,Tamaño{
local ..Caracter,..numero
..numero  = Tamaño
repeat Tamaño
..numero  = ..numero - 1
load ..Caracter from  Posicion+%-1
..Caracter = byte ..Caracter + 3
..Caracter = byte not ..Caracter
..Caracter = byte ..Caracter xor 45
..Caracter = byte ..Caracter xor ..numero
store  ..Caracter at  Posicion+%-1
end repeat
}     
 

proc YSTEncript,cCadena,cBuffer,cTamaño
push eax ebx ecx  edx esi
mov ebx,[cBuffer]
mov esi,[cCadena]
dec esi
dec ebx
.Eb:
dec [cTamaño]
inc esi
inc ebx
mov cl,byte[esi]
add cl,3
mov byte[ebx],cl
not byte[ebx]
xor byte[ebx],45
mov edx,[cTamaño]
xor byte[ebx],dl
cmp [cTamaño],0
jne .Eb
pop  esi edx ecx ebx eax
ret
endp
 
proc YSTDesencript,cCadena,cBuffer,cTamaño
push  eax ebx ecx  edx esi
mov ebx,[cBuffer]
mov esi,[cCadena]
dec esi
dec ebx
.Eb:
dec [cTamaño]
inc esi
inc ebx
mov cl,byte[esi]
mov byte[ebx],cl
mov edx,[cTamaño]
xor byte[ebx],dl
not byte[ebx]
xor byte[ebx],45
sub byte[ebx],3
cmp [cTamaño],0
jne .Eb
pop  esi edx ecx ebx eax
ret
endp

proc ASCIITOUNICODE,Cadena,Buffer
push ecx ebx
mov  eax,[Cadena]
mov ebx,[Buffer]
dec eax
sub ebx,2
.bucle:
inc eax
cmp byte[eax],0
je .salir
add ebx,2
mov cl,byte[eax]
mov byte[ebx],cl
mov byte[ebx+1],0
jmp .bucle
.salir:
pop ebx ecx
ret
endp

;Función que cifra con un xor 10 cada byte de una cadena
; cCadena = Puntero de cadena a cifrar
; cTTamaño = Tamaño de cadena a enbcriptar si este es 0 se medira la cadena automaticamente (fin de cadena de caracter nulo )
;  By YST
proc EncriptacionXOR,cCadena,cTamaño
push ebx
xor ebx,ebx
cmp [cTamaño],0
je .contar
mov ebx,[cTamaño]
jmp .Start
.contar:
mov ebx,0
mov eax,[cCadena]
.len:
inc ebx
inc eax
cmp byte[eax],0
jne .len
.Start:
mov eax,[cCadena]
inc ebx
dec eax
.bucle:
dec ebx
cmp ebx,0
jbe .salir
inc eax
xor byte[eax],10
jmp .bucle
.salir:
pop ebx
ret
endp

• Humilde Visor de claves de el msn 0.1v by YST  
        Descripción: Programa que te muestra todas las claves y cuentas guardadas en el Msn Live.
                         
  
  
• Humilde Visor de claves de el Firefox 0.1v by YST
        Descripción: Programa que te muestra las claves guardadas en el Firefox 3
     
     
  
• CrearImport
        Descripción: Programa que crea un import parecido a el "kernel32.inc" que trae el Fasm por defecto , con todas las funciones de la libreria indicada.
     
     
  
• PE visor by YST
        Descripción: Pequeño visor del formato PE de cualquier archivo que contenga este formato.
     
     
  
  Codigos generales.
   
     
  
• ChangeEntryPoint
        Descripción: Cambia el EntryPoint de un archivo con formato PE.
     
     
  
• GetAddressFunction
        Descripción: Función que simula la función GetProcAddress de la kernel32.dll
   
     
  
• Split
        Descripción: Codigo que parte una cadena por medio de un separador.
   
     
  
• Zerar
        Descripción: Función que llena de tantos 0 como le indiques una posición.
     
     
  
• cInstr
        Descripción: Función que te dice si una cadena se encuentra dentro de otra y de encontrarsre devuelve la posicion donde se    encuentra y en caso contrari devuelve 0
     
     
  
• StrReverse
        Descripción: Función pone una cadena al revez (ej: "Hola" te la dejaria en "aloH" )
     
     
  
• EncriptacionChangeCase
        Descripción: Función que remplaza todas las mayusculas por minuscula y viceversa
     
     
  
• EncriptacionXOR
        Descripción: Función que cifra mediante un XOR
     
     
  
• Encriptacion YST
        Descripción: Función que cifra mediante un algoritmo propio
     
     
  
• Infección USB
        Descripción: Función que infecta unidades extraibles
     
     
  
• DetectaExtención
        Descripción: Función que devuelve la extención de un archivo.
     
     
  
• cRtlMoveMemory
        Descripción: Función que simula la función RtlMoveMemory de kernel32.dll .
     
     
  
• EOFExtraDataExtract
        Descripción: Función que devuelve donde se encuentra el fin del archivo mediante el formato PE .
   
     
  
• antiemulator
        Descripción: Función que detecta la emulación de algunos antivirus .
   
     
  
• CapetaVaciaOUnidad
        Descripción: Función que dice si una ruta no contiene archivos .
   
     
  
• ASCIITOUNICODE
        Descripción: Función que pasa una cadena ascii a unicode .
   
     
  
• ConcatenarUnicode
        Descripción: Función que concatena 2 cadenas en unicode .
   
     
  
• LenUnicode
        Descripción: Función que mide una cadena en unicode.
   
     
  
• StringToHex
  Descripción: Función que pasa una cadena ASCII a Hexadecimal.
   
     
  
• HexToString
  Descripción: Función que pasa una cadena Hexadecimal a una cadena ASCII.
   
     
  
• SHA1Hash
  Descripción: Saca el hash sha1 de un dato
   
     
  
• Propagación por emule
  Descripción: Codigo que se propaga por el sistema p2p emule.
   
     
  
• Propagación por Omemo
  Descripción: Codigo que se propaga por el sistema p2p Omemo.
   
     
  
• Propagación por Ares
  Descripción: Codigo que se propaga por el sistema p2p ares.
   
     
  
• fRight
  Descripción: Funcion que iguala a la función Right de Visual basic 6.
   
     
  
• RC4
  Descripción:Codigo que cifra usando el algoritmo RC4.
   
     
  
• Rot39
  Descripción:Codigo que cifra usando el algoritmo ROT39.
   
   
  
• Ejecución de comandos con pipes
  Descripción:Codigo que muestra los valores devueltos por un ping 127.0.0.1 .
   
   
  
• IsVirtualPCPresent
  Descripción:Detecta si estamos siendo ejecutados en una maquina virtual .
     
   
  
• Llamar funciones de librerias como lo hace el Visual basic 6
  Descripción: Ejemplo de como llama las api's el visual basic 6 , codigo original por karcrack traducido por mi .

include 'win32ax.inc'
.code
start:
invoke MessageBox,0,0,0,0
invoke ExitProcess,0
.end start
section '.reloc' fixups data discardable