SMapColors Source

[Saken15 15]

Here you go

 

;DLL Template made by Saken						
;http://www.tehproject.net						


.386
.Model Flat, StdCall
OPTION CASEMAP :NONE

include masm32includewindows.inc
include masm32includemasm32.inc
include masm32includeuser32.inc
include masm32includekernel32.inc
include masm32includedebug.inc
includelib masm32libmasm32.lib
includelib masm32libuser32.lib
includelib masm32libkernel32.lib
includelib masm32libdebug.lib

include Data.inc
include SMapColors.inc
include GameFunctions.inc
include TextFunctions.inc
include HotKeys.inc

.Data
NOPs				db 100 dup (90h)
DLStatus			db 65h


.Data?
ThreadID			dd ?
Thread			dd ?

.code

DllEntryPoint proc hInstDLL:DWORD, reason:DWORD, unused:DWORD

mov eax, reason
.if eax == DLL_PROCESS_ATTACH
	invoke CreateThread, NULL, 0, addr HotkeyLoop, 0, 0, addr ThreadID
	mov Thread, eax
.endif
ret

DllEntryPoint endp
End DllEntryPoint

 

 

HotkeyLoop proc

mov edx, offset Distract

@Again:
 invoke GetAsyncKeyState, VK_NUMPAD1
.if eax == 0FFFF8001h
invoke WriteMem, 47FF61h, addr DrawMapColors1, 3h
invoke MiddleTextDisplay, addr TextMapColors1
.endif

invoke GetAsyncKeyState, VK_NUMPAD2
.if eax == 0FFFF8001h
invoke WriteMem, 47FF64h, addr DrawMapColors2, 6h
invoke MiddleTextDisplay, addr TextMapColors2
.endif

invoke GetAsyncKeyState, VK_NUMPAD3
.if eax == 0FFFF8001h
invoke WriteMem, 47FF70h, addr DrawMapColors3, 3h
invoke MiddleTextDisplay, addr TextMapColors3
.endif

invoke GetAsyncKeyState, VK_NUMPAD4
.if eax == 0FFFF8001h
invoke WriteMem, 47FF70h, addr DrawMapColors4, 3h
invoke MiddleTextDisplay, addr TextMapColors4
.endif

invoke GetAsyncKeyState, VK_NUMPAD5
.if eax == 0FFFF8001h
invoke WriteMem, 47FF7Dh, addr DrawMapColors5, 6h
invoke MiddleTextDisplay, addr TextMapColors5
.endif

invoke Sleep, 2
jmp @Again

HotkeyLoop endp

 

.data
;Functions
BWFXN_PrintText	 dd 48D0C0h
BWFXN_MiddleText	dd 48D1C0h
BWFXN_PlaySound		dd 48ED50h
BWFXN_IssueCommand  dd 485BD0h

;Prints
Distract			 db 0, "Noob", 00h
TextMapColors1	   db 03h, "Map Color", 02h, " 1", 00h
TextMapColors2	   db 03h, "Map Color", 03h, " 2", 00h
TextMapColors3	   db 03h, "Map Color", 04h, " 3", 00h
TextMapColors4	   db 03h, "Map Color", 05h, " 4", 00h
TextMapColors5	   db 03h, "Map Color", 06h, " 5", 00h


;Bytes
RestoreMapColors1	db 8Ah, 06h, 7h
DrawMapColors1	   db 90h, 90h, 90h
DrawMapColors2	   db 90h, 90h, 90h, 90h, 90h, 90h
RestoreMapColors2	db 8Ah, 0A8h, 0A0h, 73h, 59h, 00h
DrawMapColors3	   db 90h, 90h, 90h
RestoreMapColors3	db 8Ah, 46h, 6h
DrawMapColors4	   db 90h, 90h, 90h, 90h, 90h, 90h
RestoreMapColors4	db 8Ah, 88h, 0A0h, 73h, 59h, 00h
DrawMapColors5	   db 90h, 90h, 90h, 90h, 90h, 90h
RestoreMapColors5	db 08Ah, 0A8h, 0A0h, 073h, 059h, 00h

;Colors
White1			   db 2h
Yellow2			  db 3h
BrightWhite		  db 4h
Grey				 db 5h
Red3				 db 6h
Green4			   db 7h

 

.code

BWTextDisplay proc			TextM:DWORD

	xor eax, eax
	mov edi, TextM
	call dword ptr [BWFXN_PrintText]
ret

BWTextDisplay endp


MiddleTextDisplay proc			TextM:DWORD

	xor eax, eax
	or eax, 0FFFFFFFFh
	push 00h
	push TextM
	call dword ptr [BWFXN_MiddleText]
ret

MiddleTextDisplay endp

Edited March 30, 2009 by Saken15