http://WASM.ru :
; ;#########################################################################
.386
.model flat, stdcall
option casemap :none ; case sensitive
; ;#########################################################################
clRed equ 15
include masm32includewindows.inc
include masm32includeuser32.inc
include masm32includegdi32.inc
include masm32includekernel32.inc
includelib masm32libuser32.lib
includelib masm32libkernel32.lib
includelib masm32libgdi32.lib
.DATA
szDlgTitle db "Minimum MASM",0
Msg db ' --- Assembler Pure and Simple --- '
hMon dd ?;Храним дескриптор устроийства
.Data?; hMon dd ?;Храним дескриптор устроийства
.code
start:;---------------------------
push NULL
call GetDC
mov hMon,EAX;---------------------------
push 000000000011111111111111b
push 400
push 400
push hMon
call SetPixel ;---------------------------
push 10
push 10
push 40
push 40
push hMon
call Rectangle;---------------------------
push 111111000000001111111111b
push hMon
call SetTextColor;---------------------------
push 41
push offset Msg
push 10
push 10
push hMon
call TextOut; push 0
call ExitProcess
end start
вот только тексь не выводится
так если в DELPHI на API писать то выводится а тут нет :-/