[Source] DinarBot by Aless

#include "WarRock base.h"
#include "WarRock color.h"
#include "WarRock d3dmenu.h"
#include "WarRock options.h"




D3D9Menu *KarraKa;

LPDIRECT3DTEXTURE9 White, Red, Green, Blue, Black, Purple, Grey, Yellow, Orange;

ID3DXFont* pFont;

bool Color = true, Create = true;

char *Moptfolder[] = {"+", "-"};
char *Moptonoff[] = {"OFF", "ON"};

HRESULT GenerateTexture(IDirect3DDevice9 *pD3Ddev, IDirect3DTexture9 **ppD3Dtex, DWORD colour32) 
{
	if(FAILED(pD3Ddev->CreateTexture(8, 8, 1, 0, D3DFMT_A4R4G4B4, D3DPOOL_MANAGED, ppD3Dtex, NULL)))
		return E_FAIL;

	WORD colour16 =((WORD) ((colour32>>28) &0xF) <<12)
		|(WORD) (((colour32>>20) &0xF) <<8)
		|(WORD) (((colour32>>12) &0xF) <<4)
		|(WORD) (((colour32>>4) &0xF) <<0);

	D3DLOCKED_RECT d3dlr;    
	(*ppD3Dtex) ->LockRect(0, &d3dlr, 0, 0);
	WORD *pDst16 =(WORD*) d3dlr.pBits;

	for(int xy=0; xy < 8*8; xy++) 
	*pDst16++ = colour16;

	(*ppD3Dtex) ->UnlockRect(0);

	return S_OK;
}
int CH_1024x768 = 0;
void RebuildMenu(void) 
{
	KarraKa->AddFolder("[Folder 1]", Moptfolder, &Folders.folder1, 2);
	if(Folders.folder1) {
		KarraKa->AddItem("1024x768", Moptonoff, &CH_1024x768, 2);
		KarraKa->AddItem("Item 2", Moptonoff, &Items.item3, 2);
	}

	KarraKa->AddFolder("[Folder 2]", Moptfolder, &Folders.folder2, 2);
	if(Folders.folder2) {
		KarraKa->AddItem("Item 3", Moptonoff, &Items.item3, 2);
		KarraKa->AddItem("Item 4", Moptonoff, &Items.item4, 2);
	}
}

{
if(CH_1024x768==1);
{
//Start Button
SetCursorPos(450,90);
Sleep(300);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Sleep(300);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
Sleep(300);
keybd_event(0x11, 0, 0, 0);
keybd_event(0x11, 0, 0, 0);
//Enter
keybd_event(0x0D, 0, 0, 0);
}
}

HRESULT WINAPI myReset(LPDIRECT3DDEVICE9 pDevice, D3DPRESENT_PARAMETERS* pPresentationParameters) 
{
	pFont->OnLostDevice();
	pFont->OnResetDevice();

	return pReset(pDevice, pPresentationParameters);
}

HRESULT WINAPI myEndScene(LPDIRECT3DDEVICE9 pDevice) 
{
	if(Create) {
		D3DXCreateFont(pDevice, 17, 0, FW_BOLD, 1, 0, DEFAULT_CHARSET, OUT_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH | FF_DONTCARE, (LPCSTR) "Trebuchet MS", &pFont);
		Create = false;
	}

	if(pFont == NULL) 
		pFont->OnLostDevice();
	else {
		if(KarraKa == NULL) {
			KarraKa = new D3D9Menu("-=[ KarraKa D3D9 Base ]=-");
		} else {
			if(KarraKa->Mmax==0) RebuildMenu();
			KarraKa->MenuShow(12, 10, pFont, pDevice);
			KarraKa->MenuNav();
		}
	}
	
	return pEndScene(pDevice);
}

HRESULT WINAPI myDrawIndexedPrimitive(LPDIRECT3DDEVICE9 pDevice, D3DPRIMITIVETYPE Type, INT BaseVertexIndex, UINT MinVertexIndex, UINT NumVertices, UINT startIndex, UINT primCount) 
{
	if(Color) {
		GenerateTexture(pDevice, &White, WHITE2);
		GenerateTexture(pDevice, &Red, RED2);
		GenerateTexture(pDevice, &Green, GREEN2);
		GenerateTexture(pDevice, &Blue, BLUE2);
		GenerateTexture(pDevice, &Black, BLACK2);
		GenerateTexture(pDevice, &Purple, PURPLE2);
		GenerateTexture(pDevice, &Grey, GREY2);
		GenerateTexture(pDevice, &Yellow, YELLOW2);
		GenerateTexture(pDevice, &Orange, ORANGE2);
		Color = false;
	}
	
	return pDrawIndexedPrimitive(pDevice, Type, BaseVertexIndex, MinVertexIndex, NumVertices, startIndex, primCount);
}

PVOID D3Ddiscover(void *tbl, int size) 
{
	HWND hWnd;
	void *pInterface=0 ;
	D3DPRESENT_PARAMETERS d3dpp; 

	if((hWnd=CreateWindowEx(NULL, WC_DIALOG, "", WS_OVERLAPPED, 0, 0, 50, 50, NULL, NULL, NULL, NULL)) ==NULL) return 0;
	ShowWindow(hWnd, SW_HIDE);

	LPDIRECT3D9 pD3D;
	LPDIRECT3DDEVICE9 pD3Ddev;
	if((pD3D = Direct3DCreate9(D3D_SDK_VERSION)) != NULL) {
		ZeroMemory(&d3dpp, sizeof(d3dpp));
		d3dpp.Windowed         = TRUE;
		d3dpp.SwapEffect       = D3DSWAPEFFECT_DISCARD;
		d3dpp.hDeviceWindow    = hWnd;
		d3dpp.BackBufferFormat = D3DFMT_X8R8G8B8;
		d3dpp.BackBufferWidth  = d3dpp.BackBufferHeight = 600;
		pD3D->CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_HAL, hWnd, D3DCREATE_SOFTWARE_VERTEXPROCESSING, &d3dpp, &pD3Ddev);
		if(pD3Ddev) {
			pInterface =(PDWORD) *(DWORD *) pD3Ddev;
			memcpy(tbl, (void *) pInterface, size);
			pD3Ddev->Release();
		}
		pD3D->Release();
	}
	DestroyWindow(hWnd);
	return pInterface;
}

void *DetourCreateJMP(BYTE *src, const BYTE *dst, const int len)
{
	BYTE *jmp =(BYTE*)malloc(len+5);
	DWORD dwBack;

	VirtualProtect(src, len, PAGE_READWRITE, &dwBack);
	memcpy(jmp, src, len);	
	jmp += len;
	jmp[0] = 0xE9;
	*(DWORD*)(jmp+1)=(DWORD)(src+len - jmp)- 5;

	src[0] = 0xE9;
	*(DWORD*)(src+1)=(DWORD)(dst - src)- 5;
	for(int i=5; i<len; i++)src[i] = 0x90;
	VirtualProtect(src, len, dwBack, &dwBack);

	return(jmp-len);
}

int D3D(void) 
{
	HINSTANCE hD3D = 0;
	DWORD vTable[105];
	do {
		hD3D = GetModuleHandle("d3d9.dll");
		if(!hD3D) Sleep(10);
	} while(!hD3D);

	if(D3Ddiscover((void *) &vTable[0], 420) == 0) return 0;
	{
		//You should add ur OWN DETOURS before of UnComment this section
		// Detour JMP Detected, you need bypass Hackshield
		pReset					= (oReset)					DetourCreateJMP((PBYTE) vTable[16], (PBYTE) myReset, 5); 
		pEndScene				= (oEndScene)				DetourCreateJMP((PBYTE) vTable[42], (PBYTE) myEndScene, 5);
		pDrawIndexedPrimitive	= (oDrawIndexedPrimitive)	DetourCreateJMP((PBYTE) vTable[82], (PBYTE) myDrawIndexedPrimitive, 5);

		free((void *) vTable);
	}

	return 0;
}

BOOL WINAPI DllMain(HMODULE hDll, DWORD dwReason, LPVOID lpReserved) 
{
	if(dwReason == DLL_PROCESS_ATTACH) 
	{
			CreateThread(NULL, NULL, (LPTHREAD_START_ROUTINE) D3D, NULL, NULL, NULL);
	}
	return TRUE;
}