Система Проститутки Самп

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

MartinJoys
Новичок

Всем привет! Вот вам система проститутки, тупо конечно но может кому то пригодится.

Шаг первый: начало мода добавим вот это:
 

new actor_prost;
forward prost(playerid);

Потом в OnGameModeInit добавим это:
 

    actor_prost = CreateActor(632028.4668,1348.6459,10.8203,125.0312);//тут ваши координаты
    Create3DTextLabel(!"Нажми L.Alt",0xF5DEB3FF,2028.4668,1348.6459,10.8203,10.0,0,1);//тут ваши координаты

В OnPlayerKeyStateChange добавим это:
 

               if(newkeys == KEY_WALK)
                {
                    if(GetPVarInt(playerid,"prost") == 1return SendClientMessage(playerid, -1"Сейчас вы не можете воспользоватся услугами проститутки!");
                    if(IsPlayerInRangeOfPoint(playerid, 1.02028.4668,1348.6459,10.8203))
                    {
                       ShowPlayerDialog(playerid,1,DIALOG_STYLE_MSGBOX,"Проститутка","Вы хотите начать процесс?","Да","Нет");
                    }
                }

Потом в OnDialogResponse это:

    if(dialogid == 1)
    {
        if(response)
        {
            //можете снять деньги
                ApplyActorAnimation(actor_prost, "BLOWJOBZ""BJ_STAND_END_W"4.011110);
                SetTimer("prost",1000*10,0);
                SetPlayerPos(playerid,2027.9125,1348.2180,10.8203);
                TogglePlayerControllable(playerid, 0);
                SetPVarInt(playerid,"prost",1);
                return 1;
        }
        else
        {
            SendClientMessage(playerid,-1,"Вы отказались.");
            return 1;
        }
    }

И добавим паблик:

public prost(playerid)
{
     SendClientMessage(playerid,-1,"Проститутка закончила.");
     ClearActorAnimations(actor_prost);
     TogglePlayerControllable(playerid, 1);
     SetPVarInt(playerid,"prost",0);
     return 1;
}

Спасибо за внимание)

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


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

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

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

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

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


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

Войти

Уже есть аккаунт? Войти в систему.


Войти

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

    Ни одного зарегистрированного пользователя не просматривает данную страницу

  • Похожий контент

    • Доналдо Фарекелка
      От Доналдо Фарекелка


      Скачать файл Arizona RolePlay || Ser
      Приветствую, этот мод я нашёл на просторах интернета. 
      Скачал мод у автора:  Developer Stravinskiy
      Доработал мод: Donaldo_Farekelka
       
      Предупреждаю! Мод сырой, багов стало меньше, но они есть.
      Мод: Баня, Подвал, В некоторых местах маппинг, система коронавируса, 8 лвл админок.
       
      [01.11.2025] ВНИМАНИЕ! Не используйте бесплатные хостинги, если Вы не уверены в их работоспособности. Если запустили мод на бесплатном хостинге и он не работает, то просьба мне не писать! (Вина скорее всего, лежит на хостинге!).

      [29.11.2025] Спасибо! За 1000+ скачиваний. 
       
      Информация:
      1) Dc_Cmd
      2) Mysql, mode, language - Всё настраивается теперь в pawno ( UPDATE: 1.1.0 )
      3) Административные права в данный момент можно выдать через /amakeadmin(Смотреть уроки) или БД ( UPDATE: 1.2.2 ).
       
      То что я сделал ( Всё что я делаю сейчас, смотрите в изменениях ):

      Как установить мод на хостинг(Чтобы больше не было вопросов в ЛС):
      RUTUBE: https://rutube.ru/video/private/f74276be05e090652ee46bcbe2b4e27d/?p=6tWFvG_lTFk4sHVaCjheZQ
      YOUTUBE: https://youtu.be/z07sJUAVQpI
      Добавил Доналдо Фарекелка Добавлено 13.04.2023 Категория Моды Автор shenol (vk.com/donaldo_farekelka)  
    • Доналдо Фарекелка
      От Доналдо Фарекелка
      Приветствую, этот мод я нашёл на просторах интернета. 
      Скачал мод у автора:  Developer Stravinskiy
      Доработал мод: Donaldo_Farekelka
       
      Предупреждаю! Мод сырой, багов стало меньше, но они есть.
      Мод: Баня, Подвал, В некоторых местах маппинг, система коронавируса, 8 лвл админок.
       
      [01.11.2025] ВНИМАНИЕ! Не используйте бесплатные хостинги, если Вы не уверены в их работоспособности. Если запустили мод на бесплатном хостинге и он не работает, то просьба мне не писать! (Вина скорее всего, лежит на хостинге!).

      [29.11.2025] Спасибо! За 1000+ скачиваний. 
       
      Информация:
      1) Dc_Cmd
      2) Mysql, mode, language - Всё настраивается теперь в pawno ( UPDATE: 1.1.0 )
      3) Административные права в данный момент можно выдать через /amakeadmin(Смотреть уроки) или БД ( UPDATE: 1.2.2 ).
       
      То что я сделал ( Всё что я делаю сейчас, смотрите в изменениях ):

      Как установить мод на хостинг(Чтобы больше не было вопросов в ЛС):
      RUTUBE: https://rutube.ru/video/private/f74276be05e090652ee46bcbe2b4e27d/?p=6tWFvG_lTFk4sHVaCjheZQ
      YOUTUBE: https://youtu.be/z07sJUAVQpI
    • zonex254
      От zonex254
      C:\Users\lenovo\Desktop\Test-RolePlay-master (1)\Osnova-RolePlay-master\pawno\include\a_mysql.inc(39) : warning 203: symbol is never used: "ALL"
      C:\Users\lenovo\Desktop\Test-RolePlay-master (1)\Osnova-RolePlay-master\pawno\include\a_mysql.inc(32) : warning 203: symbol is never used: "NONE"
      C:\Users\lenovo\Desktop\Test-RolePlay-master (1)\Osnova-RolePlay-master\pawno\include\a_mysql.inc(31) : warning 203: symbol is never used: "E_LOGLEVEL"
      Pawn compiler 3.10.6              Copyright (c) 1997-2006, ITB CompuPhase