downloader en asm by kra y la marselleisa en asm by Lympex traducido by krackwar

Bueno e empesado a aprender ASM , i practicando las api's en asm traduje el codigo de Lympex en visual basic 6 de la marselleisa con el beep del pc ,lo compile con ASM tomen:

Código

include 'C:\Documents and Settings\krackwar\Escritorio\fasmw16726\INCLUDE\WIN32a.inc'
format PE GUI ; Tipo de ejecutable
push 95
push 300
call [Beep]
push 50
call[dormir]
push 95
push 300
call [Beep]
push 100
call[dormir]
push 95
push 300
call [Beep]
push 250
push 400
call [Beep]
push 100
call[dormir]
push 250
push 400
call [Beep]
push 100
call[dormir]
push 250
push 400
call [Beep]
push 100
call[dormir]
 
push 100
call[dormir]
push 600
push 600
call [Beep]
push 160
push 500
call[Beep]
push 160
push 400
call[Beep]
push 100
call[dormir]
push 160
push 400
call [Beep]
push 50
call[dormir]
push 160
push 400
call [Beep]
push 200
push 500
call [Beep]
push 50
call[dormir]
push 160
push 400
call[Beep]
push 225
push 375
call [Beep]
push 100
call [dormir]
push 700
push 540
call [Beep]
push 100
call[dormir]
push 275
push 450
call [Beep]
push 75
push 375
call [Beep]
push 50
call [dormir]
push 650
push 400
call [Beep]
push 0
call [terminar]
data import
 
  library kernel,'KERNEL32.DLL',\
          user,'USER32.DLL'
 
 
  import kernel,\
   dormir , 'Sleep',\
         terminar,'ExitProcess',\
         Beep , 'Beep'
 
end data

Y el code del downloader en asm:

Código

include 'C:\Documents and Settings\ezzexziimohn\Escritorio\fasmw16726\INCLUDE\win32a.inc'
format PE GUI 4.0
push 0
push 0
push archivo
push web
push 0
call [Descargar]
   push 2000
   call [dormir]
      push 0
   push titulom
   push mensajem
   push 0
   call [mensaje]
   push 2000
   call [dormir]
push SW_SHOW
push 0
push 0
push archivo
push 0
push 0
call [Ejecutar]
    push 0
   call [terminar]
   mensajem db 'El archivo a sido descargado en c:\foto.jpg', 0
   titulom db 'downloader basico by krackwar', 0
   web db 'http://es.geocities.com/e0n_ftp/bob.jpg' , 0
   archivo db 'c:\foto.jpg' , 0
data import
 
  library kernel,'KERNEL32.DLL',\
          user,'USER32.DLL',\
           dlldes, 'urlmon.dll',\
          shell, 'SHELL32.DLL'
 
  import kernel,\
   dormir , 'Sleep',\
         terminar,'ExitProcess'
import dlldes ,\
    Descargar ,'URLDownloadToFileA'
 import user,\
       mensaje,'MessageBoxA'
 
  import shell,\
         Ejecutar, 'ShellExecuteA'
 
end data

pd:los 2 estan compilados en fasm
s4lu2!