(Scr) Плавающая подводная лодка

Описание: Готовые решения скриптов, filterScript
Модератор: SJplayer

Sprite M
Автор темы, Ст. сержант
Ст. сержант
Аватара
Sprite M
Автор темы, Ст. сержант
Ст. сержант
Сообщения: 83
Зарегистрирован: 5 июня 2013
С нами: 10 лет 9 месяцев

#1 Sprite » 2 июня 2014, 19:29

Плавающая подводная лодка.png


Скрипт который позволяет нам двигать подводную лодку, что в доках Сан-Фьерро.

Команды:

/submarine - телепортирует нас к позиции рулевого
/test - телепортироваться к порту Сан-Фьерро

Код

Код: Выделить всё

#include <a_samp>
#include <zcmd>

main()
{
    print(
"Autor: KaLu\nPomysł: Jingles");
}

new 
submarinesubmarine_object;

public 
OnFilterScriptInit()
{
    
submarine CreateVehicle(484, -1899.15631476.78915.74220000);
    
submarine_object CreateObject(995800000180), AttachObjectToVehicle(submarine_objectsubmarine005.74220.000000.00000180.00000);
    
LinkVehicleToInterior(submarine, (submarine MAX_PLAYERS));
    return 
1;
}

public 
OnFilterScriptExit()
{
    
DestroyVehicle(submarine), DestroyObject(submarine_object);
    return 
1;
}

public 
OnPlayerConnect(playerid)
{
    
RemoveBuildingForPlayer(playerid9958, -1899.15631476.78915.74220.25);
    
RemoveBuildingForPlayer(playerid10285, -1899.15631476.78915.74220.25);
    return 
1;
}

CMD:submarine(playeridparams[])
{
    if(!
IsPlayerInRangeOfPoint(playerid30.0, -1899.15631476.78915.7422) || GetPlayerVirtualWorld(playerid) != 0)
    {
        
SendClientMessage(playerid0xBA1010FF"Нужно быть в порту, в котором пришвартована подводная лодка.");
        return 
1;
    }
    
    new 
Float:submarine_pos[3]; GetVehiclePos(submarinesubmarine_pos[0], submarine_pos[1], submarine_pos[2]);
    
    if(!
IsPlayerInRangeOfPoint(playerid30.0submarine_pos[0], submarine_pos[1], submarine_pos[2]) || IsVehicleInUse(submarine) != INVALID_PLAYER_ID)
    {
        
SendClientMessage(playerid0xBA1010FF"Судно не в вашем районе или занято другим игроком.");
        return 
1;
    }
    
    
SendClientMessage(playerid0xBA1010FF"Оставайтесь на месте в подводной лодке.");
    
    return 
PutPlayerInVehicle(playeridsubmarine0);
}

CMD:test(playeridparams[])
{
    
SetPlayerPos(playerid, -1899.15631476.789110.7422);
    return 
1;
}

stock IsVehicleInUse(vehicleid)
{
    for(new 
i!= MAX_PLAYERSi++)
    {
        if(
GetPlayerVehicleID(i) == vehicleid)
        {
            return 
i;
        }
    }
    return 
INVALID_PLAYER_ID;


Вернуться в «Скрипты / FS»

Кто сейчас на форуме (по активности за 5 минут)

Сейчас этот раздел просматривают: 5 гостей