Код:
{$CLEO .cs}
0000: NOP
0B34: samp register_client_command "tp_bleat" to_label @Cmd
While true
Wait 0
If 10@ == 1
Then
For 0@ = 0 To 1000
If Samp.IsPlayerConnected(0@)
Then
0B20: samp 1@ = actor_handle_by_samp_player_id 0@
If 056D: actor 1@ defined
then
00A0: store_actor 1@ position_to 2@ 3@ 4@
Actor.PutAt($PLAYER_ACTOR, 2@, 3@, 4@)
Print "Torment..." 100
Wait 1000
end
End
end
End
End
:Cmd
0B12: 10@ = 10@ XOR 1
Samp.CmdRet()