Мини Донат Система - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: [CM]OlegEhtler, Getbackthere, Phoenixxx_Czar  
Форум » Pawno программирование SAMP » Скрипты | FilterScripts » Мини Донат Система
Мини Донат Система
GeNa_GeNa2 Дата: Четверг, 21.03.2013, 17:41 | Сообщение # 1
Любитель
Сообщений: 33
Статус: Offline
Система доната, администратор выдаёт донат командой /gdonate [id] [Money]
Игрок тратит с помощью /donate

Мини-система написана для мода RLS но перевести на свой мод не трудно!

v1.0
В public OnPlayerCommandText

Код
else if(strcmp(cmd, "/gdonate", true) == 0)
{
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) return    SendClientMessage(playerid, COLOR_WHITE, "Введите: /gdonate [ид] [сумма]");
new playa;
new money;
playa = ReturnUser(tmp);
tmp = strtok(cmdtext, idx);
money = strval(tmp);
if (PlayerInfo[playerid][pAdmin] >= 7)
{
if(IsPlayerConnected(playa))
{
if(playa != INVALID_PLAYER_ID)
{
GetPlayerName(playa, sendername, sizeof(sendername));
format(string, sizeof(string), " %d доната игроку %s", money,sendername);
SendClientMessage(playerid, COLOR_BLUE, string);
PlayerInfo[playa][pDonatemoney] += money;
format(string, sizeof(string), "Администратор выдал вам: %d доната", money);
SendClientMessage(playa, COLOR_YELLOW, string);
}
}
}
else
{
SendClientMessage(playerid, COLOR_RED, "Вы не уполномочены использовать эту команду!");
}
return 1;
}

else if(strcmp(cmd, "/donate", true) == 0)
{
new donate[70];
format(donate,70, "{ffffff}У вас {ff0000}%d{ffffff} Donate",PlayerInfo[playerid][pDonatemoney]);
ShowPlayerDialog(playerid, 2984, DIALOG_STYLE_LIST, donate, "1.Уволиться[50]\n2.Снять мут[50]\n3.Снять варн[150]\n{ff0000}Получить админку/Пополнить донат\n{ff0000}Можно в скайпе {ffffff}dontexxx", "Ok", "Cancel");
}


В public OnDialogResponse ко всем case добавляем
Код
case 2984:
{
if(response == 1)
{
switch(listitem)
{
case 0:
{
if(PlayerInfo[playerid][pDonatemoney]>=50)
{
if(PlayerInfo[playerid][pMember] > 0 || PlayerInfo[playerid][pLeader] > 0)
{
PlayerInfo[playerid][pMember] = 0;
PlayerInfo[playerid][pRank] = 0;
PlayerInfo[playerid][pLeader] = 0;
PlayerInfo[playerid][pJob] = 0;
SetPlayerArmourAC(playerid,0);
SpawnPlayer(playerid);
PlayerInfo[playerid][pDonatemoney]-=50;
SendClientMessage(playerid,COLOR_BLUE,"Вы успешно уволились из организации");
}
else {SendClientMessage(playerid,COLOR_BLUE,"Вы нигде не состоите");}
}
else {SendClientMessage(playerid,COLOR_BLUE,"У вас нет столько доната!");}
}
case 1: {

if(PlayerInfo[playerid][pDonatemoney]>=50)
{
if(PlayerInfo[playerid][pMuted] > 0)
{
PlayerInfo[playerid][pMuted] = 0;
PlayerInfo[playerid][pMuteTime] = 0;
SendClientMessage(playerid,COLOR_BLUE,"Вы сняли с себя мут");
PlayerInfo[playerid][pDonatemoney]-=50;
}
else {SendClientMessage(playerid,COLOR_BLUE,"У вас нет бана чата!");}
}
else {SendClientMessage(playerid,COLOR_BLUE,"У вас нет столько доната!");}

}
case 2: {

if(PlayerInfo[playerid][pDonatemoney]>=150)
{
if(PlayerInfo[playerid][pWarns] > 0)
{
PlayerInfo[playerid][pWarns] --;
PlayerInfo[playerid][punWarnstime] = 0;
PlayerInfo[playerid][punWarns] = 0;
SendClientMessage(playerid,COLOR_BLUE,"Вы сняли с себя варн");
PlayerInfo[playerid][pDonatemoney]-=50;
}
else {SendClientMessage(playerid,COLOR_BLUE,"У вас нет варнов!");}
}
else {SendClientMessage(playerid,COLOR_BLUE,"У вас нет столько доната!");}

}
}
}
}


v1.1 - Добавил команду обмена виртов на донат
Код
else if(strcmp(cmd, "/moneytodonate", true) == 0)
{
SendClientMessage(playerid,COLOR_BLUE,"Команда /moneytodonate обменивает 1кк => 100Donate");
if(PlayerInfo[playerid][pCash] >= 1000000)
{
PlayerInfo[playerid][pCash] -= 1000000;
PlayerInfo[playerid][pDonatemoney] += 100;
SendClientMessage(playerid,COLOR_BLUE,"Вы обменяли 1кк на 100 очков доната");
}
else { SendClientMessage(playerid,COLOR_BLUE,"У вас нету 1кк дял обмена на 100 доната"); }
}

else if(strcmp(cmd, "/donate", true) == 0)
{
SendClientMessage(playerid,COLOR_BLUE,"Команда /moneytodonate обменивает 1кк => 100Donate");
new donate[70];
format(donate,70, "{ffffff}У вас {ff0000}%d{ffffff} Donate",PlayerInfo[playerid][pDonatemoney]);
ShowPlayerDialog(playerid, 2984, DIALOG_STYLE_LIST, donate, "1.Уволиться[50]\n2.Снять мут[50]\n3.Снять варн[150]\n{ff0000}Получить админку/Пополнить донат\n{ff0000}Можно в скайпе {ffffff}dontexxx", "Ok", "Cancel");
}


Для основы я сделал несколько донат функций..при желании вы можете их изменить, добавить!
http://savepic.ru/4142313.jpg


Сообщение отредактировал GeNa_GeNa2 - Четверг, 21.03.2013, 17:44
Diego[164] Дата: Понедельник, 19.08.2013, 11:52 | Сообщение # 2
Любитель
Сообщений: 42
Статус: Offline
Для новичка подойдет.
Михей Дата: Среда, 28.08.2013, 22:46 | Сообщение # 3
Боец
Сообщений: 149
Статус: Offline
Цитата (GeNa_GeNa2)
Система доната, администратор выдаёт донат командой /gdonate [id] [Money]
Игрок тратит с помощью /donate

Если актуально, то подробнее опиши. Как происходит сам донат, если просто после передачи денег на кошелёк администратора, то есть простая команда "/givemoney [id] сумма" чтобы выдать донат деньги, суть в том, что ты команду изменил или что?




Обмен валют:
http://cheat-master.ru/forum/103-105617-4
pf_fesko228 Дата: Четверг, 29.08.2013, 14:18 | Сообщение # 4
Новичок
Сообщений: 4
Статус: Offline
На самп-рп: /createdonate [сумма]

Skype: feskosupport
Михей Дата: Четверг, 29.08.2013, 18:48 | Сообщение # 5
Боец
Сообщений: 149
Статус: Offline
pf_fesko228, Первый раз слышу такую команду.



Обмен валют:
http://cheat-master.ru/forum/103-105617-4
Форум » Pawno программирование SAMP » Скрипты | FilterScripts » Мини Донат Система
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума
Лучшие пользователи
Admin [39113]

GеNius [7209]

[CM]Russel [5557]

kenlo763 [4952]

[CM]AGRESSOR [4639]

Snake_Firm [4452]

Сэс [4416]

Artem_Buero [4223]

[CM]Durman [3204]

[CM]Рафаэль [3080]

iMaddy [2855]

sky_Woker [2854]

getrekt [2745]

Новые пользователи
rubenia18 [21:17]

pokotiloroman91 [18:24]

stephensh5 [12:00]

calliesv7 [06:11]

louqm16 [22:14]

artushak [16:32]

Kingpolker [15:42]

leeyv11 [15:12]

Trappa17 [01:00]

Djamalchik [16:40]

ajeense [14:24]

654470559 [08:55]

Newtone [03:01]