- 2,819
- 1,597
НЕ ТПШИТ, ПАМАГИТИ
CLEO:
{$CLEO .cs}
0000:
thread "NEW"
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
0B34: samp register_client_command "tpm" to_label @tp
while true
wait 0
end
:tp
if call @getmarkerpos 0 5@ 6@ 7@
then
Actor.PutAt($PLAYER_ACTOR, 5@ 6@ 7@)
0B78: log "{FFCC00}* [PT] {EAEAEA}телепортация на %.2f %.2f %.2f" 5@ 6@ 7@
else
0B78: log "{FFCC00}* [PT] {EAEAEA}красный маркер не найден"
end
0B43: cmd_ret
:getmarkerpos
// if call @getmarkerpos 0 5@ 6@ 7@
0@ = SAMP.Base()
0@ += 0x21A10C
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 1
0085: 1@ = 0@
1@ += 0x49
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 1
if 1@ == 0
then
return_false
else
0085: 2@ = 0@
2@ += 0x2C
0a8e: 3@ = 2@ + 0x4
0a8e: 4@ = 3@ + 0x4
0A8D: 2@ = read_memory 2@ size 4 virtual_protect 1
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 1
0A8D: 4@ = read_memory 4@ size 4 virtual_protect 1
return_true
ret 3 2@ 3@ 4@
end
ret 3 0 0 0
Можно так:Какой нужен опкод для этой функции?:
CLEO:if 0@ == 0 then 0@ = "Текст" // Этой end
CLEO:
0AD3: 0@ = format "TEXT" // под 0@ выдели память