; Привет, пиплы, вообщем , если не влом, потестируйте
; код на своих машинах. Главное, не забудьте указать проц.
; у мя на Р-100 с калом предлагает пивка, а без кала
; улетает в 0xDEADCODE.
; В своем коде я полдня искал ету как обозвать (фича, баг?).
; Готовился разбить монитор битой...

;=====================================================
;..\bin\tasm32.exe /m/ml/kh30000 j.asm
;..\bin\ilink32.exe /B:0x400000 /GS:.text=W -Gz j.obj
IDEAL
include "..\..\include\winequ.inc"
includelib "..\..\lib\import32.lib"

extrn ExitProcess :near
extrn MessageBoxA :near
MessageBox equ < MessageBoxA >
p586
model flat, stdcall
segment _TEXT

lpEnjoy db "Бир вам",0
lpSmoke db "Анасеккен куттан паш!!!",0
lpMatrixHasYou db "Матрица еще тебя поимеет",0
lpCaption db "Компьютер сказал:",0

start:
xor ebx, ebx
push offset @@_SEH
push [dword fs:ebx]
mov edx, 0DEADC0DEH
mov [fs:ebx], esp
BSWAP EDX
call near suxx ; попробуйте закомментить ето
mov [@@sucha], edx
db 0e9h
@@sucha dd 00h

call MessageBox, ebx, offset lpMatrixHasYou, offset lpEnjoy, ebx
@@exit:
call ExitProcess,ebx

@@_SEH:
xor ebx, ebx
call MessageBox, ebx, offset lpSmoke, offset lpCaption, ebx
pop eax
mov eax,[esp]
mov [fs:ebx],eax
pop eax
jmp short @@exit
suxx: ret

ends _TEXT

end start

медицинский вопрос от любителя: кал - это что?

че-то ты лихо ebx-ом пользуешься - по-моему, его беречь нужно (в смысле, изменять нельзя)

пришел домой - и тут до меня дошло :D :D :D
call - читается "кол" (проверочное слово - футбол)

используй вместо ebx, edx ячейки (или восстанавливай их когда вызываешь API), а в этом месте:

„xor ebx, ebx
call MessageBox, ebx, offset lpSmoke, offset lpCaption, ebx “

можно вообще проще написать:

„call MessageBox, 0, offset lpSmoke, offset lpCaption, 0“

(если ты конечно не эксплоит пишешь ;)

Я в своих прогах пользуюсь bx и все нормально. Имхо подозрительны операции с db. У меня нет Тасма сделай лучше атач готовой проги, чтоб я испытал у себя.