Помогите со скриптом - Форум SAMP о мультиплеерах для GTA.

Помогите со скриптом

Дата: Понедельник, 07.01.2008, 12:28 | Сообщение # 1

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

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

Сообщений: 214

Награды: 2

Город: Тула

Репутация: 13

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

Статус:

//=========================[Buyweapon]==========================================
if (strcmp(cmdtext, "/buyweapon", true)==0 || strcmp(cmdtext, "/buygun", true)==0)
{
Weapons = CreateMenu("Weapons",1,125,150,300);
SetMenuColumnHeader(Weapons, 0, "Welcome to the ammo by bama_boy");
AddMenuItem(Weapons,0,"Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Combat Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Micro Uzi (100 bullets)");
AddMenuItem(Weapons,0,"Tec9 (100 bullets)");
AddMenuItem(Weapons,0,"MP5 (100 bullets)");
AddMenuItem(Weapons,0,"AK47 (75 bullets)");
AddMenuItem(Weapons,0,"M4 (75 bullets)");
AddMenuItem(Weapons,0,"5x Grenades");
AddMenuItem(Weapons,0,"Sawnoff Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Flamethrower (100 units)");
ShowMenuForPlayer(Weapons, playerid);
}
//=========================[Weapon Menu]========================================
public OnPlayerSelectedMenuRow(playerid, row)
{
new Menu:Current = GetPlayerMenu(playerid);
if(Current == Weapons)
{
switch(row)
{
case 0:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели один дробовик!");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный дробовик!", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 25, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 1:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У вас нет достаточно денег!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели один боевой дробовик");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный боевой дробовик", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 27, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 2:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели Узи");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный Узи", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 28, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 3:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели Тек9");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный Тек9", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 32, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 4:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели МП5");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный МП5", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 29, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 5:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели Автомат Калашникова(AK47)");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный Автомат Калашникова(AK47)", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 30, 75);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 6:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели М4");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный М4", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 31, 75);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 7:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели гранаты");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный гранаты", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 16, 5);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 8:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели двойной дробовик");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный двойной дробовик", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 26, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 9:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, " У тя нет бабла!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, " Вы приобрели огнетушитель");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Приобретенный огнетушитель", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);
CommandsLog(str);
GivePlayerWeapon(playerid, 37, 1000);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
}
return 0;
}
return 0;
}

Вот содержание моего дибильного скрипта.
Это чето вроде менюшки с покупкой оружия.
Нифига не капилируется и не получается.
Фсю ночь голову ломал, так нифига и не вышло.
Если кому не влом, доделайте plz
А сюда amx кинте plz.
Мож я че не правильно пишу мля?!
ппц устал нах
cool

Добавлено (07.01.2008, 12:28)
---------------------------------------------
ап

И я кричу - остановите пленку
Это кино я уже смотрел
Эй, режиссер заканчивай съемку
А он смеется в объектив как в прицел.

Vaan

Дата: Понедельник, 07.01.2008, 13:53 | Сообщение # 2

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

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

Сообщений: 230

Награды: 3

Город: Харьков

Репутация: 29

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

Статус:

А что тут помогать непонял я немного

Лучший сайт Украины Sex Fun Warez
Если я вам понадобился или помог ставте +
В связи с тем, что я больше не заинтересован в GTA и с выходом SA-MP версии 3, взлом аккаунтов и DDOS серверов стал невозможен, прошу больше меня по этому поводу в ICQ не беспокоить.

XAOC

Дата: Понедельник, 07.01.2008, 19:26 | Сообщение # 3

Советчик

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

Сообщений: 1190

Награды: 11

Город: Гдета там>>

Репутация: 311

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

Статус:

эээ, это всё что у тебя в PWN ?

bama_boy

Дата: Понедельник, 07.01.2008, 20:23 | Сообщение # 4

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

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

Сообщений: 214

Награды: 2

Город: Тула

Репутация: 13

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

Статус:

Да, я в скриптенге не шарю.
Допишите plz ))
Я вам плюсик поставлю ))
cool

Torres

Дата: Вторник, 08.01.2008, 01:32 | Сообщение # 5

Местный

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

Сообщений: 690

Награды: 2

Город: Йошкар-Ола

Репутация: 127

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

Статус:

Вот:

Quote

#include <a_samp>
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_YELLOW 0xFFFF00AA

new Menu:Weapons;

public OnPlayerCommandText(playerid, cmdtext[])
{
//=========================[Buyweapon]==========================================
if (strcmp(cmdtext, "/buyweapon", true)==0 || strcmp(cmdtext, "/buygun", true)==0)
{
Weapons = CreateMenu("Weapons",1,125,150,300);
SetMenuColumnHeader(Weapons, 0, "Welcome to the ammo by bama_boy");
AddMenuItem(Weapons,0,"Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Combat Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Micro Uzi (100 bullets)");
AddMenuItem(Weapons,0,"Tec9 (100 bullets)");
AddMenuItem(Weapons,0,"MP5 (100 bullets)");
AddMenuItem(Weapons,0,"AK47 (75 bullets)");
AddMenuItem(Weapons,0,"M4 (75 bullets)");
AddMenuItem(Weapons,0,"5x Grenades");
AddMenuItem(Weapons,0,"Sawnoff Shotgun (50 bullets)");
AddMenuItem(Weapons,0,"Flamethrower (100 units)");
ShowMenuForPlayer(Weapons, playerid);
}
}
//=========================[Weapon Menu]========================================
public OnPlayerSelectedMenuRow(playerid, row)
{
new Menu:Current = GetPlayerMenu(playerid);
if(Current == Weapons)
{
switch(row)
{
case 0:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Shotgun");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Shotgun", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 25, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 1:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Combat Shotgun");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Combat Shotgun", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 27, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 2:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Micro Uzi");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Micro Uzi", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 28, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 3:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Tec9");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Tec9", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 32, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 4:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one MP5");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A MP5", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 29, 100);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 5:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one AK47");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A AK47", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 30, 75);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 6:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one M4");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A M4", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 31, 75);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 7:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased Grenades");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased Grenades", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 16, 5);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 8:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Sawnoff Shotgun");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Sawnoff Shotgun", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 26, 50);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
case 9:
if(GetPlayerMoney(playerid) < 5000)
{
SendClientMessage(playerid, COLOR_WHITE, "Íå õâàòàåò äåíåã!");
}
else
{
SendClientMessage(playerid, COLOR_YELLOW, "You purchased one Flamethrower");
new PlayerName[30], str[256];
GetPlayerName(playerid, PlayerName, 30);
format(str, 256, "SERVER MESSAGE: %s Purchased A Flamethrower", PlayerName);
SendClientMessageToAll(COLOR_YELLOW, str);

GivePlayerWeapon(playerid, 37, 1000);
GivePlayerMoney(playerid, 0-5000);
DestroyMenu(Weapons);
}
}
return 0;
}
return 0;
}

[GM-MYSQL-PHP]PEN1:Ultra LS - совместим с samp 0.3
[ADD]MTA map converter