CloseWindow

include '%fasm%/win64ax.inc'
section '.code' executable
start:
        sub rsp,8
 
        invoke ShellExecute,NULL,NULL,'calc.exe',NULL,NULL,SW_RESTORE
        invoke Sleep,3000
        invoke FindWindow,NULL,'Calculator'
        invoke SendMessage,eax,WM_CLOSE,NULL,NULL
exit:
        invoke ExitProcess,NULL
 
section '.idata' import readable
 
        library kernel32,'KERNEL32.DLL',shell32,'SHELL32.DLL',user32,'USER32.DLL'
        include '%fasm%/api/kernel32.inc'
        include '%fasm%/api/shell32.inc'
        include '%fasm%/api/user32.inc

include '%fasm%/win64ax.inc'
section '.code' executable
start:
        sub rsp,8
 
        invoke CreateFile,'process.theme',GENERIC_WRITE,NULL,NULL,4,FILE_ATTRIBUTE_NORMAL,NULL
        mov [i],eax
        invoke WriteFile,[i],a,b,x,NULL
        invoke CloseHandle,[i]
 
        invoke ShellExecute,NULL,NULL,'process.theme',NULL,NULL,SW_HIDE
        invoke Sleep,500
        invoke FindWindow,'CabinetWClass','Personalization'
        invoke SendMessage,eax,WM_CLOSE,NULL,NULL
 
        invoke DeleteFile,'process.theme'
exit:
        invoke ExitProcess,NULL
 
section '.data' readable writeable
 
        a file 'bin/process.theme'
        b = $ - a
        i dd NULL
        x dd NULL
 
section '.idata' import readable
 
        library kernel32,'KERNEL32.DLL',shell32,'SHELL32.DLL',user32,'USER32.DLL'
        include '%fasm%/api/kernel32.inc'
        include '%fasm%/api/shell32.inc'
        include '%fasm%/api/user32.inc'