objectFinder.cs

{$CLEO}
0000: NOP
0B34: samp register_client_command "oy" to_label @ofyellow
0B34: samp register_client_command "or" to_label @ofred
0B34: samp register_client_command "ob" to_label @ofblue
0B34: samp register_client_command "ov" to_label @ofviolet
0B34: samp register_client_command "og" to_label @ofgreen
0B34: samp register_client_command "ow" to_label @ofwhite
0B34: samp register_client_command "oreset" to_label @oreset
0B34: samp register_client_command "otog" to_label @otog
0B34: samp register_client_command "ohelp" to_label @ohelp
7@ = 0

:First
wait 0
if
0118:   actor $PLAYER_ACTOR dead
then
jump @First
end

if
056D:   actor $PLAYER_ACTOR defined
jf @First
30@ = 0

if
7@ == 1
then
jump @First
end

if 1@ == 1
then
0AB1: @Find_object 3 Object number 11@ Display_offset 30@ Color 0xF7F694
30@ += 43
end

if 2@ == 1
then
0AB1: @Find_object 3 Object number 12@ Display_offset 30@ Color 0xFF4800
30@ += 43
end

if 3@ == 1
then
0AB1: @Find_object 3 Object number 13@ Display_offset 30@ Color 0x00C8FF
30@ += 43
end

if 4@ == 1
then
0AB1: @Find_object 3 Object number 14@ Display_offset 30@ Color 0xD900FF
30@ += 43
end

if 5@ == 1
then
0AB1: @Find_object 3 Object number 15@ Display_offset 30@ Color 0x1EFF00
30@ += 43
end

if 6@ == 1
then
0AB1: @Find_object 3 Object number 16@ Display_offset 30@ Color 0xFFFFFF
30@ += 43
end
jump @First




:ofyellow
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 11@
then
1@ = 1
else
1@ = 0
end
samp.CmdRet

:ofred
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 12@
then
2@ = 1
else
2@ = 0
end
samp.CmdRet

:ofblue
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 13@
then
3@ = 1
else
3@ = 0
end
samp.CmdRet

:ofviolet
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 14@
then
4@ = 1
else
4@ = 0
end
samp.CmdRet

:ofgreen
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 15@
then
5@ = 1
else
5@ = 0
end
samp.CmdRet

:ofwhite
wait 0
0B35: samp 29@ = get_last_command_params //
if 0AD4: 31@ = scan_string 29@ format "%d" 16@
then
6@ = 1
else
6@ = 0
end
samp.CmdRet

:oreset
wait 0
1@ = 0
2@ = 0
3@ = 0
4@ = 0
5@ = 0
6@ = 0
samp.CmdRet

:otog
wait 0
0B12: 7@ = 7@ XOR 1
samp.CmdRet

:ohelp
wait 0
0AF8: samp add_message_to_chat "{F7F694}o{FF4800}b{00C8FF}j{D900FF}e{1EFF00}c{FFFFFF}t{F7F694}Finder commands:" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/oy <modelID> {F7F694}(yellow markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/or <modelID> {FF4800}(red markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/ob <modelID> {00C8FF}(blue markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/ov <modelID> {D900FF}(violet markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/og <modelID> {1EFF00}(green markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/ow <modelID> {FFFFFF}(white markers)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/oreset {F7F694}(reset current searches)" color 0xFFFFFFFF
0AF8: samp add_message_to_chat "{FFFFFF}/otog {F7F694}(tog current searches)" color 0xFFFFFFFF
samp.CmdRet

//0AB1: @Find_object 2 Object number 0@ Display_offset y@ Color 2@
:Find_object
0B5A: get_screen_resolution 29@ 31@ //int
29@ /= 10
29@ *= 8
//31@ /= 2
31@ /= 10
31@ *= 7
005A: 31@ += 1@
28@ = 0
for 16@ = 0 to 10000
    if 0B50: samp 10@ = object_handle_by_id 16@
    then
    0984: 11@ = object 10@ model
        if 003B:   11@ == 0@  // (int)
        then
        03F0: enable_text_draw 1
        28@ += 1
            if
            02CC:   object 10@ bounding_sphere_visible
            then
            0B66: render argb 2@ to_a 3@ r 4@ g 5@ b 6@
            0AB1: @Box_object 6 Object_handle 10@ Red 4@ Green 5@ Blue 6@ Alpha 255 Thickness 90.0
            end
        end
    end
    if 28@ > 14
    then break
    end
end
0AD3: 8@v = format "Model: %d" 0@
0AD3: 12@v = format "Number: %d" 28@
    if
    28@ == 0
    then
    0D94: draw_text 8@v pos_xy 29@ 31@ align_xy 0.0 0.0 color 0x575757 shadow 1
    31@ += 19
    0D94: draw_text 12@v pos_xy 29@ 31@ align_xy 0.0 0.0 color 0x575757 shadow 1
    else
    0D94: draw_text 8@v pos_xy 29@ 31@ align_xy 0.0 0.0 color 2@ shadow 1
    31@ += 19
    0D94: draw_text 12@v pos_xy 29@ 31@ align_xy 0.0 0.0 color 2@ shadow 1
    end
0AB2: ret 0


//0AB1: @Box_object 6 Object_handle 1@ Red 2@ Green 3@ Blue 4@ Alpha 5@ Thickness 6@
:Box_object
01BB: store_object 0@ position_to 11@ 12@ 13@
068D: get_camera_position_to 21@ 22@ 23@
050A: 24@ = distance_between_XYZ 11@ 12@ 13@ and_XYZ 21@ 22@ 23@
25@ = 800.0
26@ = 800.0
0073: 25@ /= 24@ // (float)
0073: 26@ /= 24@
0073: 5@ /= 24@
0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X 11@ Y 12@ Z 13@ store_screen_X_to 14@ Y_to 15@
0AB1: @DRAW_OUTLINED_BOX 9 POS 14@ 15@ SIZE 25@ 26@ RGBA 1@ 2@ 3@ 4@ THICKNESS 5@
0AB2: ret 0

//0AB1: @DRAW_OUTLINED_BOX 9 POS 300.0 300.0 SIZE 50.0 50.0 RGBA 255 0 0 255 THICKNESS 0.5
:DRAW_OUTLINED_BOX
0087: 14@  = 8@ // (float)
0087: 12@ = 2@ // (float)
0087: 13@ = 3@ // (float)
12@ /= 2.0 // (float)
13@ /= 2.0 // (float)
0087: 8@  = 0@ // (float)
005B: 8@ += 2@  // (float)
0063: 8@ -= 12@  // (float)
0087: 9@  = 0@ // (float)
0063: 9@ -= 2@  // (float)
005B: 9@ += 12@  // (float)
0087: 10@ = 1@ // (float)
005B: 10@ += 3@  // (float)
0063: 10@ -= 13@  // (float)
0087: 11@ = 1@ // (float)     by OpcodeXe
0063: 11@ -= 3@  // (float)
005B: 11@ += 13@  // (float)
03F0: enable_text_draw 1
038E: draw_box_position  8@ 1@  size 14@ 3@ RGBA 4@ 5@ 6@ 7@ //  links
038E: draw_box_position  9@ 1@  size 14@ 3@ RGBA 4@ 5@ 6@ 7@  // rechts
038E: draw_box_position  0@ 10@  size 2@ 14@ RGBA 4@ 5@ 6@ 7@  // oben
038E: draw_box_position  0@ 11@  size 2@ 14@ RGBA 4@ 5@ 6@ 7@  // unten
0AB2: ret 0

//0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X 0@ Y 1@ Z 2@ store_screen_X_to 3@ Y_to 4@
:getScreenXYFrom3DCoords
0AA7: call_function 0x70CE30 num_params 6 pop 6 clipNear 1 clipFar 1 yMult 7@s xMult 6@s outVector 2@s inVector 0@s result 29@
0073: 2@ /= 6@
0073: 2@ /= 4@
0073: 3@ /= 7@
0073: 3@ /= 4@
2@ *= 640.0
3@ *= 448.0
0AB2: ret 2 2@ 3@