074撒旦源码.rar

074撒旦源码.rar

// dll_cfd.cpp : Defines the entry point for the DLL application.
//

#include “stdafx.h“
#include 
#include 
#include 

HINSTANCE hMod;
HHOOK hHook;
HWND hWindow;
long cfun = NULL;

LRESULT Wndproc（HWND h long msg long w long l）
{
	COPYDATASTRUCT cd = {0};
	char op[256] = {0};
	DWORD d = 0;
	long ret = 0;

	if （msg == 0x4a） {
		if （!l） return 1;
		memcpy（&cd （PVOID）l sizeof（cd））;
		if （w == 1） {	//1: WriteMemory
			if （!VirtualProtect（（PVOID）cd.dwData cd.cbData 0x40 &d）） return 2;
			memcpy（（PVOID）cd.dwData （PVOID）cd.lpData cd.cbData）; 
			return 7;
		}
		if （w == 2） {
			if （!VirtualProtect（（PVOID）cd.dwData 4 0x40 &d）） return -17;
			memcpy（&ret （PVOID）cd.dwData 4）;
			return ret;
		}
	}
	return（CallWindowProc（（WNDPROC）cfun h msg w l））;
}

void MyFun（）
{
	long ret = 0;
	
	do {
		Sleep（50）;
	} while （!FindWindow（“MapleStoryClass“ “MapleStory“））;
	hWindow = FindWindow（“MapleStoryClass“ “MapleStory“）;
	cfun = （long）GetWindowLong（hWindow GWL_WNDPROC）;
	ret = SetWindowLong（hWindow GWL_WNDPROC （long）Wndproc）;
	if （!ret） MessageBox（0 “change callback function failed“ ““ MB_OK）;
}

BOOL APIENTRY DllMain（ HANDLE hModule 
                       DWORD  ul_reason_for_call 
                       LPVOID lpReserved
					 ）
{
	char msg[256] = {0};
	//char tmp[128] = {0};
	HANDLE hTH = 0;
	PROCESSENTRY32 pe = {0};
	SECURITY_ATTRIBUTES sa = {0};
	DWORD tid = 0;
	HANDLE ret = 0;


	if （ul_reason_for_call == DLL_PROCESS_ATTACH） {
		//sprintf（tmp “main: %x“ （int）DllMain）;
		//OutputDebugString（tmp）;
		hMod = （HINSTANCE）hModule;
		hTH = CreateToolhelp32Snapshot（TH32CS_SNAPPROCESS 0）;
		if （hTH == （HANDLE）-1）
			MessageBox（0 “create toolhelp failed“ ““ MB_OK）;
		pe.dwSize = sizeof（pe）;
		if （Process32First（hTH &pe）） {
			do {
				if （GetCurrentProcessId（） == pe.th32ProcessID）
					if （!strcmp（pe.szExeFile “MapleStory.exe“）） {
						ret = CreateThread（&sa 0
											（LPTHREAD_START_ROUTINE）MyFun
											NULL 0 &tid）;
						if （!ret） MessageBox（0 “create thread failed“ ““ MB_OK）;
					}
			} while （Process32Next（hTH &pe））;
		} else MessageBox（0 “Enum Process failed“ ““ MB_OK）;

		CloseHandle（hTH）;
	}
	if （ul_reason_for_call == DLL_PROCESS_DETACH）
		SetWindowLong（hWindow GWL_WNDPROC cfun）;

    return TRUE;
}

extern “C“ __declspec（dllexport） BOOL Unload（）
{
	return（UnhookWindowsHookEx（hHook））;
}

LRESULT CALLBACK HookProc（int nCodeWPARAM wParamLPARAM lParam）
{
	return（CallNextHookEx（hHook nCode wParam lParam））;
}

extern “C“ __declspec（dllexport） BOOL Install（）
{
	hHook = SetWindowsHookEx（WH_GETMESSAGE （HOOKPROC）HookProc hMod 0）;
	if （hHook） return TRUE;
	return FALSE;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2798  2009-08-04 00:25  撒旦源码\撒旦源码\dll\x.cpp

     文件       5147  2009-08-04 18:38  撒旦源码\撒旦源码\exe\VB\FrmAd.frm

     文件        129  2009-08-04 18:38  撒旦源码\撒旦源码\exe\VB\FrmAd.frx

     文件      41210  2009-08-04 18:46  撒旦源码\撒旦源码\exe\VB\FrmMain.frm

     文件       2250  2009-08-04 18:46  撒旦源码\撒旦源码\exe\VB\FrmMain.frx

     文件       1710  2009-08-03 23:24  撒旦源码\撒旦源码\exe\VB\m_crypto.bas

     文件       3137  2009-08-04 19:01  撒旦源码\撒旦源码\exe\VB\m_HotKey.bas

     文件       1441  2009-07-14 09:40  撒旦源码\撒旦源码\exe\VB\m_style.bas

     文件        853  2009-12-11 09:32  撒旦源码\撒旦源码\exe\VB\x.vbp

     文件        206  2009-12-19 10:28  撒旦源码\撒旦源码\exe\VB\x.vbw

     文件       1336  2009-12-19 12:48  撒旦源码\撒旦源码\新建 文本文档.txt

     目录          0  2009-12-19 10:28  撒旦源码\撒旦源码\exe\VB

     目录          0  2009-12-19 10:27  撒旦源码\撒旦源码\dll

     目录          0  2009-12-19 10:28  撒旦源码\撒旦源码\exe

     目录          0  2009-12-19 12:48  撒旦源码\撒旦源码

     目录          0  2009-12-19 12:47  撒旦源码

----------- ---------  ---------- -----  ----

                60217                    16