;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
_ProcFile	proc
		local	@hFile,@hFileNew,@dwBytesRead
		local	@szNewFile[MAX_PATH]:byte
		local	@szReadBuffer[512]:byte

;********************************************************************
; 打开文件
;********************************************************************
		invoke	CreateFile,addr szFileName,GENERIC_READ,FILE_SHARE_READ,0,\
			OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0
		.if	eax ==	INVALID_HANDLE_VALUE
			invoke	MessageBox,hWinMain,addr szErrOpenFile,NULL,MB_OK or MB_ICONEXCLAMATION
			ret
		.endif
		mov	@hFile,eax
;********************************************************************
; 创建输出文件
;********************************************************************
		invoke	lstrcpy,addr @szNewFile,addr szFileName
		invoke	lstrcat,addr @szNewFile,addr szNewFile
		invoke	CreateFile,addr @szNewFile,GENERIC_WRITE,FILE_SHARE_READ,\
			0,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0
		.if	eax ==	INVALID_HANDLE_VALUE
			invoke	MessageBox,hWinMain,addr szErrCreateFile,NULL,MB_OK or MB_ICONEXCLAMATION
			invoke	CloseHandle,@hFile
			ret
		.endif
		mov	@hFileNew,eax
;********************************************************************
; 循环读出文件并处理每个字节
;********************************************************************
		xor	eax,eax
		mov	@dwBytesRead,eax
		.while	TRUE
			lea	esi,@szReadBuffer
			invoke	ReadFile,@hFile,esi,sizeof @szReadBuffer,addr @dwBytesRead,0
			.break	.if ! @dwBytesRead
			invoke	_FormatText,esi,@dwBytesRead,@hFileNew
		.endw
		invoke	CloseHandle,@hFile
		invoke	CloseHandle,@hFileNew
		invoke	wsprintf,addr @szReadBuffer,addr szSuccees,addr @szNewFile
		invoke	MessageBox,hWinMain,addr @szReadBuffer,addr szSucceesCap,MB_OK
		ret

_ProcFile	endp

[课程]FART 脱壳王！加量不加价！FART作者讲授！