Код:
.data
Melt db 'Command.com /C Choice.com /C:YN /N /T:Y,5|erase ',0
.data?
meltbuff db 256 dup(?)
.code
start:
invoke GetModuleFileName, 0, addr meltbuff, 255
invoke GetShortPathName, addr meltbuff, addr meltbuff, 255
invoke lstrcat,addr Melt,Addr meltbuff
invoke WinExec, addr Melt, SW_SPOILER
invoke ExitProcess,0
end start