Загрузка страницы...
Мультипортал > Форум
  Главная Баннеробмен Гостевая Polaris Forum
 
Реклама
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: ROCKetMAN, xSLIMx 
Форум » Компьютеры и информационные технологии » Pwn - скриптинг » Выдача Лицензий (...)
Выдача Лицензий
xSLIMxДата: Воскресенье, 20.12.2009, 10:34 | Сообщение # 1
Директор ФБР
Группа: Game Managers
Сообщений: 250
Награды: 1
Репутация: 21
Статус: Offline
Сегодня мы создадим "Автовыдачу Лицензий"

Let's Go.

1)Создадим Пикап.

В начало мода:

new licpick;

В public OnGameModeInit в конец:

licpick = CreatePickup(1239, 2, -2033.2550,-117.3561,1035.1719, -1);

В public OnPlayerPickUpPickup

if (pickupid == licpick)
{
if(PlayerToPoint(3.0,playerid,-2033.2550,-117.3561,1035.1719))// неюбольшой багофикс
{
ShowPlayerDialog(playerid,1,DIALOG_STYLE_LIST,"Выберите Лицензию:","Летная [500.000$]\nОружейная [250.000$]\nРыболовная [150.000$]\nВодная [100.000$]\nАвто [10.000$]\n","Выбор","Отмена");
}
}

И создадим действия. В конец мода добавим:

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 0)
{
if(response)
{
}
}
if(dialogid == 1)
{
if(response)
{
if(listitem == 0)
{
if(GetPlayerMoney(playerid) < 500000) return SendClientMessage(playerid, 0x00FF7FAA," У вас не хвататет денег для Этого");
GivePlayerMoney(playerid, -500000);
PlayerInfo[playerid][pFlyLic] = 1;
SendClientMessage(playerid, 0xFFFFFFAA, " Вы Приобрели летную лицензию за 500.000$!");
}
if(listitem == 1)
{
if(GetPlayerMoney(playerid) < 250000) return SendClientMessage(playerid, 0x00FF7FAA," У вас не хвататет денег для Этого");
GivePlayerMoney(playerid, -250000);
PlayerInfo[playerid][pGunLic] = 1;
SendClientMessage(playerid, 0xFFFFFFAA, " Вы Приобрели оружейную лицензию за 250.000$!");
}
if(listitem == 2)
{
if(GetPlayerMoney(playerid) < 150000) return SendClientMessage(playerid, 0x00FF7FAA," У вас не хвататет денег для Этого");
GivePlayerMoney(playerid, -150000);
PlayerInfo[playerid][pFishLic] = 1;
SendClientMessage(playerid, 0xFFFFFFAA, " Вы Приобрели Рыболовную лицензию за 150.000$!");
}
if(listitem == 3)
{
if(GetPlayerMoney(playerid) < 100000) return SendClientMessage(playerid, 0x00FF7FAA," У вас не хвататет денег для Этого");
GivePlayerMoney(playerid, -100000);
PlayerInfo[playerid][pBoatLic] = 1;
SendClientMessage(playerid, 0xFFFFFFAA, " Вы Приобрели Водную лицензию за 100.000$!");
}
if(listitem == 4)
{
if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0x00FF7FAA," У вас не хвататет денег для Этого");
GivePlayerMoney(playerid, -10000);
PlayerInfo[playerid][pCarLic] = 1;
SendClientMessage(playerid, 0xFFFFFFAA, " Вы Приобрели летную лицензию за 10.000$!");
SendClientMessage(playerid, 0xFFFFFFAA, " Прочтите Правила ПДД!");
ShowPlayerDialog(playerid,0,0, "ПДД Сервера"," 1.Запрещено ездить по встречной Полосе.\n 2.Запрещено использовать дравбай.\n 3.Давить Игроков.\n 4.Врезаться в машины игроков.\n 5.Мешать проезду Полицейской/Медецинской Техник с маячками.\n6.Создавать Аврийну Ситуацию на дорогах."," Ок"," Отмена");
}
}
}
return 1;
}


[GM]True Rp (© 2009 SliM) more than 40000 lines, more than 2 cups of coffee were drunk
Моя коллекция модов (РП и РПГ) Для сампа

Пару переделок ЛА-РП

Пару Модификаций ГФ

Пару ранних модов с состоявщихся серверов


Сообщение отредактировал xSLIMx - Воскресенье, 20.12.2009, 10:35
 
лордДата: Воскресенье, 20.12.2009, 12:51 | Сообщение # 2
Местный
Группа: Провереные
Сообщений: 280
Награды: 7
Репутация: 7
Статус: Offline
Автовыдача лицы как о не то! Не подходит к реальной жизни! Поскай бы было обычный урок сс лицером и сё!

 
xSLIMxДата: Воскресенье, 20.12.2009, 13:04 | Сообщение # 3
Директор ФБР
Группа: Game Managers
Сообщений: 250
Награды: 1
Репутация: 21
Статус: Offline
Quote (лорд)
Автовыдача лицы как о не то! Не подходит к реальной жизни! Поскай бы было обычный урок сс лицером и сё!

Преположим у тебя на серве (как и сейчас на РП серве) играют новички. Лицензиров нету. Чтобы админам не париться, ставиш это, и хай покупают лицы.


[GM]True Rp (© 2009 SliM) more than 40000 lines, more than 2 cups of coffee were drunk
Моя коллекция модов (РП и РПГ) Для сампа

Пару переделок ЛА-РП

Пару Модификаций ГФ

Пару ранних модов с состоявщихся серверов

 
Форум » Компьютеры и информационные технологии » Pwn - скриптинг » Выдача Лицензий (...)
Страница 1 из 11
Поиск: