help to add this func for trigger

Статус
В этой теме нельзя размещать новые ответы.

guvoseki

Новичок
Автор темы
4
0
Pls add this func "ColorFilter" (does not shoot by his gang friend - check color/clist)
Код:
:ColorFilter
18@ = 0
17@ = 0
if 0@ == 1
then
    0B2B: samp 22@ = get_player_id_by_actor_handle 1@
    0B2B: samp 21@ = get_player_id_by_actor_handle $PLAYER_ACTOR
    0B37: samp 20@ = get_player_color 22@
    0B37: samp 19@ = get_player_color 21@
    if 0085: 20@ == 19@
    then 18@ = 1
    end
end
if and 
    0@ == 1
    18@ == 0 
then 17@ = 1
end
if 0@ == 0
then 17@ = 1
end
ret 1 17@

for this trigger
Код:
{$CLEO .cs}              

0000: NOP 

0@ = 0

:Noname_2
wait 0 
if 
0ADC:   test_cheat "AUS" 
else_jump @Noname_136 
if 
  0@ == 0 
else_jump @Noname_92 
0@ = 1 
print "~g~Enabled" 1000 
jump @Noname_136 

:Noname_92
0@ = 0 
print "~r~Disabled" 1000 

:Noname_136
if 
  0@ == 1 
else_jump @Noname_223 
if 
key_down 2 
else_jump @Noname_223 
0470: 9@ = actor $PLAYER_ACTOR current_weapon 
call @Noname_395 1 9@ 6@ 
if 
  6@ == 1 
else_jump @Noname_223 
call @Noname_230 1 8 

:Noname_223
jump @Noname_2 

:Noname_230
1@ = 12006488 
005A: 1@ += 0@ // (int) 
0A8C: write_memory 1@ size 1 value 255 virtual_protect 0 
ret 0 

:Noname_265
0A96: 2@ = actor 1@ struct 
2@ += 1836 
0A8D: 2@ = read_memory 2@ size 1 virtual_protect 0 
0085: 1@ = 0@ // (int) 
if 
  2@ == 2 
else_jump @Noname_326 
1@ += 25 

:Noname_326
if 
  2@ == 3 
else_jump @Noname_351 
1@ += 36 

:Noname_351
1@ *= 112 
1@ += 13150904 
1@ += 8 
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0 
ret 1 1@ 

:Noname_395
call @Noname_265 2 0@ $PLAYER_ACTOR 9@ 
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
0AA6: call_method 5327216 struct 11989032 num_params 6 pop 0 3@v 6@v 2@ 1@ 0@ 1.0  
0AA6: call_method 5327216 struct 11989032 num_params 6 pop 0 6@v 10@v 2@ 1@ 0@ 9@  
if 
86BD:   not no_obstacles_between 3@ 4@ 5@ and 6@ 7@ 8@ solid 0 car 0 actor 1 object 0 particle 0 
else_jump @Noname_555 
10@ = 1 
jump @Noname_562 

:Noname_555
10@ = 0 


:Noname_562
ret 1 10@
 
Статус
В этой теме нельзя размещать новые ответы.