• Страница 1 из 1
  • 1
Модератор форума: [east_side]_trane, drifter-dron, valych, admin  
Форум » Pawno » Уроки » Донат система RP (Подойдет у кого основа мода Samp-RP)
Донат система RP
danixДата: Воскресенье, 20.07.2014, 11:57:19 | Сообщение # 1

Группа: Пользователи
Сообщений: 5
1) Вам нужно заменить команду "/donate" на мою,для этого стераете радную и вставляете мою.

Код
if(strcmp(cmd, "/donate", true) == 0)//команда на вызов меню доната
{
new listitems[] = " [{FFFF33}1{FFFFFF}] Снятие варнов 300 вирт\n [{FFFF33}2{FFFFFF}] Скиллы 300 вирт\n [{FFFF33}3{FFFFFF}] Водительские права 100 вирт\n [{FFFF33}4{FFFFFF}] Лицензия на оружие 100 вирт\n [{FFFF33}5{FFFFFF}] Полный пакет лизензий 1000 вирт";
ShowPlayerDialog(playerid, 1993, DIALOG_STYLE_LIST, "Донат", listitems, "Выбрать", "Отмена");
}


2) Теперь работа с самим дмалогом  вам нужно заменить  ид диалога  Samp-RP  :  case 1993 вы его ищите и вставляете место него мой.

Код
case 1993:
{
if(response)
{
switch(listitem)
{
case 0:
{
if(PlayerInfo [playerid][pWarns]== 0) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем аккаунте нету варнов");
if(PlayerInfo [playerid][pDonateMoney]<= 300) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 300 Donat ВИРТ");
PlayerInfo [playerid][pWarns]= 0;
PlayerInfo [playerid][pDonateMoney]-= 300;
SendClientMessage(playerid,COLOR_GREY,"{80FF00}• {FFA500}Все предуприждения были успешно сняты с вашего аккаунта!");
}
case 1:
{
if(PlayerInfo [playerid][pDonateMoney]<= 300) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 300 Donat ВИРТ");
if(PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}Íà âàøåì àêêàóíòå ïðîêà÷åíû âñå Skill's!");
PlayerInfo [playerid][pDonateMoney]-= 300;
PlayerInfo[playerid][pGunSkill][0] = 100;
PlayerInfo[playerid][pGunSkill][1] = 100;
PlayerInfo[playerid][pGunSkill][2] = 100;
PlayerInfo[playerid][pGunSkill][3] = 100;
PlayerInfo[playerid][pGunSkill][4] = 100;
PlayerInfo[playerid][pGunSkill][5] = 100;
SendClientMessage(playerid,COLOR_GREY,"{80FF00}• {FFA500}Skill's Оружия были прокачаны до 100% просмотреть скиллы (( /myskill ))");
}
case 2:
{
if(PlayerInfo [playerid][pDonateMoney]< 100) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 100 Donat ВИРТ");
PlayerInfo [playerid][pCarLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 100;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}Вы приобрели права на вождение машиной");
}
case 3:
{
if(PlayerInfo [playerid][pDonateMoney]< 100) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 100 Donat ВИРТ");
PlayerInfo [playerid][pGunLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 100;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}ВЫ приобрели лицензию на оружие!");
}
case 4:
{
if(PlayerInfo [playerid][pDonateMoney]< 1000) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 1000 Donat ВИРТ");
PlayerInfo [playerid][pCarLic]= 1;
PlayerInfo [playerid][pFishLic]= 1;
PlayerInfo [playerid][pBoatLic]= 1;
PlayerInfo [playerid][pFlyLic]= 1;
PlayerInfo [playerid][pGunLic]= 1;
PlayerInfo [playerid][pBisLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 1000;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}Вы успешно приобрели все лицензии");
}
}
}
}

Данная система далеко не совершена вы можете добавлять свои функции покупки: Снятие бан чата,еще лицензии и т.д.
Если ваш мод основа не Samp rp то тогда просто поменяйте на свои значения PlayerInfo[playerid][p*****],которые прописаны у вас в моде.Лесенкой я думаю вы выстроите сами если нет то просто добавть после всех define строчку #pragma tabsize 0
Автор я danix если кому то надо в чем то помочь обращайтесь


Сообщение отредактировал danix - Воскресенье, 20.07.2014, 12:01:01
 
Сообщение1) Вам нужно заменить команду "/donate" на мою,для этого стераете радную и вставляете мою.

Код
if(strcmp(cmd, "/donate", true) == 0)//команда на вызов меню доната
{
new listitems[] = " [{FFFF33}1{FFFFFF}] Снятие варнов 300 вирт\n [{FFFF33}2{FFFFFF}] Скиллы 300 вирт\n [{FFFF33}3{FFFFFF}] Водительские права 100 вирт\n [{FFFF33}4{FFFFFF}] Лицензия на оружие 100 вирт\n [{FFFF33}5{FFFFFF}] Полный пакет лизензий 1000 вирт";
ShowPlayerDialog(playerid, 1993, DIALOG_STYLE_LIST, "Донат", listitems, "Выбрать", "Отмена");
}


2) Теперь работа с самим дмалогом  вам нужно заменить  ид диалога  Samp-RP  :  case 1993 вы его ищите и вставляете место него мой.

Код
case 1993:
{
if(response)
{
switch(listitem)
{
case 0:
{
if(PlayerInfo [playerid][pWarns]== 0) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем аккаунте нету варнов");
if(PlayerInfo [playerid][pDonateMoney]<= 300) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 300 Donat ВИРТ");
PlayerInfo [playerid][pWarns]= 0;
PlayerInfo [playerid][pDonateMoney]-= 300;
SendClientMessage(playerid,COLOR_GREY,"{80FF00}• {FFA500}Все предуприждения были успешно сняты с вашего аккаунта!");
}
case 1:
{
if(PlayerInfo [playerid][pDonateMoney]<= 300) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 300 Donat ВИРТ");
if(PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100 || PlayerInfo [playerid][pGunSkill]== 100) return SendClientMessage(playerid,COLOR_GREY,"{FF0000} [x]{B4B5B7}Íà âàøåì àêêàóíòå ïðîêà÷åíû âñå Skill's!");
PlayerInfo [playerid][pDonateMoney]-= 300;
PlayerInfo[playerid][pGunSkill][0] = 100;
PlayerInfo[playerid][pGunSkill][1] = 100;
PlayerInfo[playerid][pGunSkill][2] = 100;
PlayerInfo[playerid][pGunSkill][3] = 100;
PlayerInfo[playerid][pGunSkill][4] = 100;
PlayerInfo[playerid][pGunSkill][5] = 100;
SendClientMessage(playerid,COLOR_GREY,"{80FF00}• {FFA500}Skill's Оружия были прокачаны до 100% просмотреть скиллы (( /myskill ))");
}
case 2:
{
if(PlayerInfo [playerid][pDonateMoney]< 100) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 100 Donat ВИРТ");
PlayerInfo [playerid][pCarLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 100;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}Вы приобрели права на вождение машиной");
}
case 3:
{
if(PlayerInfo [playerid][pDonateMoney]< 100) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 100 Donat ВИРТ");
PlayerInfo [playerid][pGunLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 100;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}ВЫ приобрели лицензию на оружие!");
}
case 4:
{
if(PlayerInfo [playerid][pDonateMoney]< 1000) return SendClientMessage(playerid,COLOR_RED,"{FF0000} [x]{B4B5B7}На вашем лицевом счету нет 1000 Donat ВИРТ");
PlayerInfo [playerid][pCarLic]= 1;
PlayerInfo [playerid][pFishLic]= 1;
PlayerInfo [playerid][pBoatLic]= 1;
PlayerInfo [playerid][pFlyLic]= 1;
PlayerInfo [playerid][pGunLic]= 1;
PlayerInfo [playerid][pBisLic]= 1;
PlayerInfo [playerid][pDonateMoney]-= 1000;
SendClientMessage(playerid,COLOR_YELLOW,"{80FF00}• {FFA500}Вы успешно приобрели все лицензии");
}
}
}
}

Данная система далеко не совершена вы можете добавлять свои функции покупки: Снятие бан чата,еще лицензии и т.д.
Если ваш мод основа не Samp rp то тогда просто поменяйте на свои значения PlayerInfo[playerid][p*****],которые прописаны у вас в моде.Лесенкой я думаю вы выстроите сами если нет то просто добавть после всех define строчку #pragma tabsize 0
Автор я danix если кому то надо в чем то помочь обращайтесь

Автор - danix
Дата добавления - 20.07.2014 в 11:57:19
Мечта_идеалаДата: Пятница, 25.07.2014, 12:47:42 | Сообщение # 2

Группа: Пользователи
Сообщений: 5
как изменять донат?)))))):D или это и есть)
ава

ва
ва
в
а
ва
ва
 
Сообщениекак изменять донат?)))))):D или это и есть)
ава

ва
ва
в
а
ва
ва

Автор - Мечта_идеала
Дата добавления - 25.07.2014 в 12:47:42
RiplouffeДата: Пятница, 14.08.2015, 12:36:45 | Сообщение # 3

Группа: Пользователи
Сообщений: 1
Я хотел вообще чтобы на сайте системку запилить. Например:
Заходим на сервер Кладем сумму и нам на счет аккаунта поступают денюжки и все ,a команда у меня сделана.
 
СообщениеЯ хотел вообще чтобы на сайте системку запилить. Например:
Заходим на сервер Кладем сумму и нам на счет аккаунта поступают денюжки и все ,a команда у меня сделана.

Автор - Riplouffe
Дата добавления - 14.08.2015 в 12:36:45
BumerДата: Вторник, 06.12.2016, 01:30:06 | Сообщение # 4

Группа: Пользователи
Сообщений: 11
Хорошая работа,не плохо. :)
 
СообщениеХорошая работа,не плохо. :)

Автор - Bumer
Дата добавления - 06.12.2016 в 01:30:06
Форум » Pawno » Уроки » Донат система RP (Подойдет у кого основа мода Samp-RP)
  • Страница 1 из 1
  • 1
Поиск:
Загрузка страницы, займет меньше минуты...
Загрузка...

Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
Система телефонов поломалась
Не в себе
фильм скалайн
Трансформеры 3
форсаж 6
Ищу [FS]Для админок на сервер
нужны координаты карты для отметки зон...
Помогите найти мод
pawno урок автоматические ворота
обращение к скриптерам.
Вопросы по скриптингу
Ваши ошибки при компиляции GM/FS

Вопросы по скриптингу

(1081)

Считаем до 1000

(274)

Ваши ошибки при компиляция gm

(260)

Набор в команду

(80)

Ваши ошибки при компиляции GM/FS

(71)

вопроосы по скриптингу от 22.04.2013

(64)

Баннеробмен

(64)

несколько команд на samp 0.3 c

(64)

Оценки сайта samp-pawno.ru

(55)

Заказ хостинга

(51)

Набор в команду(форум)

(45)

Урок №61 по созданию системы авто для GodFather

(45)

admin

(3869)

[east_side]_trane

(443)

TWiX

(316)

valych

(501)

drifter-dron

(477)

danik_rok

(317)

Dimka_71rus

(360)

Drifter96

(300)

MaNb9K

(220)

[MTA]MaPeR5518

(181)

Dima_Tkach

(107)

Nik_Ull

(184)

system32xzxz

(Четверг 09:25:24)

torbin169

(Суббота 23:09:29)

kuchuk_00

(Суббота 17:10:14)

artem_boyko_3

(Суббота 15:57:37)

greggelbak

(Среда 18:29:37)

vladisvlavs

(Среда 13:51:57)

add02102002

(Понедельник 22:37:15)

Диман221

(Понедельник 18:12:45)

almas051004

(Воскресенье 11:05:32)

megasuccessms

(Суббота 14:15:36)

nawe

(Пятница 22:25:23)

swoysb

(Пятница 14:55:29)

Вверх
15:13:31
ОбновитьСмайлыУправление мини-чатом
ЧАТ-PAWNO
2010-2024

vkontakte :samp-pawno.ru: