Game Maker - создание игр | HellRoom Games

inv_height_y=3; // Количество ячеек в высоту
inv_width_x=4; // Количество ячеек в ширину

   switch (name_obj[klick_x,klick_y]) //Выбираем в зависимости от названия предмета какое действие выполнить
        {
        case obj_grin: obj_hero.hp+=10; break; //увеличиваем у игрока hp на 10
        case obj_wink: obj_hero.x=random(room_width); obj_hero.y=random(room_height); break; //перемещаем игрока в случайную точку в пределах комнаты
        case obj_shocked: obj_hero.hp-=10; break; //уменьшаем у игрока hp на 10
        case obj_sm15: obj_hero.hp+=10; break; //увеличиваем у игрока hp на 10
        }

inv_height_y=3; // Количество ячеек в высоту
inv_width_x=4; // Количество ячеек в ширину

inv_height_y=3;//Количество ячеек в высоту
inv_width_x=3;//Количество ячеек в ширину

/*вычисляем на какой ячейке находится курсор (тут вычисляются не координаты, а как бы элемент массива которому принадлежит
ячейка над которой курсор*/
klick_x=floor((mouse_x-x)/slot_width_x);
klick_y=floor((mouse_y-y)/slot_height_y);

//Это код проверки наличия предмета в инвентаре

with (obj_inv)//выполняем код для объекта obj_inv
    {
    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//выбираем строку инвентаря для проверки
        {
        for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//проверяем все ячейки в этой строке, а потом опять выполнится сторка выше и мы перейдем к следующепй строке инвентаря
            {
            if (txt[slot_x,slot_y]='Grin')//когда находим ячейку с таким же предметом
                {
                      //здесь код, который должен выполниться если предмет есть в инвентаре
                }
            }
        }
    }

if (inv_txt!='')
    {
    draw_sprite(inv_spr,image_index,mouse_x-16,mouse_y-16);
    }

"Код из события Glob Right Released"
else
"Код из события Right Pressed"

if (position_meeting(mouse_x,mouse_y,self))

sprite_mini = индекс_спрайта_который_будет_отображаться_для_этого_предмета_в_инвентаре;

other.spr[other.slot_x,other.slot_y]=sprite_index;//записываем в массив какой спрайт отображать в нивентаре

other.spr[other.slot_x,other.slot_y]=sprite_mini;//записываем в массив какой спрайт отображать в нивентаре

with (obj_inv)//выполняем код для объекта obj_inv
    {
    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//выбираем строку инвентаря для проверки
        {
        for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//проверяем все ячейки в этой строке, а потом опять выполнится сторка выше и мы перейдем к следующепй строке инвентаря
            {
                        txt[slot_x,slot_y]='';//очищаем переменные для этой ячейки (удаляем предмет из инвентаря)
                        item[slot_x,slot_y]=0;
                        max_number[slot_x,slot_y]=0;
            }
        }
    }

//Использование предмета.
/*вычисляем на какой ячейке находится курсор (тут вычисляются не координаты, а как бы элемент массива которому принадлежит
ячейка над которой курсор*/
if (visible and inv_txt='' and obj_inv_weapon.inv_txt='' )
    {
    klick_x=0;//координаты ячейки для использования предмета
    klick_y=0;

    if (txt[klick_x,klick_y]!='')//елси в слоте, над которым сейчас находится курсор, что-то есть
        {
        with (obj_inv_weapon)
            {//задаем координаты ячеек в которые можно переместить данный предмет. Сначала -1, это означает что перемещать нельзя, дальше зададим реальные координаты
            //количество пар переменных = максимальное количество слотов для данного типа предмета
            //в нашем примере максимальное количество слотов для одного типа предметов 2 (это два оружия и два кольца)
            //Вы можете сделать больше одинаковых ячеек, добавив еще пары переменных здесь и в коде ниже
            n_x_1 = -1;
            n_y_1 = -1;
            n_x_2 = -1;
            n_y_2 = -1;
        
            switch (other.item_type[other.klick_x,other.klick_y])//Выбираем в зависимости от типа предмета какое действие выполнить
                {//типр предмета: 0 - обычный предмет, 1 - оружие, 2 - шлем, 3 - броня, 4 - обувь, 5 - перчатки, 6 - амулет, 7 - кольца
                case 0: execute_string(other.act_on[other.klick_x,other.klick_y]); break;//для обычных предметов типа 0 просто выполняем тот код, который в них записан
                //дальше идет определение координат ячеек, в которые можно переместить предметы, которые игрок моежет надевать
                //если переменные n_x_2 и n_y_2 здесь не определены, значит из значение -1 и для этого типа предметов предназначен только один слот
                case 1: n_x_1 = 0;
                        n_y_1 = 1;
                        n_x_2 = 2;
                        n_y_2 = 1;
                        break;
                case 2: n_x_1 = 1;
                        n_y_1 = 0;
                        break;
                case 3: n_x_1 = 1;
                        n_y_1 = 1;
                        break;
                case 4: n_x_1 = 1;
                        n_y_1 = 2;
                        break;
                case 5: n_x_1 = 0;
                        n_y_1 = 0;
                        break;
                case 6: n_x_1 = 2;
                        n_y_1 = 0;
                        break;
                case 7: n_x_1 = 0;
                        n_y_1 = 2;
                        n_x_2 = 2;
                        n_y_2 = 2;
                        break;
                }
            }
            
        if (obj_inv_weapon.n_x_1 != -1) //Если этот предмет можно надеть (для тех типов предметов, которе надеть нельзя эта переменная была определена выше как -1)
            {
            //записываем все данные из этого слота в переменные для перетаскивания
            inv_item_x=klick_x;
            inv_item_y=klick_y;
            inv_txt=txt[klick_x,klick_y];
            inv_item=1;
            inv_spr=spr[klick_x,klick_y];
            inv_max_number=max_number[klick_x,klick_y];
            inv_name_obj=name_obj[klick_x,klick_y];
            inv_act_on = act_on[klick_x,klick_y];//записываем код, выполняемый при использовании
            inv_act_off = act_off[klick_x,klick_y];//записываем параметры для надеваемых предметов
            inv_item_type = item_type[klick_x,klick_y];//записываем тип предмета
                                    
            with (obj_inv_weapon)//выполняем код для объекта obj_inv_weapon.
                {
                if (txt[n_x_1,n_y_1]='')//Если первая ячейка свободна перемещаем в нее предмет (для оружия это будет слот правой руки)
                    {
                    txt[n_x_1,n_y_1]=other.inv_txt;//записываем в массив имя
                    spr[n_x_1,n_y_1]=other.inv_spr;//записываем в массив какой спрайт отображать в нивентаре
                    item[n_x_1,n_y_1]=other.inv_item;//увеличиваем кол-во предментов на 1
                    name_obj[n_x_1,n_y_1]=other.inv_name_obj;//записываем имя объекта
                    max_number[n_x_1,n_y_1]=other.inv_max_number;//записываем максимальное количество предметов в слоте
                    act_on[n_x_1,n_y_1] = other.inv_act_on;//записываем код, выполняемый при использовании
                    act_off[n_x_1,n_y_1] = other.inv_act_off;//записываем параметры для надеваемых предметов
                    item_type[n_x_1,n_y_1] = other.inv_item_type;//записываем тип предмета
                    r_weap = true;//эта переменная будет использоваться для определения в какой руке оружие: true - в правой, false - в левой (только для оружия)
                    execute_string(act_on[n_x_1,n_y_1]);//выполняем то, что должно произойти когда надеваем предмет
                    }
                else//иначе, если япервая ячейка этого типа занята проверяем вторую ячейку этого типа (если она есть)
                    {//если в Вашем инвентаре предусмотрено больше 2-х ячеек одного типа, добавьте здесь блок кода приведенный выше  (строки 70-82) подставив другие переменные вместо n_x_1 и n_y_1. Код ниже - проверка последнего слота этого типа
                    if (n_x_2 != -1)//Если есть еще одна ячейка для этого типа предметов
                        {
                        if (txt[n_x_2,n_y_2]='')//Если вторая ячейка свободна перемещаем в нее предмет
                            {
                            txt[n_x_2,n_y_2]=other.inv_txt;//записываем в массив имя
                            spr[n_x_2,n_y_2]=other.inv_spr;//записываем в массив какой спрайт отображать в нивентаре
                            item[n_x_2,n_y_2]=other.inv_item;//увеличиваем кол-во предментов на 1
                            name_obj[n_x_2,n_y_2]=other.inv_name_obj;//записываем имя объекта
                            max_number[n_x_2,n_y_2]=other.inv_max_number;//записываем максимальное количество предметов в слоте
                            act_on[n_x_2,n_y_2] = other.inv_act_on;//записываем код, выполняемый при использовании
                            act_off[n_x_2,n_y_2] = other.inv_act_off;//записываем параметры для надеваемых предметов
                            item_type[n_x_2,n_y_2] = other.inv_item_type;//записываем тип предмета
                            r_weap = false;//эта переменная будет использоваться для определения в какой руке оружие: true - в правой, false - в левой
                            execute_string(act_on[n_x_2,n_y_2]);//выполняем то, что должно произойти когда надеваем предмет
                            
                            other.txt[other.klick_x,other.klick_y]='';//очищаем переменные для этой ячейки (удаляем предмет из инвентаря)
                            other.max_number[other.klick_x,other.klick_y]=0;
                            other.item[other.klick_x,other.klick_y]=0;
                            other.inv_txt='';
                            exit;//!Заканчиваем выполнение кода!
                            }
                        }
                    //Если все ячейки для этого типа предметов заняты
                    //Сначала перемещаем предмет из первого слота в инвентарь (на место того предмета, которое будем перемещать в первый слот)
                    other.txt[other.klick_x,other.klick_y] = txt[n_x_1,n_y_1];//записываем в массив имя
                    other.spr[other.klick_x,other.klick_y] = spr[n_x_1,n_y_1];//записываем в массив какой спрайт отображать в нивентаре
                    other.item[other.klick_x,other.klick_y] = item[n_x_1,n_y_1];//увеличиваем кол-во предментов на 1
                    other.name_obj[other.klick_x,other.klick_y] = name_obj[n_x_1,n_y_1];//записываем имя объекта
                    other.max_number[other.klick_x,other.klick_y] = max_number[n_x_1,n_y_1];//записываем максимальное количество предметов в слоте
                    other.act_on[other.klick_x,other.klick_y] = act_on[n_x_1,n_y_1];//записываем код, выполняемый при использовании
                    other.act_off[other.klick_x,other.klick_y] = act_off[n_x_1,n_y_1];//записываем параметры для надеваемых предметов
                    other.item_type[other.klick_x,other.klick_y] = item_type[n_x_1,n_y_1];//записываем тип предмета
                    r_weap = true;//эта переменная будет использоваться для определения в какой руке оружие: true - в правой, false - в левой (только для оружейных слотов)
                    execute_string(act_off[n_x_1,n_y_1]);//выполняем то, что должно произойти когда снимаем предмет
                    //Потом перемещаем выбранный предмет в первый слот
                    txt[n_x_1,n_y_1]=other.inv_txt;//записываем в массив имя
                    spr[n_x_1,n_y_1]=other.inv_spr;//записываем в массив какой спрайт отображать в нивентаре
                    item[n_x_1,n_y_1]=other.inv_item;//увеличиваем кол-во предментов на 1
                    name_obj[n_x_1,n_y_1]=other.inv_name_obj;//записываем имя объекта
                    max_number[n_x_1,n_y_1]=other.inv_max_number;//записываем максимальное количество предметов в слоте
                    act_on[n_x_1,n_y_1] = other.inv_act_on;//записываем код, выполняемый при использовании
                    act_off[n_x_1,n_y_1] = other.inv_act_off;//записываем параметры для надеваемых предметов
                    item_type[n_x_1,n_y_1] = other.inv_item_type;//записываем тип предмета
                    execute_string(act_on[n_x_1,n_y_1]);//выполняем то, что должно произойти когда надеваем предмет
                    
                    other.inv_txt='';//мы ничего не перетаскиваем
                    exit;//!Заканчиваем выполнение кода!
                    }
                }
             }
        //эта часть кода выполняется для всех типов предметов:
        item[klick_x,klick_y]-=1;//Уменьшаем количество предметов в слоте на 1
        if (item[klick_x,klick_y]=0)//если предметов больше не осталось,
            {
            txt[klick_x,klick_y]='';//очищаем переменные для этой ячейки (удаляем предмет из инвентаря)
            max_number[klick_x,klick_y]=0;
            }
        inv_txt='';
        }
    }

if (inv_item_type == 8)
    {
    txt[inv_item_x,inv_item_y]=inv_txt;//записываем в массив имя

    inv_txt='';//ничего не перетаскиваем
    exit;//завершаем выполнение кода (чтобы предмет не удалился)
    }

if (inv_name_obj == obj_potion_mana or inv_name_obj == obj_potion_health)
    {
    txt[inv_item_x,inv_item_y]=inv_txt;//записываем в массив имя

    inv_txt='';//ничего не перетаскиваем
    exit;//завершаем выполнение кода (чтобы предмет не удалился)
    }

if (keyboard_check(vk_shift))//Если зажата клавиша Shift
        {
        if (txt[klick_x,klick_y]!='')//елси в слоте, над которым находится курсор, что-то есть
            {
            if (item_type[klick_x,klick_y] != 8)
                {

if (keyboard_check(vk_shift))//Если зажата клавиша Shift
        {
        if (txt[klick_x,klick_y]!='')//елси в слоте, над которым находится курсор, что-то есть
            {
            if (name_obj[klick_x,klick_y] != obj_potion_mana and name_obj[klick_x,klick_y] != obj_potion_health)
                {

if (inv_txt!='')//если при отпускании правой кнопки мыши мы перетаскивали предмет
    {
    if position_meeting(mouse_x,mouse_y,self)//если курсор над инвентарем
        {
        /*вычисляем на какой ячейке находится курсор (тут вычисляются не координаты, а как бы элемент массива которому принадлежит
        ячейка над которой курсор*/
        klick_x=floor((mouse_x-x)/slot_width_x);
        klick_y=floor((mouse_y-y)/slot_height_y);

        if (txt[klick_x,klick_y]='')//если ячейка над которой отпустили правую кнопку миыши пустая
            {
            txt[klick_x,klick_y]=inv_txt;//записываем в массив имя
            spr[klick_x,klick_y]=inv_spr;//записываем в массив какой спрайт отображать в нивентаре
            item[klick_x,klick_y]=inv_item;//Записываем количество предметов, которые мы перетаскивали
            max_number[klick_x,klick_y]=inv_max_number;//Записываем максимальное количество предметов, которое может быть в одной ячейке
           
            inv_txt='';//показываем что больше ничего не перетаскиваем
           
            txt[inv_item_x,inv_item_y]='';//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
            item[inv_item_x,inv_item_y]=0;
            max_number[inv_item_x,inv_item_y]=0;
            }
        else
            {//если ячейка над которой отпустили правую кнопку миыши НЕ пустая
            if (txt[klick_x,klick_y]=inv_txt)//если там такой же предмет, какой мы перетаскиваем
                {
                if (inv_max_number=0)//если перетаскиваемые предметы можно складывать в любом количестве в одну ячейку
                    {
                    item[klick_x,klick_y]+=inv_item;//Добавляем все перетаскиваемые предметы в эту ячейку
                   
                    inv_txt='';//показываем что больше ничего не перетаскиваем

                    txt[inv_item_x,inv_item_y]='';//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
                    item[inv_item_x,inv_item_y]=0;
                    max_number[inv_item_x,inv_item_y]=0;
                    }
                else
                    {
                    while (item[klick_x,klick_y]<inv_max_number && inv_item>0)/*добавляем предметы по одному в эту ячейку, пока она не зполнится
                                                                            или пока не добавим все перетаскиваемые объекты*/
                        {
                        item[klick_x,klick_y]+=1;//увеличиваем количество объектов в слоте на один (добавлчем в слот один предмет)
                        inv_item-=1;//Уменьшаем количество перетаскиваемых объектов на один
                        }
                    if (inv_item!=0)/*если остались еще предметы которые мы перетаскиваем (это может произойти если заполнилась ячейка в которую мы
                                    перетаскивали предметы)*/
                        {//Возвращаем оставшиеся предмет в ту ячейку, откуда взяли
                        txt[inv_item_x,inv_item_y]=inv_txt;//записываем в массив имя
                        item[inv_item_x,inv_item_y]=inv_item;//записываем оставшееся количество предметов

                        inv_txt='';//показываем что больше ничего не перетаскиваем
                        }
                    else
                        {//если после перетаскивания предметов больше не осталось
                        inv_txt='';//показываем что больше ничего не перетаскиваем

                        txt[inv_item_x,inv_item_y]='';//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
                        item[inv_item_x,inv_item_y]=0;
                        max_number[inv_item_x,inv_item_y]=0;
                   
                        }
                    }
                }
            else//если отпустили правую кнопку мышки над предметом. отличающимся от перетаскивания
                {//Возвращаем предмет в ту ячейку, откуда взяли
                txt[inv_item_x,inv_item_y]=inv_txt;//записываем в массив имя

                inv_txt='';//показываем что больше ничего не перетаскиваем
                }
            }
        }
    else //если курсор не над инвентарем
        {
        repeat(inv_item)//выбрасываем предметы (выбрасываем столько предметов, сколько находилось в ячейке)
            {
            instance_create(obj_hero.x-16,obj_hero.y+16,inv_name_obj);
            }
        inv_txt='';//показываем что больше ничего не перетаскиваем

        txt[inv_item_x,inv_item_y]='';//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
        item[inv_item_x,inv_item_y]=0;
        max_number[inv_item_x,inv_item_y]=0;
        }
    }
else
    {
    if (visible)
        {
        if (position_meeting(mouse_x,mouse_y,self))//если курсор над инвентарем)
            {
            /*вычисляем на какой ячейке находится курсор (тут вычисляются не координаты, а как бы элемент массива которому принадлежит
            ячейка над которой курсор*/
            klick_x=floor((mouse_x-x)/slot_width_x);
            klick_y=floor((mouse_y-y)/slot_height_y);

            if (keyboard_check(vk_shift))//Если зажата клавиша Shift
                {
                if (txt[klick_x,klick_y]!='')//елси в слоте, над которым находится курсор, что-то есть
                    {
                    instance_create(obj_hero.x,obj_hero.y+32,name_obj[klick_x,klick_y]);//создаем этот объект чуть ниже игрока
                    item[klick_x,klick_y]-=1;//Уменьшаем количество предметов в слоте на 1
                    if (item[klick_x,klick_y]=0)//Если предметов в слоте больше не осталось
                        {
                        txt[klick_x,klick_y]='';//очищаем переменные для этой ячейки (удаляем предмет из инвентаря)
                        max_number[klick_x,klick_y]=0;
                        }
                    }
                }
            else
                {//если не нажата клавиша Shift
                if (txt[klick_x,klick_y]!='')//елси в слоте, над которым находится курсор, что-то есть
                    {//записываем все данные из этого слота в переменные для перетаскивания
                    inv_item_x=klick_x;
                    inv_item_y=klick_y;
                    inv_txt=txt[klick_x,klick_y];
                    inv_item=item[klick_x,klick_y];
                    inv_spr=spr[klick_x,klick_y];
                    inv_max_number=max_number[klick_x,klick_y];
                    inv_name_obj=name_obj[klick_x,klick_y];
   
                    txt[klick_x,klick_y]='empty';/*помечаем эту ячейку "пусто", но в нее пока что ничего положить нельзя будет.
                                        Если переменная txt[] будет равна 'empty', то предмет в этой ячейке рисоваться не будет,
                                        хотя фактически он будет там находиться.*/
                    }
                }
            }
        }
    }

craft_name[0] = 'Лечебное зелье'; //ингридиент 0
craft_name[1] = 'Зелье телепортации'; //ингридиент 1
craft_number[0]=3; //необходимое количество ингридиента 0
craft_number[1]=2; //необходимое количество ингридиента 1
craft[0]=false;//нашли ли мы нужное количество ингридиента 0
craft[1]=false;//нашли ли мы нужное количество ингридиента 1

    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//выбираем строку инвентаря для проверки
        {
        for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//проверяем все ячейки в этой строке, а потом опять выполнится сторка выше и мы перейдем к следующепй строке инвентаря
            {
            switch (txt[slot_x,slot_y])
                {
                case craft_name[0]: if (item[slot_x,slot_y]>=craft_number[0] and !craft[0])//если предметов достаточное количество и мы еще не находили этот предмет
                                {
                                craft[0]=true;
                                craft_x[0]= slot_x;
                                craft_y[0]= slot_y;
                                }
                            break;
                case craft_name[1]: if (item[slot_x,slot_y]>=craft_number[1] and !craft[1])//если предметов достаточное количество и мы еще не находили этот предмет
                                {
                                craft[1]=true;
                                craft_x[1]= slot_x;
                                craft_y[1]= slot_y;
                                }
                            break;
                }

            }
        }


//Теперь смотрим все ли ингридиенты для крафта у нас есть:
if (craft[0] and craft[1])
    {
    for(i = 0; i < 2; i += 1)
        {
        if (item[craft_x[i],craft_y[i]] > craft_number[i])//если в ячейке предметов больше, чем нужно для крафта
            {
            item[craft_x[i],craft_y[i]] -= craft_number[i];//удаляем нужное количество предметов из ячейки (просто уменьшаем количество)
            }
        else//если в ячейки предметов столько, сколсько нужно для крафта
            {//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
            txt[craft_x[i],craft_y[i]]='';
            item[craft_x[i],craft_y[i]]=0;
            max_number[craft_x[i],craft_y[i]]=0;
            }
        }
        //здесь код того что должно произойти (созлдание нового предмета)
        instance_create(obj_hero.x-16,obj_hero.y+16,obj_ring_green);
        //предмет создается ниже игрока. Можно создавать предмет сразу в координатах игрока, тогда он сразу будет попадать в инвентарь (если там есть место)
    }
    }

//Максимальное число ингредиентов для крафта в этом примере скрипта - 2.
//если нужно увеличить/уменьшить количество ингредиентов - добавьет/уберите пару аргументов (массивы craft_name[] и craft_number[])

//Если какой-то ингридиент не нужен - вместо аргументов 1 или 3 должена быть произвольная строка, не совпадающую ни с одним из названий предметов (не пустая строка и не пробел!)

//argument0 - то что должно получиться
craft_name[0] = argument1; //ингридиент 0
craft_number[0] = argument2; //необходимое количество ингридиента 0
craft_name[1] = argument3; //ингридиент 1
craft_number[1] = argument4; //необходимое количество ингридиента 1

craft[0]=false;//нашли ли мы нужное количество ингридиента 0
craft[1]=false;//нашли ли мы нужное количество ингридиента 1

n = 2; //максимельное количество ингредиентов

    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//выбираем строку инвентаря для проверки
        {
        for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//проверяем все ячейки в этой строке, а потом опять выполнится сторка выше и мы перейдем к следующепй строке инвентаря
            {
            for(i = 0; i < n; i += 1)//сравниваем предмет в этой ячейке со всеми ингридиентами
                {
                if (craft_name[i] = txt[slot_x,slot_y])
                    {
                    if (item[slot_x,slot_y]>=craft_number[i] and !craft[i])//если предметов достаточное количество и мы еще не находили этот предмет
                        {
                        craft[i]=true;
                        craft_x[i]= slot_x;
                        craft_y[i]= slot_y;
                        }
                    }
                }
            }
        }


//Теперь смотрим все ли ингридиенты для крафта у нас есть:
if (craft[0] and craft[1])
    {
    for(i = 0; i < n; i += 1)//здесь n - максимальное число ингредиентов для крафта
        {
        if (item[craft_x[i],craft_y[i]] > craft_number[i])//если в ячейке предметов больше, чем нужно для крафта
            {
            item[craft_x[i],craft_y[i]] -= craft_number[i];//удаляем нужное количество предметов из ячейки (просто уменьшаем количество)
            }
        else//если в ячейки предметов столько, сколсько нужно для крафта
            {//очищаем переменные для ячейки из которой перетаскивали (удаляем предмет из инвентаря)
            txt[craft_x[i],craft_y[i]]='';
            item[craft_x[i],craft_y[i]]=0;
            max_number[craft_x[i],craft_y[i]]=0;
            }
        }
    //здесь код того что должно произойти (созлдание нового предмета)
    instance_create(obj_hero.x-16,obj_hero.y+16,argument0);
    //предмет создается ниже игрока. Можно создавать предмет сразу в координатах игрока, тогда он сразу будет попадать в инвентарь (если там есть место)
    }

{with (obj_inv)
    {
    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)
        {
        for (slot_x=0; slot_x<inv_width_x; slot_x+=1)
            {
            if (txt[slot_x,slot_y]='Pistol')
                {with(h)
                if keyboard_check(ord('1'))
{sprite_index=spistol1}
exit;
}

}
else
{sprite_index=spistol0}
}}}

craft[0,0] = 0;//вот в эту ячейку я уже не помню что хотел записывать, но для чего-то хотел ее использовать. пусть пока что здесь будет 0
craft[1,0] = false;
craft[2,0] = false;
craft[3,0] = false;

craft[0,1] = 0;
craft[1,1] = 1;
craft[2,1] = 1;
craft[3,1] = 0;


craft[0,2] = 0;
craft[1,2] = 1;
craft[2,2] = 2;
craft[3,2] = 2;

//добавление предметов в сундук

item_name_create = obj_potion_health;//предмет который будем добавлять в сундук (имя объекта, который создается в комнате)
                    //Меняем только здесь, n_inv_max_number, количество создаваемых предметов и id сундука, остальное менять не нужно менять не нужно.

    n_inv_txt=item_name_create.name;//название объекта
    n_inv_spr=item_name_create.sprite_index;//Спрайт объекта
    n_inv_item=1;//количество добавлчемых предметов
    n_inv_name_obj=item_name_create;//объект (предмет в комнате)
    n_inv_max_number=3;//максимальное количествоа объектов в ячейке !!! Задается вручную для каждого предмета
    n_inv_act_on = item_name_create.act_on;;//записываем код, выполняемый при использовании
    n_inv_act_off = item_name_create.act_off;;//записываем параметры для надеваемых предметов
    n_inv_item_type = item_name_create.item_type;;//записываем тип предмета


    with (100080)//id сундука в котором создаем предмет
        {
        for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//выбираем строку инвентаря для проверки
            {
            for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//проверяем все ячейки в этой строке, а потом опять выполнится сторка выше и мы перейдем к следующепй строке инвентаря
                {
                if (txt[slot_x,slot_y]=other.n_inv_txt)//когда находим ячейку с таким же предметом
                    {
                    if (other.n_inv_max_number != 0)
                        {
                        if (item[slot_x,slot_y] < max_number[slot_x,slot_y])
                            {
                            item[slot_x,slot_y]+=other.n_inv_item;//увеличиваем кол-во предментов на 1
                            exit;
                            }
                        }
                    else
                        {
                        item[slot_x,slot_y]+=other.n_inv_item;//увеличиваем кол-во предментов на 1
                        exit;
                        }
                    }
                else//Если ячейки с таким предметом нет
                    {
                    if (txt[slot_x,slot_y]='')//когда находим свободную ячейку
                        {
                        txt[slot_x,slot_y]=other.n_inv_txt;//записываем в массив имя
                        spr[slot_x,slot_y]=other.n_inv_spr;//записываем в массив какой спрайт отображать в нивентаре
                        item[slot_x,slot_y]+=other.n_inv_item;//увеличиваем кол-во предментов на 1
                        name_obj[slot_x,slot_y]=other.n_inv_name_obj;//записываем имя объекта
                        max_number[slot_x,slot_y]=other.n_inv_max_number;//записываем максимальное количество предметов в слоте
                        act_on[slot_x,slot_y] = other.n_inv_act_on;//записываем код, выполняемый при использовании
                        act_off[slot_x,slot_y] = other.n_inv_act_off;//записываем параметры для надеваемых предметов
                        item_type[slot_x,slot_y] = other.n_inv_item_type;//записываем тип предмета

                        exit;
                        }
                    }
                }
            }
        }

//Создание нестандартных сундуков с содержимым. Это можно писать в событии создния контролера или при старте комнаты
with(instance_create(300,200,obj_box))
    {
    //Параметры инвентаря
    inv_height_y=2;//количество ячеек в высоту
    inv_width_x=2;//количество ячеек в ширину
   
    txt[0,0]='Зелье маны';//записываем в массив имя
    spr[0,0]=spr_potion_mana;//записываем в массив какой спрайт отображать в нивентаре
    item[0,0]=2;//увеличиваем кол-во предментов на 1
    name_obj[0,0]=obj_potion_mana;//записываем имя объекта
    max_number[0,0]=3;//записываем максимальное количество предметов в слоте
    act_on[0,0] = 'obj_hero.mana+=10; //увеличиваем у игрока ману на 10';//записываем код, выполняемый при использовании
    act_off[0,0] = '';//записываем параметры для надеваемых предметов
    item_type[0,0] = 0;//записываем тип предмета
    }

with(instance_create(300,200,obj_box))
{
//Параметры инвентаря
inv_height_y=5;//количество ячеек в высоту
inv_width_x=5;//количество ячеек в ширину

//ниже идет целая куча двойных циклов. На самаом деле проще все жто сделать в одном двойном цикле, сейчас нет времени и желания переделывать

//Параметры предметов (ячеек)
for (slot_x=0; slot_x<inv_width_x; slot_x+=1)//выбираем столбец инвентаря для проверки
    {
    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)//проверяем все ячейки в этом столбце, а потом опять выполнится сторка выше и мы перейдем к следующему столбцу инвентаря
        {
        txt[slot_x,slot_y]='';/*Сюда будем записывать названия предметов которые подбераем. Эти переменные также будут использоваться
                                для вывода названий предметов при наведении курсора*/
        item[slot_x,slot_y]=0;//Сюда будем записывать количество предметов в слоте
        max_number[slot_x,slot_y]=0;//Максимальное количество объектов в ячейке. По умолчанию 0 (0 - значит сколько угодно объектов)
        spr[slot_x,slot_y]=spr_inv;//Сначала устанавливаем для всех ячеек прозрачный спрайт, потом он будет заменен на спрайт взятого предмета
        name_obj[slot_x,slot_y]='';//Сюда будем записывать имена объектов. Использоваться этот массив будет для создания объектво в комнате при выбрасывании
        act_on[slot_x,slot_y]='';/*Сюда будем записывать кусок кода, который будет выполняться при клике по предмету в инвентаре. Сюда же будут записываться характеристики которые будут меняться если игрок наденет
                                предмет (для предметов которые игрок может надеть)*/
        act_off[slot_x,slot_y]='';//Сюда будем записывать характеристики, которые будут меняться если игрок снимет предмет (то же самое что в предыдущей переменной, только с противоположным знаком)
        item_type[slot_x,slot_y]='';//Сюда будем записывать тип редмета: 0 - обычный предмет, 1 - оружие, 2 - шлем, 3 - броня, 4 - обувь, 5 - перчатки, 6 - амулет, 7 - кольца (настраивается в событии нажатия ЛКМ)
        }
    }

    txt[0,0]='Зелье маны';//записываем в массив имя
    spr[0,0]=spr_potion_mana;//записываем в массив какой спрайт отображать в нивентаре
    item[0,0]=2;//увеличиваем кол-во предментов на 1
    name_obj[0,0]=obj_potion_mana;//записываем имя объекта
    max_number[0,0]=3;//записываем максимальное количество предметов в слоте
    act_on[0,0] = 'obj_hero.mana+=10; //увеличиваем у игрока ману на 10';//записываем код, выполняемый при использовании
    act_off[0,0] = '';//записываем параметры для надеваемых предметов
    item_type[0,0] = 0;//записываем тип предмета
}

visible=!visible
inv_height_y=4;
inv_width_x=7;
slot_height_y=sprite_height;
slot_width_x=sprite_width;

image_xscale=inv_width_x;
image_yscale=inv_height_y;

for (slot_x=0; slot_x<inv_width_x; slot_x+=1)
    {
    for (slot_y=0; slot_y<inv_height_y; slot_y+=1)
        {
        txt[slot_x,slot_y]='';
        item[slot_x,slot_y]=0;
        max_number[slot_x,slot_y]=0;
        spr[slot_x,slot_y]=spr_inv;
        name_obj[slot_x,slot_y]='';
        act_on[slot_x,slot_y]='';
        act_off[slot_x,slot_y]='';
        item_tyte[slot_x,slot_y]='';
        }
    }

inv_item_x=0;
inv_item_y=0;

inv_txt='';
inv_item=0;
inv_spr=spr_inv;
inv_name_obj=0;

for (slot_x=0; slot_x<obj_inv.inv_width_x; slot_x+=1)
    {
    for (slot_y=0; slot_y<obj_inv.inv_height_y; slot_y+=1)
        {
        file_text_write_string(file,obj_inv.txt[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_real(file,obj_inv.item[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_real(file,obj_inv.max_number[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,sprite_get_name(obj_inv.spr[slot_x,slot_y]));
        file_text_writeln(file);
        file_text_write_string(file,object_get_name(obj_inv.name_obj[slot_x,slot_y]));
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.act_on[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.act_off[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.item_tyte[slot_x,slot_y]);
        file_text_writeln(file);
        }
    }

for (slot_x=0; slot_x<obj_inv.inv_width_x; slot_x+=1)
    {
    for (slot_y=0; slot_y<obj_inv.inv_height_y; slot_y+=1)
        {
        obj_inv.txt[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.item[slot_x,slot_y]=file_text_read_real(file);
        file_text_readln(file);
        obj_inv.max_number[slot_x,slot_y]=file_text_read_real(file);
        file_text_readln(file);
        execute_string('obj_inv.spr[slot_x,slot_y]= ' + file_text_read_string(file));
        file_text_readln(file);
        execute_string('obj_inv.name_obj[slot_x,slot_y]= ' + file_text_read_string(file));
        file_text_readln(file);
        obj_inv.act_on[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.act_off[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.item_type[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        }
    }

for (slot_x=0; slot_x<obj_inv.inv_width_x; slot_x+=1)
    {
    for (slot_y=0; slot_y<obj_inv.inv_height_y; slot_y+=1)
        {
        file_text_write_string(file,obj_inv.txt[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_real(file,obj_inv.item[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_real(file,obj_inv.max_number[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,string(obj_inv.spr[slot_x,slot_y]));
        file_text_writeln(file);
        file_text_write_string(file,string(obj_inv.name_obj[slot_x,slot_y]));
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.act_on[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.act_off[slot_x,slot_y]);
        file_text_writeln(file);
        file_text_write_string(file,obj_inv.item_tyte[slot_x,slot_y]);
        file_text_writeln(file);
        }
    }

for (slot_x=0; slot_x<obj_inv.inv_width_x; slot_x+=1)
    {
    for (slot_y=0; slot_y<obj_inv.inv_height_y; slot_y+=1)
        {
        obj_inv.txt[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.item[slot_x,slot_y]=file_text_read_real(file);
        file_text_readln(file);
        obj_inv.max_number[slot_x,slot_y]=file_text_read_real(file);
        file_text_readln(file);
        obj_inv.spr[slot_x,slot_y]= real(file_text_read_string(file));
        file_text_readln(file);
        obj_inv.name_obj[slot_x,slot_y]=real(file_text_read_string(file));
        file_text_readln(file);
        obj_inv.act_on[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.act_off[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        obj_inv.item_type[slot_x,slot_y]=file_text_read_string(file);
        file_text_readln(file);
        }
    }

case 1: n_x_1 = 2;
                n_y_1 = 1;
                break;
        case 2: n_x_1 = 1;
                n_y_1 = 0;
                break;
        case 3: n_x_1 = 1;
                n_y_1 = 1;
                break;
        case 4: n_x_1 = 1;
                n_y_1 = 2;
                break;
        case 5: n_x_1 = 0;
                n_y_1 = 1;
                break;
        case 6: n_x_1 = 0;
                n_y_1 = 0;
                n_x_2 = 2;
                n_y_2 = 0;
                break;
        case 7: n_x_1 = 0;
                n_y_1 = 2;
                n_x_2 = 2;
                n_y_2 = 2;
                break;

x = view_xview + 1377;
y = view_yview + 32;

for(slot_x=0; slot_x<inv_width_x; slot_x++)
{
for(slot_y=0; slot_y<inv_height_y; slot_y++)
{
draw_sprite(sprite_index, image_index, x + slot_x * slot_width_x, y + slot_y * slot_height_y);
if (txt[slot_x,slot_y] != "" && txt[slot_x,slot_y] !="empty")
{
draw_sprite(spr[slot_x,slot_y], image_index, x + slot_x * slot_width_x, y + slot_y * slot_height_y);
if item[slot_x,slot_y] !=1
{ draw_text(x + 5 + slot_x * slot_width_x, y + slot_y * slot_height_y, item[slot_x,slot_y]); }
}
}
}

if position_meeting(mouse_x, mouse_y, self)
{
depth = -3;

klick_x = floor((mouse_x - x) / slot_width_x);  
klick_y = floor((mouse_y - y) / slot_height_y);

if (txt[klick_x,klick_y] != "" && txt[klick_x,klick_y] != "empty")
{ draw_text(x-237,y+290,txt[klick_x,klick_y]); }
}

if (inv_txt! = "")
{
depth = -4;
draw_sprite(inv_spr, image_index, mouse_x - 50,mouse_y - 45);
}