Monday, August 13, 2007

Conexión winsock a un puerto (tasm5).

;sock0b.asm
;12AGO2007



.586p
.model flat,stdcall
locals
jumps

include c:\tasm\include\windows.inc
include c:\tasm\include\wsocks.inc
;include c:\tasm\include\win32api.inc

Conexión winsock a un puerto (masm9).

;sock0h.asm
;11AGO2007



; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

.586p ; create 32 bit code
.model flat, stdcall ; 32 bit memory model
option casemap :none ; case sensitive

include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
include \masm32\include\wsock32.inc

includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\wsock32.lib

Caja de mensaje en win32asm. Escrita para Macro Assembler 9.

; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

.586p ; create 32 bit code
.model flat, stdcall ; 32 bit memory model
option casemap :none ; case sensitive

include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc

includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib


.data
caption db "Caption",0
text db "Text",0


.code

start:

; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««
;
invoke MessageBox, NULL, addr text, addr caption, MB_OK
invoke ExitProcess, NULL
;
; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

end start



;EOS

Caja de mensaje en win32asm. Escrita para Turbo Assembler 5.

.586p
.model flat,stdcall
locals
jumps

include c:\tasm\include\windows.inc

extrn MessageBoxA:proc
extrn ExitProcess:proc


.data
titulo db "Titulo",0
texto db "Texto",0


.code
main:
push 0
push offset titulo
push offset texto
push 0
call MessageBoxA

push 0
call ExitProcess
end main



;EOS