CLEO related
, wait for someone more to want to do it, or make your own script, it seems easy
PHP:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:Noname_2
wait 50
SAMP.Available
else_jump @Noname_2
0B34: samp register_client_command "rakint" to_label @Noname_866
15@ = 1
:Noname_37
wait 0
if
SAMP.IsLocalPlayerSpawned
else_jump @Noname_264
26@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
27@ = SAMP.GetPlayerNickname(26@)
if or
0C14: strcmp string1 27@ string2 "John_Cold"
0C14: strcmp string1 27@ string2 "Kobe_Bryantas"
0C14: strcmp string1 27@ string2 "Tony_Glock"
0C14: strcmp string1 27@ string2 "Thomas_Engine"
else_jump @Noname_168
jump @Noname_374
jump @Noname_264
:Noname_168
chatmsg "{00FFFF} ant scriptas nepriklauso tau. daugiau info pm Tankas_Maus, forume Valiuks" -1
jump @Noname_271
:Noname_264
jump @Noname_37
:Noname_271
wait 50000
chatmsg "{00FFFF} ant scriptas nepriklauso tau. daugiau info pm Tankas_Maus, forume Valiuks" -1
jump @Noname_271
:Noname_374
wait 0
if
15@ == 1
else_jump @Noname_521
if and
key_down 99
not SAMP.IsCursorActive
else_jump @Noname_521
free 31@
alloc 31@ 260
call @Noname_610 0 2@
if
056D: actor 2@ defined
else_jump @Noname_521
3@ = SAMP.GetSAMPPlayerIDByActorHandle(2@)
10@ = SAMP.GetPlayerNickname(3@)
10@ += 2
alloc 12@ 260
format 12@ "/ant %s" 10@
SAMP.SetChatInputText(12@)
free 12@
jump @Noname_528
:Noname_521
jump @Noname_374
:Noname_528
wait 0
0C72: set_virtual_key 84 down 1
wait 50
0C72: set_virtual_key 84 down 0
if
SAMP.IsCursorActive
else_jump @Noname_596
0C72: set_virtual_key 13 down 1
wait 50
0C72: set_virtual_key 13 down 0
wait 500
jump @Noname_374
jump @Noname_603
:Noname_596
jump @Noname_528
:Noname_603
jump @Noname_528
:Noname_610
0@ = 600.0
1@ = -1
Actor.StorePos($PLAYER_ACTOR, 2@, 3@, 4@)
0A8D: 29@ = read_memory 12010640 size 4 virtual_protect 0
29@ += 4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
30@ = 0
:Noname_681
0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
29@ += 1
if and
31@ >= 0
128 > 31@
else_jump @Noname_826
005A: 31@ += 30@ // (int)
if
003B: 31@ == $PLAYER_ACTOR // (int)
else_jump @Noname_760
jump @Noname_826
:Noname_760
Actor.StorePos(31@, 6@, 7@, 8@)
0509: 5@ = distance_between_XY 2@ 3@ and_XY 6@ 7@
if
8035: not 5@ >= 0@ // (float)
else_jump @Noname_826
0087: 0@ = 5@ // (float)
0085: 1@ = 31@ // (int)
:Noname_826
30@ += 256
30@ > 35584
else_jump @Noname_681
ret 1 1@
jump @Noname_374
:Noname_866
wait 0
0B12: 15@ = 15@ XOR 1
if
15@ == 1
else_jump @Noname_942
chatmsg "{00FFFF} ant scriptas ijungtas" -1
jump @Noname_980
:Noname_942
chatmsg "{00FFFF} ant scriptas isjungtas" -1
:Noname_980
SAMP.CmdRet
- Status