[Архив] Помощь новичкам по скриптингу ! #2

Дата: Понедельник, 28.09.2009, 02:59 | Сообщение # 1

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

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

Сообщений: 995

Награды: 22

Репутация: 231

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

Статус:

Здравствуйте, хотите научиться скриптингу? пишите сюда, помoжем!(С)[PZ]KYZ[AIR].
Старая Тема уже достаточно полна ответов, это продолжение первой темы.

Убедительная просьба к Новичкам:

К большому сожалению, на этом форуме экстрасенсы не сидят,поэтому убедительно просим объяснять ваш вопрос/проблему ТАК,чтобы её поняли другие участники, не забывайте приписывать ваш код к своему сообщению(в тег pwn).

Радость

Maks_Kiev

Дата: Среда, 28.09.2011, 17:23 | Сообщение # 3586

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Kiev

Репутация: 0

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

Статус:

Прошу, помочь, с двумя проблемами!
1. Как сделать, или прошу кинуть, код на команду /addveh [carid] [color1] [color2] [lvl] [цена] для ГФ мода, а то у меня только /addveh [carid] [color1] [color2] [цена], просто машин ставить на продажу, только второго лвл, всех видов и это печально.
2. Как, убрать, или поменять команду (кнопку) для завода двигателя "ролик мыши" или кнопка "2", для ГФ мода, а то плохо летать на самолетах! (Фары Включаются на Сtrl)

Добавлено (28.09.2011, 17:23)
---------------------------------------------
И кстати, если я не смогу, сделать сам по вашей, помощи! Вот мой скайп: qewer_one

Alcoholik

Дата: Среда, 28.09.2011, 17:59 | Сообщение # 3587

Мастер джэдай

Группа: Администратор

Сообщений: 8299

Награды: 111

Город: Санкт-Петербург

Репутация: 6085

Статус:

Maks_Kiev, дай свою команду /addveh

Quote (Maks_Kiev)

Как, убрать, или поменять команду (кнопку) для завода двигателя "ролик мыши" или кнопка "2", для ГФ мода, а то плохо летать на самолетах! (Фары Включаются на Сtrl)

иды кнопок есть на http://wiki.sa-mp.com/wiki/GetPlayerKeys

if(isset($beer)&&isset($girl)) { drink($beer);fuck($girl); }else die();
Мониторинг sa:mp серверов

Приватно никого не консультирую, моды также не пишу, ни так, ни за деньги.
Моя ICQ 675715, пишу только с неё. Все остальные Роачи фейки, ничего я не продаю и продавать не буду, вас разводят.

Maks_Kiev

Дата: Четверг, 29.09.2011, 15:56 | Сообщение # 3588

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Kiev

Репутация: 0

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

Статус:

Quote (KroN)

Maks_Kiev, дай свою команду /addveh

return 1;
}
}
if(strcmp(cmd, "/addveh", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pAdmin] >= 5)
{
if(!IsPlayerInAnyVehicle(playerid))
{
SendClientMessage(playerid,COLOR_GREY,"Тебе нужно быть в транспорте");
return 1;
}
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_GRAD2, "ИНФО: /addveh [carid] [color1] [color2] [цена]");
return 1;
}
new car;
car = strval(tmp);
if(car < 400 || car > 611) { SendClientMessage(playerid, COLOR_GREY, "От 400 до 611!"); return 1; }
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_GRAD2, "ИНФО: /addveh [carid] [color1] [color2] [цена]");
return 1;
}
new color1;
color1 = strval(tmp);
if(color1 < 0 || color1 > 300) { SendClientMessage(playerid, COLOR_GREY, "Цвет лишь от 0 до 300!"); return 1; }
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_GRAD2, "ИНФО: /addveh [carid] [color1] [color2] [цена]");
return 1;
}
new color2;
color2 = strval(tmp);
if(color2 < 0 || color2 > 300) { SendClientMessage(playerid, COLOR_GREY, "Цвет от 0 до 300!"); return 1; }
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_GRAD2, "ИНФО: /addveh [carid] [color1] [color2] [цена]");
return 1;
}
new price;
price = strval(tmp);
if(price < 1 ) { SendClientMessage(playerid, COLOR_GREY, "Цена не меньше $1"); return 1; }
new Float:X,Float:Y,Float:Z,Float:Q;
GetVehiclePos(GetPlayerVehicleID(playerid), X,Y,Z);
GetVehicleZAngle(GetPlayerVehicleID(playerid),Q);
if(CAR_PROD==998)
{
SendClientMessage(playerid,COLOR_LIGHTRED,"Больше 999 машин на рынок нельзя ставить");
return 1;
}
CAR_PROD ++;
AutoInfo[CAR_PROD][aStats]=0;
AutoInfo[CAR_PROD][aModel]=car;
AutoInfo[CAR_PROD][aAutoX]=X;
AutoInfo[CAR_PROD][aAutoY]=Y;
AutoInfo[CAR_PROD][aAutoZ]=Z;
AutoInfo[CAR_PROD][aAutoAngle]=Q;
AutoInfo[CAR_PROD][aColor1]=color1;
AutoInfo[CAR_PROD][aColor2]=color2;
AutoInfo[CAR_PROD][aPrice]=price;
AutoInfo[CAR_PROD][aKey]=2;
AutoInfo[CAR_PROD][a0]=0;
AutoInfo[CAR_PROD][a1]=0;
AutoInfo[CAR_PROD][a2]=0;
AutoInfo[CAR_PROD][a3]=0;
AutoInfo[CAR_PROD][a4]=0;
AutoInfo[CAR_PROD][a5]=0;
AutoInfo[CAR_PROD][a6]=0;
AutoInfo[CAR_PROD][a7]=0;
AutoInfo[CAR_PROD][a8]=0;
AutoInfo[CAR_PROD][a9]=0;
AutoInfo[CAR_PROD][a10]=0;
AutoInfo[CAR_PROD][a11]=0;
AutoInfo[CAR_PROD][a12]=0;
AutoInfo[CAR_PROD][a13]=0;
AutoInfo[CAR_PROD][aPaintJob]=0;
strmid(AutoInfo[CAR_PROD][aOwner], "The State", 0, 9, 999);
SaveStuff();
SaveAuto();
format(string, sizeof(string), "* Машина на продажу номер %d создана.", CAR_PROD);
SendClientMessage(playerid, COLOR_GREY, string);
}

Android

Дата: Четверг, 29.09.2011, 16:34 | Сообщение # 3589

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

Сообщений: 1066

Награды: 11

Город: Рязань

Репутация: 571

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

Статус:

Quote

2. Как, убрать, или поменять команду (кнопку) для завода двигателя "ролик мыши" или кнопка "2", для ГФ мода, а то плохо летать на самолетах! (Фары Включаются на Сtrl)

В public OnPlayerKeyStateChange(playerid, newkeys, oldkeys) ищи что-то похожее на это

Code

if(newkeys == 512)

и заменяй 512 на другую id клавиши
Посмотреть их можно тут (клик)

Играй там где лучше Server Gta San Andreas: Multiplayer 0.3.7

Без труда талант - это фейерверк: на мгновение ослепляет, а потом ничего не остается

Maks_Kiev

Дата: Четверг, 29.09.2011, 19:11 | Сообщение # 3590

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Kiev

Репутация: 0

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

Статус:

Разобрался, как заводить? А вот как, глушануть?

Добавлено (29.09.2011, 19:11)
---------------------------------------------
С кнопками, разобрался, завести, поставил се, а как заглушить?

Android

Дата: Четверг, 29.09.2011, 19:13 | Сообщение # 3591

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

Сообщений: 1066

Награды: 11

Город: Рязань

Репутация: 571

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

Статус:

Maks_Kiev, вот такой у тебя должна быть команда /engine:

Code

    if(strcmp(cmd, "/engine", true) == 0)
  {
   if(IsPlayerInAnyVehicle(playerid))
   {
    new veh = GetPlayerVehicleID(playerid);
    if(veh != INVALID_VEHICLE_ID)
    {
     if(gEngine[playerid] == 0)
     {
      if(GetPlayerState(playerid) == PLAYER_STATE_PASSENGER)
      {
       return 1;
      }
      else if(IsAVelo(veh))
      {
       return 1;
      }
      if(!EngineStatus[GetPlayerVehicleID(playerid)])
      {
       GetPlayerName(playerid, sendername, sizeof(sendername));
       format(string, sizeof(string), "%s завел двигатель.", sendername);
       ProxDetector(10.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
       SetTimerEx("StartingTheVehicle",3500,0,"i",playerid);
       gEngine[playerid] = 1;
      }
      else if(EngineStatus[GetPlayerVehicleID(playerid)])
      {
       GetVehicleParamsEx(veh,engine,lights,alarm,doors,bonnet,boot,objective);
       SetVehicleParamsEx(veh,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
       GetPlayerName(playerid, sendername, sizeof(sendername));
       format(string, sizeof(string), "%s заглушил двигатель.", sendername);
       ProxDetector(10.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
       EngineStatus[GetPlayerVehicleID(playerid)] = false;
       gEngine[playerid] = 0;
      }
     }
    }
   }
   return 1;
  }

Играй там где лучше Server Gta San Andreas: Multiplayer 0.3.7

Без труда талант - это фейерверк: на мгновение ослепляет, а потом ничего не остается

Maks_Kiev

Дата: Четверг, 29.09.2011, 20:50 | Сообщение # 3592

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Kiev

Репутация: 0

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

Статус:

Заменил, как у тебя, что выбивает
D:\Игры\ViolenceWorld\gamemodes\Offical.pwn(18121) : error 017: undefined symbol "gEngine"
D:\Игры\ViolenceWorld\gamemodes\Offical.pwn(18121) : warning 215: expression has no effect
D:\Игры\ViolenceWorld\gamemodes\Offical.pwn(18121) : error 001: expected token: ";", but found "]"
D:\Игры\ViolenceWorld\gamemodes\Offical.pwn(18121) : error 029: invalid expression, assumed zero
D:\Игры\ViolenceWorld\gamemodes\Offical.pwn(18121) : fatal error 107: too many error messages on one line

EmiGrant

Дата: Четверг, 29.09.2011, 20:54 | Сообщение # 3593

Долгожитель

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

Сообщений: 1362

Награды: 34

Город: Пятигорск

Репутация: 1653

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

Статус:

Maks_Kiev, замени gEngine на свою переменную

Если человек несет бред, то здесь 2 варианта: либо он очень умный либо очень тупой © EmiGrant

Maks_Kiev

Дата: Четверг, 29.09.2011, 21:08 | Сообщение # 3594

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Kiev

Репутация: 0

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

Статус:

На, какую свою переменную, я просто в павно, не сильно, шарю

Andrejs

Дата: Четверг, 29.09.2011, 22:35 | Сообщение # 3595

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

Сообщений: 1801

Награды: 37

Город: Tallinn

Репутация: 2282

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

Статус:

Festus,
if(pickupid == GPSNOOB) //
{
if(PlayerInfo[playerid][pLevel] == 1)
{
ShowPlayerDialog(playerid, GPS, DIALOG_STYLE_LIST, "- GPS -","[1] Важные места\n[2] По работе\n[3] Развлечения/Отдых\n[4] Автосалоны\n[5] Фермы\n[6] Отключить GPS", "Выбрать","Отмена");
SendClientMessage(playerid, COLOR_WHITE, "Тест");
return 1;
}
}

Awm

Дата: Пятница, 30.09.2011, 00:59 | Сообщение # 3596

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

Сообщений: 3235

Награды: 55

Город: Tallinn

Репутация: 1661

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

Статус:

Quote (Andrejs)

if(pickupid == GPSNOOB) //
{
if(PlayerInfo[playerid][pLevel] == 1)
{

if(pickupid==GPSNOOB&&PlayerInfo[playerid][pLevel]==1) {
можно сократить crazy

"Life is hard... life is harder if you're stupid." - John Wayne

scropions

Дата: Понедельник, 10.10.2011, 00:34 | Сообщение # 3597

Новенький

Группа: Пользователи

Сообщений: 25

Награды: 0

Город: Гомель

Репутация: 10

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

Статус:

[cut noguest]
#include <a_samp>
#include <MidoStream>
#include <VW_UsefulFunctions>

#if defined FILTERSCRIPT
new hjo = {
{16665,1456.40002441,-84.69999695,27.10000038,0.00000000,0.00000000,0.00000000},
{16662,1445.09997559,-83.90000153,27.29999924,0.00000000,0.00000000,64.00000000},
{16782,1443.69970703,-84.09999847,28.50000000,0.00000000,0.00000000,0.00000000},
{14391,1458.69995117,-84.80000305,27.10000038,0.00000000,0.00000000,180.00000000},
{1649,1461.99975586,-84.69999695,28.79999924,0.00000000,0.00000000,270.00000000},
{1254,1453.00000000,-83.50000000,27.50000000,90.00000000,0.00000000,0.00000000},
};
new Float:hjopickup = {

{1581,1453.09960938,-84.56093597,26.09996223,270.99975586,0.00000000,0.00000000},
};

new Lifthjo;

public OnGameModeInit()
{
Lifthjo = CreateObject(13817,1453.09960938,-84.56093597,18.29999924,0.00000000,90.00000000,0.00000000); ObjectCounter++;

CreateObject(hjo);
AttachObjectToPlayer(playerid,hjo)
return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/updor", cmdtext, true, 10) == 0)
{
new Float:slx, Float:sly, Float:slz;
MoveObject(Lifthjo,slx, sly, slz+5);
PlaySoundForObject(Lifthjo, 1165);//äëÿ âîðîò
return 1;
}
return 0;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys == 2048)
new Float:slx, Float:sly, Float:slz;
MoveObject(Lifthjo,slx, sly, slz+5);
PlaySoundForObject(Lifthjo, 1165);//äëÿ âîðîò

return 1;
}

#endif[/cut]
лифт не поднимаеться на кнопку. даже звук не проигрывает. а командой только звук. и лифт даже не создаёться

Sergey_Star

Дата: Понедельник, 10.10.2011, 09:25 | Сообщение # 3598

Новенький

Группа: Пользователи

Сообщений: 13

Награды: 0

Город: Екб

Репутация: 0

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

Статус:

как сделать команду /level в диалоговом окне. чтоб все было в диалоге. мод PEN1

вот это бред или не?

[cut noguest]#define Dialogonclick 700
new PlayerName[MAX_PLAYER_NAME];
new string[950];
new msgbox[950];
msgbox="Ник: *** %s ***\nЛевел: %d\nДеньги на руках: %d\nЗдоровье: %.1f\nБронь: %.1f\nДеньги в банке: %d\nТел: %d\nПредупреждения: [%d/5]\nОружие: %s %s %s %s %s %s\nПатроны1: [%d] Патроны2: [%d] Патроны3: [%d] Патроны4: [%d] Патроны5: [%d] Патроны6: [%d]\nКейсы: [%d/4] Машины: [%d/4] Гонки: [%d/4] Сервисы: [%d/20] Наркотики: [%d/4]\nУбийств: [%d/30] Убийств В.Н.Н.1: [%d/4] След.уровень: [$%d] Опыт: [%d/%d] Ранг:[%d]";
format(string,sizeof string,msgbox,name,level,cash,shealth+50,sarmour,account,pnumber,pwarnl,sgun1,sgun2,sgun3,sgun4,sgun5,sgun6,ammo1,ammo2,ammo3,ammo4,ammo5,am mo6,pcb,phw,psr,pwa,pbf,kills,ppen,costlevel,exp,expamount,rank);
ShowPlayerDialog(playerid,Dialogonclick,0,PlayerName,string,"Oк","Выход");[/cut]

www.groza.ru

scropions

Дата: Понедельник, 10.10.2011, 14:39 | Сообщение # 3599

Новенький

Группа: Пользователи

Сообщений: 25

Награды: 0

Город: Гомель

Репутация: 10

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

Статус:

help помогите кто нить

Axelerator

Дата: Понедельник, 10.10.2011, 15:30 | Сообщение # 3600

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

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

Сообщений: 237

Награды: 2

Город: Омск

Репутация: 159

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

Статус:

Quote (Митя)

Что означает файл - anonymous в скритефайлс ? Там стоит значение 89000000, это правильно, вообще что это ?

Какой мод? В стандартной поставке сервера такого файла нет, так что это 100% от какого-то мода. (не понимаю, почему мой пост удалили =\)

Сообщение отредактировал Axelerator - Понедельник, 10.10.2011, 15:31