<pre>on showIt pos,theLength  set the hilite of btn "foundit" to false  if item 1 of pos + item 2 of pos +item 3 of pos + item 4 of pos = 0 then    answer "Target not found!"    exit showIt  end if  put item 1 of the rect of cd fld "documentation" into x  put item 2 of the rect of cd fld "documentation" into y  put item 3 of pos into theChar  put item 2 of pos into theLine  put the textHeight of cd fld "documentation" into th  put 6 into ts  -- courier  put y+(theLine*th) into y  put the scroll of cd fld "documentation" into theScroll  get the rect of cd fld "documentation"  put item 4 of it - item 2 of it into theHeight  if (theScroll+theHeight) < y  then set the scroll of cd fld "documentation" to (y-10*th)  put x+(theChar*ts) into x  put y - the scroll of cd fld "documentation" into y  put x into item 1 of r  put x+theLength*ts+5 into item 3 of r  put y - round(th/2) into item 2 of r  put y + round(th/2) into item 4 of r  set the rect of btn "foundit" to r  set the hilite of btn "foundit" to true  wait for 1 secondsend showIt</pre>