Please Help a Newbie

It Runs but with Blank Screen. Why?

.586
.model flat, stdcall
option casemap :none
option proc:private

include masm32includewindows.inc

include masm32includeuser32.inc
include masm32includekernel32.inc
include masm32includegdi32.inc

includelib masm32libuser32.lib
includelib masm32libkernel32.lib
includelib masm32libgdi32.lib

.DATA
Text DB "Hello ... your PC is now FUBAR"


.CODE
;******************************************
mainCRTStartup PROC PUBLIC
;******************************************

LOCAL ConOutHandle :DWORD
LOCAL Writen :DWORD
LOCAL ReturnValue :DWORD


invoke GetStdHandle, STD_OUTPUT_HANDLE
mov ConOutHandle, eax
invoke WriteConsole, ConOutHandle,Text,30,Writen,NULL
mov ReturnValue, eax



endlessloop:
nop
jmp endlessloop
invoke ExitProcess, 0
ret




;******************************************
mainCRTStartup ENDP
;******************************************

END