[SNIPPET] For All Pickups

Example:

if or
044B:   actor $PLAYER_ACTOR on_foot
00DF:   actor $PLAYER_ACTOR driving
then
    0AB1: @GetClosestPickup 0 XYZ 0@ 1@ 2@
    06D5: 29@ = create_racing_checkpoint_at 0@ 1@ 2@ point_to 0@ 1@ 2@ type 2 radius 1.0
    wait 1000
    06D6: disable_racing_checkpoint 29@
end

0AB1: @GetClosestPickup 0 XYZ 0@ 1@ 2@

:GetClosestPickup
20@ = 9999.0
for 30@ = 0x9788C0 to 0x97D620 step 0x20
    if
    30@ > 0
    then
        0A8E: 31@ = 30@ + 0x1A
        0A8D: 31@ = read_memory 31@ size 2 virtual_protect 0
        31@ *= 0x10000
        0A8F: 29@ = 30@ - 0x9788C0
        29@ /= 0x20
        005A: 31@ += 29@
        065B: store_pickup 31@ position_to 4@ 5@ 6@
        04C4: store_coords_to 7@ 8@ 9@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
        0509: 10@ = distance_between_XY 4@ 5@ and_XY 7@ 8@
        if
        0025:   20@ > 10@  // (float)
        then
            0087: 20@ = 10@ // (float)
            0087: 15@ = 4@ // (float)
            0087: 16@ = 5@ // (float)
            0087: 17@ = 6@ // (float)
        end
    end
end 
0AB2: ret 3 15@ 16@ 17@