CLEO Help how to replace a weapon from a knife to a katana or deagle

CLEO related
Status
Not open for further replies.

bRuCeBrUcE

Active member
Joined
Jun 6, 2020
Messages
26
Reaction score
1
Location
Macedonia
// 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
not SAMP.Available
jf @NONAME_22
wait 0
goto @NONAME_2

:NONAME_22
0B34: samp register_client_command "kolji" to_label @NONAME_368
0B34: samp register_client_command "ugasi" to_label @NONAME_380

:NONAME_51
wait 0
if
31@ == 1
jf @NONAME_280
0@ = 0

:NONAME_80
11@ = SAMP.GetActorHandleByPlayerID(0@)
29@ = SAMP.GetPlayerColor(0@)
if and
056D: actor 11@ defined
not Actor.Dead(11@)
not SAMP.IsPlayerPaused(0@)
jf @NONAME_258
Actor.StorePos($PLAYER_ACTOR, 29@, 30@, 31@)
Actor.StorePos(11@, 29@, 30@, 31@)
050A: 25@ = distance_between_XYZ 26@ 27@ 28@ and_XYZ 29@ 30@ 31@
if
25.0 >= 26@
jf @NONAME_258
call @NONAME_287 4 0@ 0.0 4 3
12@ = SAMP.GetPlayerNickname(0@)
wait 10

:NONAME_258
0@ += 1
0@ > 1000
jf @NONAME_80

:NONAME_280
goto @NONAME_51

:NONAME_287
10@ = BitStream.New()
BitStream.Write(10@, 0, BS_TYPE_BOOL, 1)
BitStream.Write(10@, 0@, BS_TYPE_SHORT, 2)
BitStream.Write(10@, 1@, BS_TYPE_INT, 4)
BitStream.Write(10@, 2@, BS_TYPE_INT, 4)
BitStream.Write(10@, 3@, BS_TYPE_INT, 4)
RakNet.LiteRPC(115, 10@)
BitStream.Delete(10@)
ret 0

:NONAME_368
0B12: 31@ = 31@ XOR 1
SAMP.CmdRet

:NONAME_380
chatmsg "ugasio si" -1
run "secanoz.cs"
0A93: end_custom_thread
SAMP.CmdRet
 
Status
Not open for further replies.
Top