В теме 3 сообщения

Нужно дописать систему аренды транспорта.
Есть система аренды машины созданные сервером  = AddStaticVehicleEx
Что нужно сделать:
Дописать возможность аренды = CreateVehicle
Пример:
CMD:rentcar()
{
     CreateVehicle(создал машину);
     И прикрепил все переменные.
}

 

Спойлер



#include 		"a_samp"
#include 		<dc_cmd>
#include		<getvehicledriver>

#define CBLUE 0x4E76B1FF
#define CRED  0xF40B74FF
#define COLOR_GREY 0xAFAFAFAA

#define CW 0xFFFFFFFF
#define CD 0x04B4AEFF
#define CO 0xFF7F50FF
#define CG 0xAFAFAFFF

#define COLOR_WHITE 0xFFFFFFFF
#define CWHITE 0xFFFFFFFF

#define W "{FFFFFF}"
#define D "{04B4AE}"//
#define O "{FF7F50}"
#define G "{AFAFAF}"
#define SCM SendClientMessage


enum aInfo
{
	aID,            // - Unknown -
	aPlayerID,      // - Unknown -
	aModel,			//Model
	aCost,			//Цена
	Float:aPos_X,	//Кордината X
	Float:aPos_Y,	//Кордината Y
	Float:aPos_Z,	//Кордината Z
	Float:aPos_A,	//Угол поворота
	aColor_1,		//Цвет 1
	aColor_2		//Цвет 2
};
new ArendInfo[][aInfo] =
{//ID, Цена, Координаты X, Y, Z, Цвет 1, Цвет 2 //АРЕНДА
	{ INVALID_VEHICLE_ID, INVALID_PLAYER_ID, 509, 300 ,2034.6873,1337.1438,10.5454,58.6281,-1,-1 },
	{ INVALID_VEHICLE_ID, INVALID_PLAYER_ID, 411, 300 ,2034.6873,1337.1438,10.5454,58.6281,-1,-1 }
};

public OnFilterScriptInit()
{
    for(new i = 0; i < sizeof(ArendInfo); i ++)
	{
	    ArendInfo[i][aID] = AddStaticVehicleEx(ArendInfo[i][aModel], ArendInfo[i][aPos_X], ArendInfo[i][aPos_Y], ArendInfo[i][aPos_Z], ArendInfo[i][aPos_A], ArendInfo[i][aColor_1], ArendInfo[i][aColor_2], 100000);
        SetVehicleParamsEx(ArendInfo[i][aID], 0, 0, 0, 0, 0, 0, 0);
	}
	SetTimer("ArendTimer", 10000, true);
	return true;
}

public OnPlayerConnect(playerid)
{
	return 1;
}
CMD:rentcar(playerid, params[])
{
	//Мне нужно чтоб ратало все через команду. Написал ее, создалась машина и все данные записались. Без диалога. И именно создается машина!
	CreateVehicle(574, 2034.6873,1337.1438,10.5454, 0.0, 1, 1, 120);
    return true;
}
public OnVehicleDeath(vehicleid, killerid)
{
    new get_rent = GetArendCarID(vehicleid);
	if(get_rent != INVALID_VEHICLE_ID)
	{
	    new playerid = ArendInfo[get_rent][aPlayerID];
	    ArendInfo[get_rent][aPlayerID] = INVALID_PLAYER_ID;
	    if(IsPlayerConnected(playerid) && GetPVarInt(playerid, "ArendKey") == get_rent)
	    {
	        SendClientMessage(playerid, 0xFFFFFFFF, "Транспорт, который вы арендовали, был уничтожен. Аренда закончилась");
	        SetPVarInt(playerid, "ArendKey", -1);
	    }
	}
	return 1;
}
public OnPlayerStateChange(playerid, newstate, oldstate)
{
    if(newstate == PLAYER_STATE_DRIVER)
	{
	    new vehicleid = GetPlayerVehicleID(playerid);
	    new arend_id = INVALID_PLAYER_ID;
     	if(GetArendCarID(vehicleid, arend_id) != (-1))
		{
      	    new string[200];
			if(arend_id == INVALID_PLAYER_ID || !IsPlayerConnected(arend_id))
			{
			    new rc = GetArendCarID(vehicleid);
			    format(string,sizeof(string),""W"Транспорт для аренды!\n\n- Модель: {9ACD32}%s"W"\n- Стоимость: {9ACD32}$%i"W"\n\nЧтобы арендовать нажмите {9ACD32}'Аренда'"W"", GetVehicleName(GetVehicleModel(vehicleid)), ArendInfo[rc][aCost]);
				ShowPlayerDialog(playerid, 9001, 0, "Аренда", string, "Аренда", "Отмена");
			}
			else if(arend_id != playerid)
			{
			    SendClientMessage(playerid,-1,"Этот транспорт уже арендуют");
			    RemovePlayerFromVehicle(playerid);
			}
		}
	}
	return 1;
}
forward ArendTimer();
public ArendTimer()
{
	for( new i = 0, m = GetMaxPlayers(); i != m; i ++ )
	{
		if(!IsPlayerConnected(i)) continue;
		if(GetPVarInt(i, "ArendKey") == -1) continue;
		new rc = GetPVarInt(i, "ArendKey");
		if(ArendInfo[rc][aPlayerID] != i)
		{
		    SetPVarInt(i, "ArendKey", -1);
		    continue;
		}
		if(!IsPlayerInVehicle(i, ArendInfo[rc][aID]))
		{
		    new Float:x, Float:y, Float:z;
		    GetVehiclePos(ArendInfo[rc][aID], x, y, z);
			if(!IsPlayerInRangeOfPoint(i, 2000.0, x, y, z) && GetPlayerVirtualWorld(i) == 0 && GetPlayerInterior(i) == 0)
			{
			    SendClientMessage(i, 0xFFFFFFFF, "Вы отошли слишком далеко от арендованного вами транспорта.");
			    ArendInfo[rc][aPlayerID] = INVALID_PLAYER_ID;
            	SetVehicleToRespawn(ArendInfo[rc][aID]);
            	SetPVarInt(i, "ArendKey", -1);
            	continue;
			}
		}
	}
}
stock GetArendCarID( vehicleid, &arend_id = INVALID_PLAYER_ID )
{
    arend_id = INVALID_PLAYER_ID;
	for( new i = 0; i < sizeof(ArendInfo); i ++ )
	{
	    if( vehicleid == ArendInfo[i][aID] )
		{
      		if(IsPlayerConnected(ArendInfo[i][aPlayerID]))
      		{
            	arend_id = ArendInfo[i][aPlayerID];
			}
			return i;
		}
 	}
	return -1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(strlen(inputtext) && (strfind(inputtext,"`") != -1 || strfind(inputtext,"=") != -1)) return SendClientMessage(playerid,-1,"Ошибка. Вы использовали запрещенные символы.");
    if(dialogid == 9001)
    {
	    if(response)
	    {
	        new arid = GetArendCarID(GetPlayerVehicleID(playerid));
	        if( arid != -1 )
	        {
	        	if(GetPVarInt(playerid, "ArendKey"))
				{
		            if(ArendInfo[arid][aPlayerID] == INVALID_PLAYER_ID || !IsPlayerConnected(ArendInfo[arid][aPlayerID]))
		            {
				        if(GetPlayerMoney(playerid) >= ArendInfo[arid][aCost])
				        {
				            SetPVarInt(playerid, "ArendKey", arid);
							new str[40];
							format(str, sizeof(str), "~r~ -%d$",ArendInfo[arid][aCost]);
							GameTextForPlayer(playerid,str,2000,1);
				            ArendInfo[arid][aPlayerID] = playerid;
				            SendClientMessage(playerid, 0xFFFFFFFF, "Вы успешно арендовали это ТС");
				            }
						else
						{
						    SendClientMessage(playerid, 0xAFAFAFFF, "У вас не хватает денег");
						    RemovePlayerFromVehicle(playerid);
						}
					}
					else
					{
					    SendClientMessage(playerid, 0xAFAFAFFF, "Этот транспорт уже арендуют");
					    RemovePlayerFromVehicle(playerid);
					}
				}
				else
				{
					SendClientMessage(playerid,0xAFAFAFFF,"Вы уже арендуете транспорт");
					RemovePlayerFromVehicle(playerid);
				}
			}
	    }
	    else
	    {
	        RemovePlayerFromVehicle(playerid);
	    }
	    return 1;
	}
	return 1;
}
stock GetVehicleName(model)
{
 	new name[32];
 	switch(model)
 	{
		default:  name = "Так то лучше)";
 	}
 	return name;
}


 

Кто возьмется напишите свой ВК - и ценник

Отредактировано пользователем keyl

Заметка от keyl , создано

3.2. Код больше 10 строк необходимо брать в теги "Код" и "Спойлер". Как это сделать рассказано в разделе "FAQ".

Устное предупреждение.

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

vk.com/idtest79 - 100 rub

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Закрыто!

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
Гость
Эта тема закрыта для публикации ответов.

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

  • Похожий контент

    • KAIF
      От KAIF


      Скачать файл GTA RolePlay-МОД,СБОРКА
      !!!!!ВСЕГО ОДНА КОПИЯ!!!! 
      Единственный мод GTA RP.
       
      Фракции:
      Правительство
      ГИБДД
      Полиция Южного
      ФСБ
      ЦГБ-А
      Автошкола
      Китайская мафия
      Русская Мафия
      Итальянская Мафия
      Американская Мафия
      Чеченская Мафия
      ВВС
      МЧС
      ОПГ Тяп-Ляп
      ОПГ Хади-Такташ
      СМИ Южного
      ФСИН
      В комплекте идёт СБОРКА И МОД.
      Единственный мод GTA RP.
      Добавил KAIF Добавлено 01.01.2024 Категория Моды Автор Aleksandr  
    • Redmondd
      От Redmondd
      Хочу сделать команду /gpsoff, которая убирает метку
    • Redmondd
      От Redmondd
      Когда в игре ввожу команду /gps, нажимаю на Важные места то окно просто закрывается, так же с Государственными организациями и Вокзалами
       
    • Redmondd
      От Redmondd
      При запуске сервера в консоли пишет: Started server on port: 7777, with maxplayers: 500 lanmode is OFF.
      И когда захожу на сервер пишет server didnt respond
       
      ---------- Loaded log file: "server_log.txt". ---------- SA-MP Dedicated Server ---------------------- v0.3.7-R2, (C)2005-2015 SA-MP Team filterscripts = ""  (string) Server Plugins --------------  Loading plugin: mysql   > MySQL plugin R7-2 successfully loaded.   Loaded.  Loading plugin: sscanf  ===============================       sscanf plugin loaded.          Version:  2.8.1    (c) 2012 Alex "Y_Less" Cole  ===============================   Loaded.  Loading plugin: dc_cmd   Daniel's CMD plugin v2.8     (c) 2014 Daniel_Cortez         www.pro-pawn.ru   Loaded.  Loading plugin: streamer *** Streamer Plugin v2.7.9 by Incognito loaded ***   Loaded.  Loaded 4 plugins. Started server on port: 7777, with maxplayers: 500 lanmode is OFF. Filterscripts ---------------   Loaded 0 filterscripts. Подключение к базе данных MYSQL успешно ---------------------------------- --------Redmond RP 01-------- ---------------------------------- Number of vehicle models: 5 Склады загружены успешно Дома (15 шт) загружены успешно  
    • SheikhMAN
      От SheikhMAN
      Ребят здравствуйте, не поможете ли? Думаю проблема с Microsoft visual C ++ Не запускается плагин streamer и в начало пихал и в конец, вообще на отказ не работает.