... ............................................... endif function AtLine(itm, xBk) local st, nOk:=0 ** itm - string ** xBk - code block xBk:=&xBk for st=1 to len(itm) if eval(xBk, itm[st]) nOk:=st exit endif next return nOk It works fine, but I wanted to know if there is already ...