format PE GUI 4.0
entry start
include 'include\win32a.inc'

 files_h	      dd ?
 maps_h 	      dd ?
 map_addr	      dd ?
 ofn		      OPENFILENAME
 FilterString	      db 'All Files',0,'*.*',0,0
 buffer 	      db  1024 dup(?)
 
start:


	  mov	     [ofn.lStructSize],sizeof.OPENFILENAME
	  mov	     [ofn.lpstrFilter],FilterString
	  mov	     [ofn.lpstrFile],buffer
	  mov	     [ofn.nMaxFile],1024
	  mov	     [ofn.Flags],OFN_FILEMUSTEXIST or OFN_PATHMUSTEXIST or OFN_LONGNAMES or OFN_EXPLORER or OFN_HIDEREADONLY
	  invoke     GetOpenFileName,ofn
	  cmp	     eax,1
	  jne	     exit
	  call	     Create
      exit:
	  invoke     ExitProcess,eax



Create:
	   xor	esi,esi
	   invoke CreateFile,buffer,GENERIC_READ or GENERIC_WRITE,FILE_SHARE_READ,0,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,esi
	   mov	[files_h],eax
	   invoke   CreateFileMapping,eax,esi,PAGE_READWRITE,esi,esi,esi
	   mov	[maps_h],eax
	   invoke  MapViewOfFile,eax,FILE_MAP_WRITE,esi,esi,esi
	   mov	[map_addr],eax
	   mov ax,0c58ch
	   mov cl,0c3h
	   mov [eax],cl
	   mov ax,0c784h
	   mov [eax],cl
	   invoke     UnmapViewOfFile,[map_addr]
	   invoke     CloseHandle,[maps_h]
	   invoke     CloseHandle,[files_h]
	   mov eax,0
	   ret




data import
		     
  library kernel32,'KERNEL32.DLL',\
	  comdlg32,'COMDLG32.DLL',\ 
	  shell32,'SHELL32.DLL' 
		     
  include 'include\APIA\kernel32.inc'
  include 'include\APIA\comdlg32.inc'
  include 'include\APIA\shell32.inc'
		     
end data