Если y=1, то x=id предмета.
Если y=2, то x=количество данных предметов.

Сначала проверяю, есть ли уже ячейки с id этого предмета (1)
Value at (CurrentX, 1) Equal to 1
Если да, то проверяю, меньше ли 50 предметов сейчас в ячейке (50 - максимум для одной пачки)
Value at (CurrentX, 2) Less than 50
Если да, то добавляю к приватной переменной предмета значение +1 (так я устанавливал его количество, чтобы при подборе было легче определить, сколько предметов в пачке)
Дальше заносил это кол-во в array (CurrentX, 2) to item.Value('integer')
Менял текст
Уничтожал спрайт предмета, которого коснулся герой.
Если же кол-во равно 50 Value at CurrentX, 2) equal 50
То менял id предмета в Array, чтобы это действие больше не касалось его.
Set index (CurrentX, 1) to 1000
И запускаю функцию create.
Если нет ячейки с id этого предмета (1)
То запускаю функцию create.

В create проверяю, есть ли ячейки с id 0 - пустые
Value at(CurrentX, 1) Equal to 0
Если таковы существуют, то ищу слот, который не заполнен (его приватная переменная равна 0)InventorySlot: Value 'filling' Equal to 0
В нём я создаю сам объект
Заношу в array его id Set index (CurrentxX, 1) to 1
Уничтожаю спрайт предмета, которого коснулся герой.
Устанавливаю приватную переменную ячейки filling как 1.