Команда покупки оружия - Форум SAMP о мультиплеерах для GTA.

Команда покупки оружия

Дата: Воскресенье, 23.08.2009, 18:36 | Сообщение # 1

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

Всем здарова. Я хочу установить на мод команду покупки оружия. Команда мне нужна такая. Например: /bw 1 [кол-во патронов]. То есть не нужно придумывать код на ID оружия и всё такое. Нужно просто создать команду в которой можно будет указать только кол-во патронов с ценой на 1 потрон. Что бы при вводе /bw 1 50 если например 1 патрон стоит 1$ то снималось 50$. При вводе команды. И появлялсоь 50 патронов у оружия.

Человек учась ходить падает, и только падая, он учится ходить!
Мои работы:
[GM] W.F.S.A. V. 1.0 - 100%
[GM] San Fierro Enigmatic (TDM) V. 1.0 - 100%
[FS] Clan House V. 1.0 - 100%
[FS] Save Car Tun System V. 1.0 - 100%
[FS] Vagrant Anti-CapsLock V. 2.1 - 100%
[FS] Vagrant Anti-Advertise V. 1.1, V. 2.0 - 100%
[APP] SA-MP Interior Viewer V. 1.0 - 100%

Принимаю заказы на помощь в скриптинге!

JonnTheBest

Дата: Воскресенье, 23.08.2009, 18:40 | Сообщение # 2

Новенький

Группа: Продвинутые

Сообщений: 70

Награды: 1

Город: Старый Оскол, Белгородская обл.

Репутация: 19

Замечания: 0%

Статус:

Как я понял, добавление патронов на текущее оружие? А что тогда значит единица в команде /bw 1 50 ?

Все еще помогаю в скриптинге.
В разработке:
nothing
[off]xxx:...та строка что под оружием она отображает значение переменной, даже при попытке считить деньги вернуться на свое настоящее состояние. Если у меня у блондинки одна ниточка в голове которая уши держит и то я разобралась, то тебе мужику с твоим суперинтеллектуальным мозгом пригодным для логических вычислений это раз плюнуть. Просто вы все мужики ленитесь взять и разобраться, охото чтобы за вас всё тетя сделала. ... Вам бы тока пиво пить и у компа в игрушках или телика торчать[/off]

Vagrant

Дата: Воскресенье, 23.08.2009, 18:50 | Сообщение # 3

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

Quote (JonnTheBest)

Как я понял, добавление патронов на текущее оружие? А что тогда значит единица в команде /bw 1 50 ?

Я создавал ранее тему где пытался узнать как сделать команду в которую нужно будет вводить ID оружия кол-во патронов то есть типо: /bw [ID Weapon] [Потороны] и при вводе довалось определённое оружие указанного ID и кол-во потронов. При этом снимая определённое кол-во денег. Но так как никто мне не ответил на этот вопрос решил сделать по другому. Например создать список с 10-ю оружиям типо:
/listweap
И высвечивалось:
1. Парашут
2. Писталет
3. Автомат
и т.д. до 10. То есть создать 10 команд /bw 1, /bw 2... и так далее. Для каждого оружия по команде. Но в этой команде можно было указывать кол-во патронов. То есть не для оружия которое у тебя сейчас а именно купить канкретное оружие то есть например /bw 3 500 . И тебе довался автомат с 500 патронами.

Dima-kun

Дата: Воскресенье, 23.08.2009, 19:28 | Сообщение # 4

Группа: Разработчики

Сообщений: 6269

Награды: 72

Репутация: 3512

Замечания: 0%

Статус:

Quote (Vagrant)

1. Парашут
2. Писталет
3. Автомат

а ну тогда типа условие

[pwn]tmp = strtok(cmdtext, idx);
weapon=strval(tmp);
tmp = strtok(cmdtext, idx);
ammo=strval(tmp);

if(weapon==1)
{
GivePlayerWeapon(playerid, id,ammo);
}else
if(weapon==2)
{
GivePlayerWeapon(playerid, id,ammo);
}
и т.д[/pwn]

Мои работы:
[INC] Сборник d_includes [LAST],[FS] New Demage Effect,[FS]Авто-Поворотники,
[FS]mp3player,[FS] Fun Chat Game,[FS] Car Buy Syst,[FS] Anti-AirBrk,[INC] d_setpos,
[GM] Game Move v0.1,[FS+include]Super-Armour [0.3z],[FS + Include] Multi Checkpoints

SanSay

Дата: Воскресенье, 23.08.2009, 22:33 | Сообщение # 5

Долгожитель

Группа: Продвинутые

Сообщений: 1662

Награды: 25

Город: Наб.Челны

Репутация: 280

Замечания: 0%

Статус:

Vagrant, команда взята из Пена, mod вообще нужно убрать, просто не стал парится и присвоил 1
лишнее вроде вырезал, но может чето и пропустил
[pwn]new GunPrice[30][1] = {
{500}, //parachute
{400}, //golfclub
{300}, //nightstick
{200}, //knife
{700}, //baseballbat
{300}, //shovel
{100}, //poolcue
{400}, //purpledildo
{780}, //whitedildo
{560}, //longwhitedildo
{530}, //whitedildo2
{200}, //flowers
{600}, //cane
{500}, //sdpistol
{1000}, //colt45
{1500}, //deagle
{2000}, //Tec9
{3000}, //uzi
{2500}, //mp5
{100}, //shotgun
{2000}, //spas12
{4000}, //sawnoff
{2000}, //ak47
{2500}, //m4
{1000}, //rifle
{1}, //pistolammo
{10}, //shotgunammo
{2}, //smgammo
{20}, //assaultammo
{50} //rifle
};

if(strcmp(cmd, "/buygun", true) == 0 || strcmp(cmd, "/bg", true) == 0)
{
new gun;
new gunid;
new gunstring1[256];
new gunstring2[256];
new gunstring3[256];
new gunstring4[256];
new gunstring5[256];
new infostring[256];
new guncharge;
new ammocharge;
new mod = 1;
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_GREEN," _______________________________________");
SendClientMessage(playerid, COLOR_YELLOW," *** Оружие и патроны ***");
format(string, sizeof(string), " Используйте: /buygun [номер оружия] [кол-во патронов]");
SendClientMessage(playerid, COLOR_GREEN,string);
format(gunstring1, sizeof(gunstring1), " Оружие: 1.Парашют($%d) 2.Клюшка для гольфа($%d) 3.Резиновая дубинка($%d) 4.Нож($%d) 5.Бита($%d) 6.Лопата($%d)",
GunPrice[0][0]/100*mod,GunPrice[1][0]/100*mod,GunPrice[2][0]/100*mod,GunPrice[3][0]/100*mod,GunPrice[4][0]/100*mod,GunPrice[5][0]/100*mod);
SendClientMessage(playerid, COLOR_WHITE, gunstring1);
format(gunstring2, sizeof(gunstring2), " Оружие: 7.Кий($%d 8.Пистолет с глушителем($%d) 9.Кольт45($%d) 10.Пустынный орел($%d) 11.Tec9($%d) 12.Узи($%d)",
GunPrice[6][0]/100*mod,GunPrice[13][0]/100*mod,GunPrice[14][0]/100*mod,GunPrice[15][0]/100*mod,GunPrice[16][0]/100*mod,GunPrice[17][0]/100*mod);
SendClientMessage(playerid, COLOR_WHITE, gunstring2);
format(gunstring3, sizeof(gunstring3), " Оружие: 13.МП5($%d) 14.Дробовик($%d) 15.Боевой дробовик($%d) 16.Савны($%d)",
GunPrice[18][0]/100*mod,GunPrice[19][0]/100*mod,GunPrice[20][0]/100*mod,GunPrice[21][0]/100*mod);
SendClientMessage(playerid, COLOR_WHITE, gunstring3);
format(gunstring4, sizeof(gunstring4), " Оружие: 17.Автомат Калашникова($%d) 18.АвтоматМ16($%d) 19.Винтовка($%d)",
GunPrice[22][0]/100*mod,GunPrice[23][0]/100*mod,GunPrice[24][0]/100*mod);
SendClientMessage(playerid, COLOR_WHITE, gunstring4);
format(gunstring5, sizeof(gunstring5), " Прайс на патроны: Для пистолетов($%d) Для дробовиков($%d) Для микроавтоматов($%d) Для автоматов($%d) Для винтовок($%d)",
GunPrice[25][0],GunPrice[26][0],GunPrice[27][0],GunPrice[28][0],GunPrice[29][0]);
SendClientMessage(playerid, COLOR_WHITE, gunstring5);
SendClientMessage(playerid, COLOR_GREEN," _______________________________________");
return 1;
}
gunid = strval(tmp);
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
format(string, sizeof(string), " Используйте: /buygun [номер оружия] [кол-во патронов]");
SendClientMessage(playerid, COLOR_GRAD2,string);
return 1;
}
new ammo = strval(tmp);
if(ammo <= 0 || ammo > 10000)
{
format(string, sizeof(string), " Количество патронов должно быть больше 0, но меньше 10000!");
SendClientMessage(playerid, COLOR_RED,string);
return 1;
}
/*
if (PlayerInfo[playerid][pLevel] >= 13 && (strcmp(gunid, "minigun", true, strlen(gunid)) == 0))
{
SendClientMessage(playerid, COLOR_GRAD6, "New Upgrade: You Will Now Spawn With A minigun");
PlayerInfo[playerid][pGun6] = 38;
ResetPlayerWeapons(playerid);
SetPlayerWeapons(playerid);
PlayerInfo[playerid][gPupgrade]--;
}

if (PlayerInfo[playerid][pLevel] >= 12 && (strcmp(gunid, "flamethrower", true, strlen(gunid)) == 0))
{
SendClientMessage(playerid, COLOR_GRAD6, "New Upgrade: You Will Now Spawn With A flamethrower");
PlayerInfo[playerid][pGun6] = 37;
}
*/
if (gunid == 1)
{
gun = 46;
guncharge = GunPrice[0][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Парашют за $%d",guncharge+ammocharge);
}
else if (gunid == 2)
{
gun = 2;
guncharge = GunPrice[1][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Клюшку для гольфа за $%d",guncharge+ammocharge);
}
else if (gunid == 3)
{
gun = 3;
guncharge = GunPrice[2][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Резиновую дубинку за $%d",guncharge+ammocharge);
}
else if (gunid == 4)
{
gun = 4;
guncharge = GunPrice[3][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Нож за $%d",guncharge+ammocharge);
}
else if (gunid == 5)
{
gun = 5;
guncharge = GunPrice[4][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Бейсбольную биту за $%d",guncharge+ammocharge);
}
else if (gunid == 6)
{
gun = 6;
guncharge = GunPrice[5][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Лопату за $%d",guncharge+ammocharge);
}
else if (gunid == 7)
{
gun = 7;
guncharge = GunPrice[6][0]/100*mod;
ammocharge = 0;
format(infostring, 256, " Вы купили Кий за $%d",guncharge+ammocharge);
}
else if (gunid == 8)
{
gun = 23;
guncharge = GunPrice[13][0]/100*mod;
ammocharge = GunPrice[25][0]*ammo;
format(infostring, 256, " Вы купили Пистолет с глушителем с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 9)
{
gun = 22;
guncharge = GunPrice[14][0]/100*mod;
ammocharge = GunPrice[25][0]*ammo;
format(infostring, 256, " Вы купили Кольт 45 с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 10)
{
gun = 24;
guncharge = GunPrice[15][0]/100*mod;
ammocharge = GunPrice[25][0]*ammo;
format(infostring, 256, " Вы купили Пустынный орел с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 11)
{
gun = 32;
guncharge = GunPrice[16][0]/100*mod;
ammocharge = GunPrice[27][0]*ammo;
format(infostring, 256, " Вы купили Tec9 с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 12)
{
gun = 28;
guncharge = GunPrice[17][0]/100*mod;
ammocharge = GunPrice[27][0]*ammo;
format(infostring, 256, " Вы купили Узи с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 13)
{
gun = 29;
guncharge = GunPrice[18][0]/100*mod;
ammocharge = GunPrice[27][0]*ammo;
format(infostring, 256, " Вы купили МП5 с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 14)
{
gun = 25;
guncharge = GunPrice[19][0]/100*mod;
ammocharge = GunPrice[26][0]*ammo;
format(infostring, 256, " Вы купили Дробовик с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 15)
{
gun = 27;
guncharge = GunPrice[20][0]/100*mod;
ammocharge = GunPrice[26][0]*ammo;
format(infostring, 256, " Вы купили Боевой дробовик с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 16)
{
gun = 26;
guncharge = GunPrice[21][0]/100*mod;
ammocharge = GunPrice[26][0]*ammo;
format(infostring, 256, " Вы купили Обрез (Савны) с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 17)
{
gun = 30;
guncharge = GunPrice[22][0]/100*mod;
ammocharge = GunPrice[28][0]*ammo;
format(infostring, 256, " Вы купили Автомат Калашникова (АК47) с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 18)
{
gun = 31;
guncharge = GunPrice[23][0]/100*mod;
ammocharge = GunPrice[28][0]*ammo;
format(infostring, 256, " Вы купили Автомат М16 с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else if (gunid == 19)
{
gun = 33;
guncharge = GunPrice[24][0]/100*mod;
ammocharge = GunPrice[29][0]*ammo;
format(infostring, 256, " Вы купили Винтовку с %d патронами за $%d",ammo,guncharge+ammocharge);
}
else
{
SendClientMessage(playerid, COLOR_GRAD6, " Продавец: Я никогда не слышал о таком оружии.");
return 1;
}
if((guncharge+ammocharge) > GetPlayerMoney(playerid))
{
format(infostring, 256, " У вас недостаточно денег $%d",guncharge+ammocharge);
SendClientMessage(playerid, COLOR_GRAD3, infostring);
return 1;
}
SendClientMessage(playerid, COLOR_GRAD3, infostring);
oSetPlayerMoney(playerid,PlayerInfo[playerid][pCash]-(guncharge+ammocharge));
PlayerPlaySound(playerid, 1052, 0.0, 0.0, 0.0);
GivePlayerWeapon(playerid, gun, ammo);
GetPlayerName(playerid, sendername, sizeof(sendername));
format(string, sizeof(string), " %s купил оружие на сумму $%d в бизнесе %d", sendername, (guncharge+ammocharge), location-99);
printf("%s", string);
OnPropUpdate();
PayLog(string);
return 1;
}

simhost.org:8888 Mode:PEN1(LS)+GTO(банды+кач) v4.23_SAMP_0.3с
PEN1(LS)+GTO(банды+кач)v3.92_SAMP_0.3с(ifolder)*** AntiBot*** [FS] Car Export vs SanSay*** [FS] anti_s0beit_FakeKill_Ver2

Vagrant

Дата: Понедельник, 24.08.2009, 06:41 | Сообщение # 6

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

SanSay, Код вставил но пока не проверял работает или нет. Мне интересно что означают цифры между "{}"
{500}, //parachute
{400}, //golfclub
{300}, //nightstick
{200}, //knife
{700}, //baseballbat
{300}, //shovel
{100}, //poolcue
{400}, //purpledildo
{780}, //whitedildo
{560}, //longwhitedildo
{530}, //whitedildo2
{200}, //flowers
{600}, //cane
{500}, //sdpistol
{1000}, //colt45
{1500}, //deagle
{2000}, //Tec9
{3000}, //uzi
{2500}, //mp5
{100}, //shotgun
{2000}, //spas12
{4000}, //sawnoff
{2000}, //ak47
{2500}, //m4
{1000}, //rifle
{1}, //pistolammo
{10}, //shotgunammo
{2}, //smgammo
{20}, //assaultammo
{50} //rifle

На модель оружия не похоже и на ID Так же.

Добавлено (24.08.2009, 06:41)
---------------------------------------------
Компилит без ошибок. Я некеоторые ещё сам по убирал.

Dima-kun

Дата: Понедельник, 24.08.2009, 08:16 | Сообщение # 7

Группа: Разработчики

Сообщений: 6269

Награды: 72

Репутация: 3512

Замечания: 0%

Статус:

Quote (Vagrant)

anSay, Код вставил но пока не проверял работает или нет. Мне интересно что означают цифры между "{}"

это цены оружия...

Vagrant

Дата: Понедельник, 24.08.2009, 13:00 | Сообщение # 8

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

В принципи всё работает. Но цены почему-то сумасшедшие. Например дробовик купить (14 ID В списке команды) с 200 патронами стоит 2.500.000$ Хотя да же если умножить цену которая написана в GunPrice то столько получиться никак не может.

Dima-kun

Дата: Понедельник, 24.08.2009, 13:15 | Сообщение # 9

Группа: Разработчики

Сообщений: 6269

Награды: 72

Репутация: 3512

Замечания: 0%

Статус:

Quote (Vagrant)

ну сам мени

SanSay

Дата: Понедельник, 24.08.2009, 19:37 | Сообщение # 10

Долгожитель

Группа: Продвинутые

Сообщений: 1662

Награды: 25

Город: Наб.Челны

Репутация: 280

Замечания: 0%

Статус:

Vagrant, стоимость покупки дроба расчитывается так:
guncharge = GunPrice[19][0]/100*mod;
+
ammocharge = GunPrice[26][0]*ammo;
т.е.
GunPrice[19] = {100}, //shotgun
+
GunPrice[26] = {10}, //shotgunammo
= 100/100*1+10*200=2001

смотри в расчетах чет у тя не то.

Vagrant

Дата: Понедельник, 24.08.2009, 20:12 | Сообщение # 11

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

Хм... У меня косяк в самой последней части кода:
[pwn]
SendClientMessage(playerid, COLOR_GRAD3, infostring);
oSetPlayerMoney(playerid,PlayerInfo[playerid][pCash]-(guncharge+ammocharge)); /* Тут у меня была ошибка, оно и не удивительно... но когда это вставлял в свой код ниже то получилось только так написать (Смотреть ниже) */
PlayerPlaySound(playerid, 1052, 0.0, 0.0, 0.0);
GivePlayerWeapon(playerid, gun, ammo);
GetPlayerName(playerid, sendername, sizeof(sendername));
format(string, sizeof(string), " %s купил оружие на сумму $%d в бизнесе %d", sendername, (guncharge+ammocharge), location-99);
printf("%s", string);
OnPropUpdate();
PayLog(string);
return 1;
}
[/pwn]
Я переделал вот так:
[pwn]
GivePlayerMoney(playerid,-(PlayerInfo[playerid][pCash]-(guncharge+ammocharge))); /* Из-за этого у меня устанвливается сумма которая должна отниматься при покупки... То есть купил дроб, с 200 патронами у меня было 10000 цена оружия и патронов 2001. Купил оружие и патроны у меня за место 10000 стало 2001.*/
GivePlayerWeapon(playerid, gun, ammo);
return 1;
}
[/pwn]
Помогите исправить или дайте функцию oSetPlayerMoney...

Сообщение отредактировал Vagrant - Понедельник, 24.08.2009, 20:13

SanSay

Дата: Понедельник, 24.08.2009, 21:13 | Сообщение # 12

Долгожитель

Группа: Продвинутые

Сообщений: 1662

Награды: 25

Город: Наб.Челны

Репутация: 280

Замечания: 0%

Статус:

Vagrant, [pwn]
forward oSetPlayerMoney(playerid,money);
public oSetPlayerMoney(playerid,money)
{
if (!IsPlayerConnected(playerid))
{
return;
}
SetPlayerMoney(playerid,money);
PlayerInfo[playerid][pCash] = money;
return;
}
а вообще попробуй так:
GivePlayerMoney(playerid,-(guncharge+ammocharge));
GivePlayerWeapon(playerid, gun, ammo);
return 1;

Сообщение отредактировал SanSay - Понедельник, 24.08.2009, 21:14

Vagrant

Дата: Среда, 26.08.2009, 09:15 | Сообщение # 13

Уважаемый человек

Группа: I'm V.I.P.

Сообщений: 904

Награды: 21

Город: Находка

Репутация: 489

Замечания: 0%

Статус:

SanSay, Спасибо большое. + поставил мдалька в качистве бонуса

Добавлено (26.08.2009, 09:15)
---------------------------------------------
А может ещё подсказать кто-нибудь как сделать что бы оружие после того как тебя убили сохранялось на спавне?

nitio

Дата: Понедельник, 25.01.2010, 02:25 | Сообщение # 14

Уверенный в себе

Группа: I'm V.I.P.

Сообщений: 220

Награды: 9

Город: Москва

Репутация: -134

Замечания: 80%

Статус:

как зделать чтобы когда на пикап подходишь пишешь /bugun выбераешь раздел и покупается оружие дигл мп5 м4 допустим и чтоыбы было 5 штук ток разное оружие