####################C++#########################
bored? yep -.-
here uhii now you can get 2 skill points @lvl up gzzz...
KalHook.SkillPoints(2);
void Hook::SkillPoints(BYTE PTS)
{
BYTE code[] = {0x83 , 0xC1 , PTS};
MemcpyEx(0x004591B1,(DWORD)&code,3);
}
void SkillPoints(BYTE);
you should know how to use this codes if you have read this topic
###################C++######################
Hook for ChatBox to use IngameCommands (client side)
PHP Code:
DWORD MyChatBack;
void WINAPI MyChatBox(char* rw)
{
if (rw[0] =='x')
Command(rw);
}
void Naked MyChatHook()
{
__asm
{
add esp,4
mov eax, esp
push eax
call MyChatBox
jmp MyChatBack;
}
}
void ChatPrint(char *rw)
{
char string[256]={0};
sprintf_s(string,"&\0");
strcat_s(string,rw);
DWORD adr = (DWORD)&string;
__asm
{
mov edx,adr
PUSH EDX
mov eax,0x00229518
push eax
PUSH 11h
mov eax,0x00229518
call eax
}
}
void ChatBox() {
int offset;
offset=SearchPattern("83 C4 04 85 C0 74 02 EB 26 8B 55 F8 52 68 x x x x 6A 11 E8 x x x x",0x00400000,0x00700000);
if (offset != 0) {
Intercept(INST_JMP,offset,(DWORD)MyChatHook,9);
MyChatBack = offset +9;
}
}
#####################Delphi######################
Here hf with this you can load KSM files ^^ not full working it's only a basic oO
PHP Code:
procedure TForm1.Button1Click(Sender: TObject);
var
myRGB: Array [0..3] of Byte;
X, Y: Integer;
MemStream: TMemoryStream;
begin
X := 0;
Y := 0;
MemStream := TMemoryStream.Create;
if OpenDialog1.Execute = True then
begin
MemStream.LoadFromFile(OpenDialog1.FileName);
MemStream.Position := 4;
Image1.Picture.Bitmap.Width := 256;
Image1.Picture.Bitmap.Height := 256;
for Y := 0 to 256 do
begin
for X := 0 to 256 do
begin
MemStream.Read(myRGB, 4);
Image1.Canvas.Pixels[X,Y] := RGB(myRGB[0],myRGB[1],myRGB[2]);
end;
end;
MemStream.Free;
end;
end;
