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

RASTAMAN
Великий Гуру

Хотелось бы выложить сис-му создания банкоматов.
Предупреждение! - В данной системе, для полной работоспособности банкомата, вам необходимо вставить код своихпеременных, тоесть заменить pInfo[playerid][pMoney] и pInfo[playerid][pBank], на те переменные, в которые вы выгружаете значения из таблиц/файлов.
 

Спойлер

#include <a_samp>
#include <streamer>

 

Спойлер

#define MAX_BANKOMATS           2 // максимальное кол-во банкоматов
#define BANKOMAT_CASH           15 // изымаемый процент от пользования банкоматом
#define d_bankomat              9 // свободный ID диалога

 

Спойлер

new
ATMZone[MAX_BANKOMATS],
cBankomats 
;

 

Спойлер

if(ATMZone[0] <= areaid <= ATMZone[cBankomats-1]) SetPVarInt(playerid,"PlayerUseBankomat",1); //Если игрок попал в зону банкомата
В public OnPlayerLeaveDynamicArea(playerid, areaid)
if(ATMZone[0] <= areaid <= ATMZone[cBankomats-1]) SetPVarInt(playerid,"PlayerUseBankomat",0); //Если игрок покинул зону банкомата
В public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
if(PRESSED(KEY_WALK)) { // Действия при нажатии левой клавиши 'Alt'
        if(GetPVarInt(playerid,"PlayerUseBankomat") != 0) { //Если игрок находится в зоне банкомата
                showPlayerDialog(playerid, d_bankomat, 2,"Банкомат","Проверить баланс\nСнять деньги со счета\nПоложить деньги на счет","Дальше","Закрыть"); //Вызываем диалог банкомата
        }
}

 

Спойлер

      if(dialogid == d_bankomat) {
                if(!response) return 1;
                switch(listitem) {
                        case 0: {
                                format(string,sizeof(string),"| Информация о балансе на счету:\n\nСостояние банковского счета - $%d",pInfo[playerid][pMoney]); // pInfo[playerid][pMoney] заменяете на кол-во денег игрока из своего мода
                                showPlayerDialog(playerid, 9999, 0, " ", string, "Закрыть", "");
                        }
                        case 1: showPlayerDialog(playerid, d_bankomat + 1, 1, "Снять деньги со счета","Укажите сумму которую хотите снять со счета:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть");
                        case 2: showPlayerDialog(playerid, d_bankomat + 2, 1, "Положить деньги на счет","Укажите сумму которую хотите положить на счет:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть");
                }
        }
        if(dialogid == d_bankomat + 1) {
                if(!response) return 1;
                if(!strlen(inputtext)) return  showPlayerDialog(playerid, d_bankomat + 1, 1, "Снять деньги со счета","Укажите сумму которую хотите снять со счета:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть");
                if(strval(inputtext) < 100 || strval(inputtext) > 100000) return  showPlayerDialog(playerid, d_bankomat + 1, 1, "Снять деньги со счета","Укажите сумму которую хотите снять со счета:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть");//Если игрок ввел сумму больше 100000 или менее 100.
                new BankCash = (strval(inputtext)*BANKOMAT_CASH)/100;
                pInfo[playerid][pBank] -= strval(inputtext)-BankCash;//Вычитаем процент и отнимаем деньги с банк.счета
                pInfo[playerid][pMoney] += strval(inputtext)-BankCash;//Вычитаем процент и получаем деньги на руки
                ApplyAnimation(playerid, "PED", "ATM",4.0, 0, 1, 1, 0, 0, 1);
        }
        if(dialogid == d_bankomat + 2) {
                if(!response) return 1;
                if(!strlen(inputtext)) return  showPlayerDialog(playerid, d_bankomat + 2, 1, "Положить деньги на счет","Укажите сумму которую хотите положить на счет:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть"); 
                if(strval(inputtext) < 100 || strval(inputtext) > 100000) return  showPlayerDialog(playerid, d_bankomat + 2, 1, "Положить деньги на счет","Укажите сумму которую хотите положить на счет:\n\n| Минимальная сумма $100, максимальная $100000\n| При использовании банкомата действует комиссия","Дальше","Закрыть"); //Если игрок ввел сумму больше 100000 или менее 100.
                new BankCash = (strval(inputtext)*BANKOMAT_CASH)/100; //Вычисляем % от пользования банкоматом
                pInfo[playerid][pBank] += strval(inputtext)-BankCash; //Вычитаем процент и получаем деньги в банк
                pInfo[playerid][pMoney] -= strval(inputtext)-BankCash; //Вычитаем процент и отнимаем деньги с рук
                ApplyAnimation(playerid, "PED", "ATM",4.0, 0, 1, 1, 0, 0, 1); //Приминяем анимацию пользования банкоматом
        }

 

Спойлер

        CreateBankomat(1740.29,-1771.58,13.37,0.00,0.00,0.00); //Создаем банкомат
        CreateBankomat(1740.29,-1773.58,13.37,0.00,0.00,0.00); //Аналогично

 

Спойлер

stock CreateBankomat(Float:x,Float:y,Float:z,Float:rx,Float:ry,Float:rz) {
        CreateDynamicObject(2754,x,y,z,rx,ry,rz); //Создаем сам банкомат
        CreateDynamic3DTextLabel("Банкомат\n\nALT",0xFFFFFFFF, x,y,z,3.0,INVALID_PLAYER_ID,INVALID_VEHICLE_ID,0); //Создаем 3д текст к банкомату
        ATMZone[cBankomats] = CreateDynamicSphere(x,y,z,2.0); //Создаем сферу действия банкомата
        cBankomats ++; //Прибавляем 1 созданный банкомат к общему кол-ву
        return 1;

 

 

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


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

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

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

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

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


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

Войти

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


Войти

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

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

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

    • Super_Gost'
      От Super_Gost'
      Приветствую. Для разработки собственного проекта требуется специалист, способный подготовить стабильную клиентскую базу на движке GTA San Andreas для работы с картой CRMP.

      Техническое задание:

      Задача: Интегрировать файлы карты CR в клиент так, чтобы обеспечить стабильную работу в SA-MP 0.3.7 / open.mp.

      Лимиты: Настроить Fastman92 Limit Adjuster. Необходимо грамотно расширить лимиты: IDE записей и так далее.

      Синхронизация с сервером: Подготовить список ID используемых объектов для корректного переноса в серверную часть на ядро Open MP.

      Требования к результату:

      Клиент должен запускаться без крашей и работать без прочих багов.

      На выходе нужно получить готовую сборку (архив), которая станет "фундаментом" для дальнейшей разработки мода и лаунчера.

      Бюджет обсуждаем. Ищу человека с опытом в CRMP-моддинге, который разбирается в этом. Сама работа является единоразовой/не на постоянной основе.

      Данные для связи: Tg: @Ichigo22149
    • Dkskssjksk
      От Dkskssjksk
      🎮 Aeron RP — твой новый мир приключений!
       
      Долгожданный релиз уже близко! Совсем скоро ты сможешь окунуться в атмосферу настоящей ролевой игры на проекте Aeron RP.
       
      📅 Даты выхода:
       
      ПК: 15 мая.
      Android: 17 июня.
      🔥 Что тебя ждёт?
       
      Уникальная атмосфера и интересные задания.
      Дружное сообщество и активная администрация.
      Множество возможностей для развития своего персонажа.
      Не упусти шанс стать частью чего-то большего! Присоединяйся к нам уже сейчас, чтобы быть в курсе всех новостей и первыми узнать о старте.
       
      📢 Жми на ссылку и вступай в нашу группу:https://vk.me/join/TbRXlGjoMv4ymO3jogFudJOTVKZbmFfNYLc=
       
      Aeron RP — твоя история начинается здесь!
    • sinvays
      От sinvays
      PayDay RolePlay (Бонусный мод)
      Скачать файл Версия MySQL: R39-6
      Командный процессор: Pawn.CMD
      Объём основного файла: ~36к строк
      Античит: Nex-AC

      Подключение к базе данных:
      • Файл: new.pwn

      Описание:
      Работал когда-то с Ильёй Демидовым. Опыт был негативный, дальше сотрудничество смысла не имело. Позже к проекту подключился Костя Царик, и ситуация только ухудшилась. Сам мод изначально разрабатывался другим разработчиком, Сергей Щеблыкин, после него подключился я. В какой-то момент возникли проблемы по части оплаты которую обязан был выплатить Илья Демидов, после этого я забрал мод и прекратил работу. Недавно также была заблокирована группа PayDay из-за конфликтной ситуации с покупкой игрового проекта. Сам мод на текущий момент не представляет особой ценности как готовый продукт, по крайней мере для меня. Внутри много старых решений и костылей, доставшихся ещё с ранних версий PayDay старым разработчиком. С моей стороны были сделаны базовые вещи - система выдачи команд, префиксы, а также исправлены критические баги, из-за которых мод падал. По нагрузке может держать около 200 игроков, но точных гарантий нет, там было накручено не больше 200+ ботов. На этом от моего имени PayDay закрыт.
      Добавил sinvays Добавлено 19.04.2026 Категория Моды Автор sinvays  
    • sinvays
      От sinvays
      Версия MySQL: R39-6
      Командный процессор: Pawn.CMD
      Объём основного файла: ~36к строк
      Античит: Nex-AC

      Подключение к базе данных:
      • Файл: new.pwn

      Описание:
      Работал когда-то с Ильёй Демидовым. Опыт был негативный, дальше сотрудничество смысла не имело. Позже к проекту подключился Костя Царик, и ситуация только ухудшилась. Сам мод изначально разрабатывался другим разработчиком, Сергей Щеблыкин, после него подключился я. В какой-то момент возникли проблемы по части оплаты которую обязан был выплатить Илья Демидов, после этого я забрал мод и прекратил работу. Недавно также была заблокирована группа PayDay из-за конфликтной ситуации с покупкой игрового проекта. Сам мод на текущий момент не представляет особой ценности как готовый продукт, по крайней мере для меня. Внутри много старых решений и костылей, доставшихся ещё с ранних версий PayDay старым разработчиком. С моей стороны были сделаны базовые вещи - система выдачи команд, префиксы, а также исправлены критические баги, из-за которых мод падал. По нагрузке может держать около 200 игроков, но точных гарантий нет, там было накручено не больше 200+ ботов. На этом от моего имени PayDay закрыт.