MessagePump WinMain

gistfile1.asm

WinMain proc hInst		:DWORD,
             hPrevInst	:DWORD,
             szCmdLine	:DWORD,
             nCmdShow	:DWORD

	LOCAL msg	:MSG

MessagePump_Loop:
	
	; take the next message out of the queue to process
	invoke	GetMessage, ADDR msg, NULL, 0, 0

	; check if we just processed a WM_QUIT and get out
	; if we did 
	cmp		eax, 0
	je		MessagePump_Done

	; translate and dispatch the message as usual
	invoke	TranslateMessage, ADDR msg
	invoke	DispatchMessage, ADDR msg

	; keep processing messages
	jmp		MessagePump_Loop

MessagePump_Done:
	
	xor		eax, eax
	ret

WinMain endp