Tested! ;D Enjoy!
;Grendels Drop Seeker Script V.9
;adjust these values to increase/decrease speed
_d=2
_i=.1
;use an invisible "H" named skr as _org
_org=skr
;target of seeker is _targ
_targ=target
#top
_dis = _org distance _targ
;you need this function and the intit.sqs line
_dir=[_org,_targ] call dirtoobj
_glpos =getpos _org
_gx=_glpos select 0
_gy=_glpos select 1
_mx=_gx+(_d*(sin(_dir)))
_my=_gy+(_d*(cos(_dir)))
_org setpos [_mx,_my]
drop ["cl_basic", "", "Billboard", 2, random(1)+1, [0,0, 0], [0, 0, 0], 0, 1.275, 1, 0, [random(5),random(1)+7],[[0.5,0.46,0.4,1],[0.5,0.46,0.4,0]],[0],0,0,"","",_org]
~_i
?_dis>2:goto "top"
exit