CLEO:
<
{$CLEO}
0000:
REPEAT
0001: 0
UNTIL 0AFA:
0BB9: samp 0@ = get_pickup_pool_ptr
WHILE TRUE
0001: 0
FOR 1@ = 0 TO {MAX_PICKUPS}4096 [STEP = 1]
IF 0B51: samp 2@ = pickup_handle_by_id 1@
THEN
0A90: 2@ = 1@ * 20
000A: 2@ += 61444
000A: 2@ += 0@ // stPickup
0A8D: 3@ = read_memory 2@ size 4 virtual_protect TRUE // iModelID
IF 0039: 3@ == 1276
THEN
0C0C: 3@ = struct 2@ offset 8 size 4 // X
0C0C: 4@ = struct 2@ offset 12 size 4 // Y
0C0C: 5@ = struct 2@ offset 16 size 4 // Z
02A7: 6@ = create_icon_marker_and_sphere 61 at 3@ 4@ 5@
WAIT 1500
IF 00C2: sphere_onscreen 3@ 4@ 5@ radius 5.0
THEN
0B55: convert_3D_coords 3@ 4@ 5@ to_screen 3@ 4@
00A0: store_actor $PLAYER_ACTOR position_to 5@ 6@ 7@
0B55: convert_3D_coords 5@ 6@ 7@ to_screen 5@ 6@
0B68: render draw_line_point1 5@ 6@ point2 3@ 4@ width 1 color 0xFFFFA500
0B6D: render 0@ = create_font "Arial" height 8 flags 12
0B6F: render font 0@ draw_text "ARTEFACT" pos 3@ 4@ color 0xFFFFA500
END
END
END
END
END
>
