[FASM] флуд сообщениями или пример использования потоков

[IBM]

Всем привет, написал интересный пример использования потоков.

include 'win32ax.inc'

section '.data' data readable writeable
ThreadID dd ?
Body db 'Fuck you, son of a bitch',0
title db 'Fuck you',0




section '.code' code readable executable
start:
push ThreadID
push 0
push 0
push Flood
push 0
push 0
call [CreateThread]
push 1000
call [Sleep]
jmp start
.end start

proc Flood
@a:
push 0
push title
push Body
push 0
call [MessageBox]
jmp @a
endp

Собственно вот порождение потоков:

push ThreadID
push 0
push 0
push Flood
push 0
push 0
call [CreateThread]

Где Flood, какая-то процедура и ThreadID переменная типа DWORD ( "ThreadID dd ?" )

Данный код каждую секунду показывает сообщение, а если закрыть одно из сообщений, то сразу же появляется еще одно.

Используйте этот пример на здоровье