Stealth Client Forum

Code: Select all

              tmpitemid := FindAtCoord(xx, yy);
              if tmpitemid <> 0 then 
                begin
                  tmpname := GetCliloc(tmpitemid);
                  while ((GetName(tmpitemid) = 'NoName') OR (GetName(tmpitemid) = '')) AND (tmpname = '') AND (GetTooltip(tmpitemid) = '') do
                    begin
                      ClickOnObject(tmpitemid);
                      tmpname := GetCliloc(tmpitemid);
                    end;
                  AddToSystemJournal(GetName(tmpitemid) + '|' + tmpname);
                end;

Code: Select all

FindDistance := 15;