Schiggy said:someone can make this without chat-spam?
Code:
{$CLEO}
Thread "BySpexx"
wait 2000
0B34: samp register_client_command ".play" to_label @Toggle
0B34: samp register_client_command ".stop" to_label @Restart
0AF0: 10@ = get_int_from_ini_file "cleo\Paths\Options.ini" section "Options" key "sprint"
WHILE TRUE
wait 0
if
31@ == true
then
20@ = 0
0A9A: 22@ = openfile "CLEO\Paths\WalkPath.txt" mode "rb"
0A9D: readfile 22@ size 4 to 1@
0A9D: readfile 22@ size 4 to 2@
0A9D: readfile 22@ size 4 to 3@
0AB1: call @char_goto 4 XYZ 1@ 2@ 3@ sprint 10@
repeat
wait 0
4@ = 0xB73458
4@ += 0x20
0A8C: write_memory 4@ size 1 value 0 virtual_protect 0
4@ = 0xB73458
4@ += 0x3
0A8C: write_memory 4@ size 1 value 255 virtual_protect 0
20@ += 1
if
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1@ 2@ radius 1.0 1.0 on_foot
then
// 0AF8: samp add_message_to_chat "[%d]Reading Path{00FF00} X %f {0000FF}Y %f {FF0000}Z %f" color -1 20@ 1@ 2@ 3@
0A9D: readfile 22@ size 4 to 1@
0A9D: readfile 22@ size 4 to 2@
0A9D: readfile 22@ size 4 to 3@
0AB1: call @char_goto 4 XYZ 1@ 2@ 3@ sprint 10@
end
UNTIL 0AD6: end_of_file 22@ reached
0A9B: closefile 22@
end
END
:Restart
Print "Stopped Path." 1000
wait 500
0A92: RESTART "WalkPath.CS"
004E: STOP THIS CLEO
samp.CmdRet()
:Toggle
if
31@ == true
then
31@ = false
else
31@ = true
Print "Following Path.." 1000
end
samp.CmdRet()
:char_goto
repeat
wait 0
00A0: store_actor $PLAYER_ACTOR position_to 4@ 5@ 2@
0063: 0@ -= 4@
0063: 1@ -= 5@
0604: get_Z_angle_for_point 0@ 1@ store_to 2@
005B: 0@ += 4@
005B: 1@ += 5@
2@ *= 0.01745
0A96: 4@ = actor $PLAYER_ACTOR struct
4@ += 0x558
0A8C: write_memory 4@ size 4 value 2@ virtual_protect 0
if
3@ == 0
then
4@ = 0xB73458
4@ += 0x20
0A8C: write_memory 4@ size 1 value 0 virtual_protect 0
4@ = 0xB73458
4@ += 0x3
0A8C: write_memory 4@ size 1 value 255 virtual_protect 0
else
4@ = 0xB73458
4@ += 0x20
0A8C: write_memory 4@ size 1 value 255 virtual_protect 0
4@ = 0xB73458
4@ += 0x3
0A8C: write_memory 4@ size 1 value 255 virtual_protect 0
end
until 00ED: actor $PLAYER_ACTOR 0 near_point 0@ 1@ radius 0.5 0.5 on_foot
0AB2: ret 0