Someone

DlgProc proc hWin:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM

	mov		eax,uMsg
	.if eax==WM_INITDIALOG

	.elseif eax==WM_COMMAND
 		
 		mov	EAX, wParam
	 	mov	CX, AX
	 	bswap	EAX
	 	
 		.IF	AX == IDC_BTN1
 			invoke MessageBox,0,addr szTitle, addr szCaption, MB_OK
 		.ENDIF
 		
 		
	.elseif eax==WM_CLOSE
		invoke EndDialog,hWin,0
	.else
		mov		eax,FALSE
		ret
	.endif
	mov		eax,TRUE
	ret

DlgProc endp