{$CLEO .cs}
0000:
wait 8500
while true
wait 0
if 0ADC: test_cheat "UP"
then
0AC8: 0@ = allocate_memory_size 260
0AC8: 1@ = allocate_memory_size 260
0AB1: @getChatString 1 ChatID 99 _Returned: Text 0@ PrefixText 1@ Color 2@ PrefixColor 3@
0A8C: write_memory 0@ size 1 value 0 virtual_protect 0 // delete text
0AB1: @SendEmptyChatmsg 0
0AD1: "Send...." 1337
end
end
:getChatString
{
0AC8: 0@ = allocate_memory_size 260
0AC8: 1@ = allocate_memory_size 260
0AB1: @getChatString 1 ChatID 99 _Returned: Text 0@ PrefixText 1@ Color 2@ PrefixColor 3@
0.3.DL
}
IF 0AA2: 31@ = "samp.dll"
THEN
31@ += 0x2ACA10 // SAMP_CHAT_INFO_OFFSET
0A8D: 31@ readMem 31@ sz 4 vp 0
31@ += 0x132
0@ *= 0xFC
005A: 31@ += 0@
0A8E: 30@ = 31@ + 0x20 // CHAT_TEXT_OFFSET
0A8E: 29@ = 31@ + 0x4 // CHAT_PREFIX_TEXT_OFFSET
0A8E: 28@ = 31@ + 0xF4 // CHAT_COLOR_OFFSET
0A8D: 27@ readMem 28@ sz 4 vp 0 // HEX Color
0A8E: 26@ = 31@ + 0xF8 // CHAT_PREFIX_COLOR_OFFSET
0A8D: 25@ readMem 26@ sz 1 vp 0
IF NOT 25@ > 0
THEN 24@ = 0
ELSE 0A8D: 24@ readMem 26@ sz 4 vp 0
END
0AA3: 31@
END
0AB2: ret 4 30@ 29@ 27@ 24@
:SendEmptyChatmsg
{
0AB1: @SendEmptyChatmsg 0
0.3.DL
}
IF 0AA2: 31@ = "samp.dll"
THEN
0085: 30@ = 31@ // (int)
30@ += 0x2ACA10 // SAMP_CHAT_INFO_OFFSET (DL)
0A8D: 29@ = read_memory 30@ size 4 virtual_protect 1
0085: 28@ = 31@ // (int)
28@ += 0x67650 // FUNC_ADDTOCHATWND (DL)
0AA6: call_method 28@ struct 29@ num_params 5 pop 0 0 0xFF00FF00 0 "" 8
END
0AB2: 0