format pe gui
include 'win32ax.inc'
entry start

section '.data' data readable writeable
fileName db 'E:\test.exe',0
hFile dd ?
fileSize dd ?
hMap dd ?
ImageBase dd ?
pNt  dd ?
newSection dd ?
oldSection dd ?
section '.code' code readable executable
start:

invoke CreateFileA,fileName,GENERIC_READ or GENERIC_WRITE ,\
FILE_SHARE_READ or FILE_SHARE_WRITE,\
NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL
mov [hFile],eax
invoke GetFileSize,[hFile],NULL
mov [fileSize],eax
invoke CreateFileMappingA,[hFile],NULL,PAGE_READWRITE,0,0,NULL
mov [hMap],eax
invoke MapViewOfFile,[hMap],FILE_MAP_ALL_ACCESS,0,0,0
mov [ImageBase],eax
mov esi,[eax+3ch]
add esi,[ImageBase]
mov [pNt],esi
mov cx,word [esi+6h]
movzx ecx,cx
inc word [esi+6h]
mov esi,[pNt]
add esi,0f8h
mov eax,28h
mov ebx,ecx
imul ebx
add esi,eax
mov [newSection],esi
sub esi,28h
mov [oldSection],esi
mov esi,[newSection]
push 0E00000E0h
pop dword [esi+24h]
push 65ah
pop dword [esi+8h]
mov esi,[oldSection]
    
 mov ebx,dword [esi+0ch] 
     mov ecx,dword [esi+10h] 
   add ecx,dword [esi+14h]
mov esi,[newSection]
mov dword [esi],'.xy'
push 27000h
pop dword [esi+0ch]

mov dword [esi+14h],ecx
 push 65ah
    pop dword [esi+08h]
push 1000h
    pop dword [esi+10h]

 mov eax,[newSection]
    mov esi,dword [eax+08h]    
   add esi,dword [eax+0ch]
           mov ebx,[pNt]
        mov dword [ebx+50h] ,esi
      
     
ret



section '.import' import data readable writeable
library kernel32,'kernel32.dll'
include 'api\kernel32.inc'    

mov esi,[eax+3ch]
add esi,[ImageBase]
mov [pNt],esi