Продажа новогодних шапок

Опубликовал Maksimovka , 27 июня, 2023

В теме 1 сообщение

Опубликовано 27 июня, 2023 (изменено) · Жалоба

Здраствуйте, решил написать лёгкий скрипт на продажу новогодних шапок.

Стоит бот на пляже Санта-Мария торгующий ими.

Скриншоты:https://imgur.com/a/MMJnp23

Вот сам код:

Ко всем new:

new cap_sale;

В public OnGameModeInit()

CreateDynamicActor(115, 1022.4277, -1932.0259, 12.6922, 60.0);
cap_sale = CreatePickup(19057, 23, 1021.0907, -1931.1934, 12.6433);

В public OnPlayerPickUpPickup(playerid, pickupid)

if(pickupid == cap_sale)
{
    ShowPlayerDialog(playerid,10,DIALOG_STYLE_MSGBOX,"{ffffff}Продажа новогодний шапок","Привет хочешь купить себе новогодную шапку?\nИх у меня много осталось с прошлого года\nОтдам тебе всё во-лижь за 100$. По рукам?","Да","Нет");
}

В public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])

if(dialogid == 10)
{
    if(response)
    {
        SendClientMessage(playerid,0xfffce0AA, "Вы купили новогодную шапку.");
        GivePlayerMoney(playerid, -100);
        GameTextForPlayer(playerid,"~r~-100$",5000,1);
        SetPlayerAttachedObject(playerid,2, 19066, 2, 0.13, 0.0, 0.0, 0.0, 80.0, 80.0);
        PlayerPlaySound(playerid,1137,0.0,0.0,0.0);
    }
    else
    {
        SendClientMessage(playerid,0xfffce0AA, "Человек торгующий шапками: Ну не хочешь как хочешь.");
    }
}

Вот и всё!

Автор:Максим(Я)

Отредактировано 27 июня, 2023 пользователем Cawfee

Поделиться сообщением

Ссылка на сообщение

Поделиться на другие сайты

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!

Регистрация нового пользователя

Последние посетители 0 пользователей онлайн

Ни одного зарегистрированного пользователя не просматривает данную страницу
Похожий контент
- PAR RP | Доработанный мод Cruela RP | Без багов
  От gooding
  
  Скачать файл PAR RP | Доработанный мод Cruela RP | Без багов
  Всем здравствуйте, уважаемые читатели. Я много времени потратил на доработку данного игрового мода, чтобы его выставить на форум.
  Лог доработок можно посмотреть внизу, а скриншоты игрового мода внизу и верху.
  Основа данного мода: Cruela RP
  
  Добавил gooding Добавлено 20.11.2024 Категория Моды Автор GOODING (Я)
- PAR RP | Доработанный мод Cruela RP | Без багов
  От gooding
  
  Всем здравствуйте, уважаемые читатели. Я много времени потратил на доработку данного игрового мода, чтобы его выставить на форум.
  Лог доработок можно посмотреть внизу, а скриншоты игрового мода внизу и верху.
  Основа данного мода: Cruela RP
- Не работает команда /giverank
  От Yashich
  
  Возникла проблема, не работает команда /giverank Что здесь может работать не так? Заранее спасибо за ответ)
  Вот строки кода связанные с этой командой (мод Аризона)
  
  CMD:giverank(playerid, params[]) { if(PI[playerid][pMember]<=0)return 0; if(PI[playerid][pRank] < 9 && PI[playerid][pLeader] == 0) return SCM(playerid, COLOR_RED, !"Отказано в доступе!"); if(sscanf(params,"ud",params[0],params[1])) return SCM(playerid, COLOR_RED, !"Используйте: /giverank [id] [rank]"); if(!ProxDetectorS(8.0, playerid, params[0])) return SCM(playerid, COLOR_GREY, !"Вы должны находиться рядом с игроком!"); if(PI[params[0]][pLeader] > 0 ) return SCM(playerid, COLOR_RED, !"Вы не можете изменять ранг лидеру"); if(params[1] < 1) return SCM(playerid, COLOR_GREY, !"Нельзя повысить до этого ранга"); if(Clother[params[0]]!=-1)return 0; if(GetPlayerVirtualWorld(playerid)!=GetPlayerVirtualWorld(params[0]))return 0; if(!IsPlayerConnected(params[0])) return SCM(playerid, COLOR_GREY, !"Игрок не найден"); if(PI[playerid][pRank] <= PI[params[0]][pRank]) return SCM(playerid, COLOR_GREY, !"Вы не можете повысить/понизить этого игрока"); if(PI[playerid][pRank] == 9 && params[1] > 8) return SCM(playerid, COLOR_RED, !"Нельзя выдать ранг больше 8"); if(params[1] > 9) return SCM(playerid, COLOR_GREY, !"Нельзя повысить до этого ранга"); if(PI[params[0]][pMember] != PI[playerid][pMember]) return SCM(playerid, COLOR_GREY, !"Игрок находиться в другой организации!"); str_1[0] = EOS; f(str_1,100,"Лидер %s %s до %i ранга",PN(playerid),PI[params[0]][pRank] > params[1] ? ("понизил"):("повысил"),params[1]); SCM(params[0],COLOR_LIGHTBLUE,str_1); f(str_1,100,"Вы %sи игрока %s до %i ранга",PI[params[0]][pRank] > params[1] ? ("понизил"):("повысил"),PN(params[0]),params[1]); SCM(playerid,COLOR_LIGHTBLUE,str_1); PI[params[0]][pRank] = params[1]; UpdatePlayerDataInt(params[0], "Rank", params[1]); if(PI[params[0]][pSex] == 2) if(TeamDuty{params[0]}) SetPlayerSkinEx(params[0],GOrgSkins[GetTeamID(params[0])][params[1]]), TogglePlayerControllable(params[0],true); else if(TeamDuty{params[0]}) SetPlayerSkinEx(params[0],MOrgSkins[GetTeamID(params[0])][params[1]]), TogglePlayerControllable(params[0],true); return 1; }
- Помогите пж база данных не подкючается
  От SupremeRP
  
  Вот ошибка

Войти