Я хочу забить в массив руны которые лежат в банке и потом в цикле по ним реколится и скупать нужные вещи.
Update:
покурив форум пришел к такому:
Code: Select all
	l := TStringList.Create();
	FindType($0F51, Backpack);
	GetFindedList(l);
	if (l.count > 0) then
	begin
	for n := 0 to (l.count-1) do
	addtosystemjournal(l.strings[n]);
	end;
	l.free;
