///////////////////////////////////////////////////////////////////////////
//// Мой новый корабль -здесь пишите любое, разницы нет
///////////////////////////////////////////////////////////////////////////
makeref(refShip,ShipsTypes[SHIP_Lodka]);
refShip.Name = "Lodka"; -это ID вашего корабля
refship.Soundtype = "lugger"; -озвучка вашего корабля
refShip.Class = 7; -класс
refShip.Cannon = CANNON_TYPE_NONECANNON; -тип установленных орудий (он будет генерится)
refShip.MaxCaliber = 12; -макс калибр орудий
refShip.Weight = Tonnes2CWT(10); -масска корабля (зависит от заноса на поворотах)
refShip.Capacity = 50; -трюм корабля
refShip.CannonsQuantity = 0; -общее кол-во орудий
refShip.rcannon = 0; -кол-во орудий на правом борту
refShip.lcannon = 0; -кол-во орудий на левом борту
refShip.fcannon = 0; -кол-во орудий на носу
refShip.bcannon = 0; -кол-во орудий на корме
refShip.MaxCrew = 12; -макс команда
refShip.MinCrew = 3; -мин команда
refShip.BoardingCrew = 2; -абордажники
refShip.GunnerCrew = 2; -стрелки
refShip.CannonerCrew = 16; -конониры
refShip.SailorCrew = 20; -моряки
refShip.SpeedRate = 7.0; -скорость
refShip.TurnRate = 50; -маневренность
refShip.Price = 500; -цена
refShip.HP = 100; -корпус
refShip.SP = 100; -паруса (в %)
refship.CanEncounter = false;
refship.Type.Merchant = false;
refship.Type.War = false;
refShip.fWindAgainstSpeed = 10.0; -бейдевинд
refShip.sea_enchantment = 4.0;
refShip.lowpolycrew = 3;
refShip.buildtime = 10; -время постройки

refShip.Massa = 10000.0;
refShip.Volume = 20.0;
refship.WindAgainstSpeed = 8.0;//boal

refship.InertiaAccelerationX = 3.0; refship.InertiaBrakingX = 2.0;
refship.InertiaAccelerationY = 14; refship.InertiaBrakingY = 5;
refship.InertiaAccelerationZ = 5.0; refship.InertiaBrakingZ = 3.0;

refShip.Height.Bombs.Y = 1.0; refShip.Height.Bombs.DY = 0.5;
refShip.Height.Grapes.Y = 2.0; refShip.Height.Grapes.DY = 1.0;
refShip.Height.Knippels.Y = 10.0; refShip.Height.Knippels.DY = 8.0;
refShip.Height.Balls.Y = 1.0; refShip.Height.Balls.DY = 0.5;

refship.Track.Enable = true;
refship.Track1.ZStart = 0.20;
refship.Track1.LifeTime = 9;
refship.Track1.Width = "1.0, 2.0";
refship.Track1.Speed = "5.2, 6.2";

refship.Track2.ZStart = -0.15;
refship.Track2.LifeTime = 7;
refship.Track2.Width = "1.2, 2.0";
refship.Track2.Speed = "0.15, 0.25";

/////////////////////// ВЕРФИ //////////////////////
void SetShipyardStore(ref NPChar)
{
int iTest_ship, i;
string attrName;

if (CheckAttribute(NPChar, "shipyard")) return; // еще есть корабли с того раза

SaveCurrentNpcQuestDateParam(npchar, "shipyardDate"); // дата заполнения верфи

if (bBettaTestMode)
{
for (i = 1; i <=SHIP_TYPES_QUANTITY; i++)
{
attrName = "ship" + i;
FillShipParamShipyard(NPChar, GenerateStoreShip(i-1), attrName);
}

return;
}

FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_TARTANE), "ship1");

iTest_ship = rand(2);
if (iTest_ship == 1)
{
FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_WAR_TARTANE), "ship2");
}
if (iTest_ship == 2)
{
FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_LUGGER), "ship2");
}

iTest_ship = rand(2);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_LUGGER), "ship3");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_SLOOP), "ship3");

iTest_ship = rand(3);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_SLOOP), "ship4");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_LUGGER), "ship4");

if (sti(PChar.rank) > 1)
{
iTest_ship = rand(4);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_SCHOONER), "ship5");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BARQUE), "ship5");

iTest_ship = rand(4);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_SCHOONER), "ship6");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BARQUE), "ship6");
}
с
}
if (sti(PChar.rank) > 5)
{
iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship11");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_FLEUT), "ship11");

iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship12");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_GALEON_L), "ship12");

iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship13");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_GALEON_L), "ship13");
}
if (sti(PChar.rank) > 8)
{
iTest_ship = rand(50);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_GALEON_L), "ship14");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_CORVETTE), "ship14");

iTest_ship = rand(70);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_GALEON_H), "ship15");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_PINNACE), "ship15");

iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship11");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_FLEUT), "ship11");

iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship11");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_Lodka), "ship29"); -здесь прописываем номер из файла ships.н

iTest_ship = rand(8);
if (iTest_ship == 1) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_BRIG), "ship12");
if (iTest_ship == 2) FillShipParamShipyard(NPChar, GenerateStoreShip(SHIP_GALEON_L), "ship12");

string = NoneBoat,"Нет корабля"
string = NoneBoatGen,"Нет корабля"
string = Boat,"Лодка"
string = BoatGen,"Лодку"
string = BoatAcc,"Лодки"
string = BoatDat,"Лодке"
string = Fort,"Форт"
string = FortGen,"Форт"
string = FortAcc,"Форта"
string = FortDat,"Форте"
string = Tartane,"Тартана"
string = TartaneGen,"Тартану"
string = TartaneAcc,"Тартаны"
string = TartaneDat,"Тартане"
string = WarTartane,"Баркас"
string = WarTartaneGen,"Баркас"
string = WarTartaneAcc,"Баркаса"
string = WarTartaneDat,"Баркасе"
string = Lugger,"Люггер"
string = LuggerGen,"Люггер"
string = LuggerAcc,"Люггера"
string = LuggerDat,"Люггере"
string = Sloop,"Шлюп"
string = SloopGen,"Шлюп"
string = SloopAcc,"Шлюпа"
string = SloopDat,"Шлюпе"
string = Schooner,"Шхуна"
string = SchoonerGen,"Шхуну"
string = SchoonerAcc,"Шхуны"
string = SchoonerDat,"Шхуне"
string = Barque,"Барк"
string = BarqueGen,"Барк"
string = BarqueAcc,"Барка"
string = BarqueDat,"Барке"
string = Caravel,"Каравелла"
string = CaravelGen,"Каравеллу"
string = CaravelAcc,"Каравеллы"
string = CaravelDat,"Каравелле"
string = Barkentine,"Баркентина"
string = BarkentineGen,"Баркентину"
string = BarkentineAcc,"Баркентины"
string = BarkentineDat,"Баркентине"
string = Brigantine,"Бригантина"
string = BrigantineGen,"Бригантину"
string = BrigantineAcc,"Бригантины"
string = BrigantineDat,"Бригантине"
string = Fleut,"Флейт"
string = FleutGen,"Флейт"
string = FleutAcc,"Флейта"
string = FleutDat,"Флейте"
string = Brig,"Бриг"
string = BrigGen,"Бриг"
string = BrigAcc,"Брига"
string = BrigDat,"Бриге"
string = Galeon_l,"Галеон"
string = Galeon_lGen,"Галеон"
string = Galeon_lAcc,"Галеона"
string = Galeon_lDat,"Галеонe"
string = Corvette,"Корвет"
string = CorvetteGen,"Корвет"
string = CorvetteAcc,"Корвета"
string = CorvetteDat,"Корвете"
string = Galeon_h,"Тяжёлый Галеон"
string = Galeon_hGen,"Тяжёлый Галеон"
string = Galeon_hAcc,"Тяжёлого Галеона"
string = Galeon_hDat,"Тяжёлом Галеоне"
string = Pinnace,"Пинас"
string = PinnaceGen,"Пинас"
string = PinnaceAcc,"Пинаса"
string = PinnaceDat,"Пинасе"
string = Frigate,"Фрегат"
string = FrigateGen,"Фрегат"
string = FrigateAcc,"Фрегата"
string = FrigateDat,"Фрегате"
string = LineShip,"Военный корабль"
string = LineShipGen,"Военный корабль"
string = LineShipAcc,"Военного корабля"
string = LineShipDat,"Военном корабле"
string = WarShip,"Линейный корабль"
string = WarShipGen,"Линейный корабль"
string = WarShipAcc,"Линейного корабля"
string = WarShipDat,"Линейном корабле"
string = Battleship,"Боевой корабль"
string = BattleshipGen,"Боевой корабль"
string = BattleshipAcc,"Боевого корабля"
string = BattleshipDat,"Боевом корабле"
string = Manowar,"Мановар"
string = ManowarGen,"Мановар"
string = ManowarAcc,"Мановара"
string = ManowarDat,"Мановаре"
string = SoleyRu,"Королевский мановар"
string = SoleyRuGen,"Королевский мановар"
string = SoleyRuAcc,"Королевского мановара"
string = SoleyRuDat,"Королевском мановаре"
string = XebekVML,"Щебека"
string = XebekVMLGen,"Щебеку"
string = XebekVMLAcc,"Щебеки"
string = XebekVMLDat,"Щебеке"
string = BrigSW,"Бриг"
string = BrigSWGen,"Бриг"
string = BrigSWAcc,"Брига"
string = BrigSWDat,"Бриге"
string = BrigQeen,"Бриг"
string = BrigQeenGen,"Бриг"
string = BrigQeenAcc,"Брига"
string = BrigQeenDat,"Бриге"
string = Corvette_quest,"Корвет"
string = Corvette_questGen,"Корвет"
string = Corvette_questAcc,"Корвета"
string = Corvette_questDat,"Корвете"
string = ArabellaShip,"Фрегат"
string = ArabellaShipGen,"Фрегат"
string = ArabellaShipAcc,"Фрегата"
string = ArabellaShipDat,"Фрегате"
string = Flyingdutchman,"Варшип"
string = FlyingdutchmanGen,"Варшип"
string = FlyingdutchmanAcc,"Варшипа"
string = FlyingdutchmanDat,"Варшипе"

string = Tartane,"Тартана"
string = TartaneGen,"Тартану"
string = TartaneAcc,"Тартаны"
string = TartaneDat,"Тартане"
string = Lodka,"Мой корабль" -Пишете название в И. падеже
string = Lodka,"Моему кораблю" -в дательном
string = Lodka,"Моего корабля" -в родительном
string = Lodka,"Моем корабле" -в предложном
string = WarTartane,"Баркас"
string = WarTartaneGen,"Баркас"
string = WarTartaneAcc,"Баркаса"
string = WarTartaneDat,"Баркасе"
string = Lugger,"Люггер"
string = LuggerGen,"Люггер"
string = LuggerAcc,"Люггера"
string = LuggerDat,"Люггере"

Tartane
{
Тартана появилась впервые в Средиземном море. Изначально это была небольшая рыбачья лодка с треугольным парусом, но хорошие ходовые характеристики сделали тартану очень популярным кораблем, используемым для каботажных плаваний и торговли между близко расположенными поселениями.
}

WarTartane
{
Баркас - большая лодка, на которую устанавливают малые пушки. Серьезным кораблем никогда не станет, но для пиратских или контрабандных вылазок широко применяется по всему миру.
}

Lugger
{
Люггер - небольшой корабль, созданный для перевозки грузов и охраны небольших конвоев. Несмотря на то, что вооружение люггера - слабое, а команда - небольшая, он специально сконструирован как для торговли, так и для сражений. Многие капитаны ценят люггер за его скорость и маневренность. Небольшие размеры не позволяют ему совершать дальние морские плавания.
}

Sloop
{
Обладая небольшой осадкой и великолепными ходовыми качествами, шлюп преставляет собой высокоэффективный разведывательный корабль, пригодный для берегового патрулирования и торговли.
}

Barque
{
Барк - корабль, приспособленный для дальних плаваний. Обладая вместительным трюмом и достаточной огневой мощью, барк считается одним из лучших кораблей в своем классе. Однако, большие размеры не позволяют ему развивать высокую скорость и быстро маневрировать, поэтому барк проигрывает по ходовым характеристикам более легким кораблям его класса.
}

Schooner
{
Хорошие ходовые качества этого корабля, вкупе с вместительным трюмом, сделали шхуну одним из самых привлекательных кораблей в качестве торгового судна у торговцев средней руки, которые не могут позволить себе приобрести флейт.
}

Tartane
{
Тартана появилась впервые в Средиземном море. Изначально это была небольшая рыбачья лодка с треугольным парусом, но хорошие ходовые характеристики сделали тартану очень популярным кораблем, используемым для каботажных плаваний и торговли между близко расположенными поселениями.
}

WarTartane
{
Баркас - большая лодка, на которую устанавливают малые пушки. Серьезным кораблем никогда не станет, но для пиратских или контрабандных вылазок широко применяется по всему миру.
}

Lodka
{
Мой корабль! ведь я его лично создал! неплохо бы было с новой моделькой...лан, и с этой сыграну! -здесь любое описание (только не это, думаю в аддон "не очень" войдет!). :)
}

Lugger
{
Люггер - небольшой корабль, созданный для перевозки грузов и охраны небольших конвоев. Несмотря на то, что вооружение люггера - слабое, а команда - небольшая, он специально сконструирован как для торговли, так и для сражений. Многие капитаны ценят люггер за его скорость и маневренность. Небольшие размеры не позволяют ему совершать дальние морские плавания.
}

[SHIPS_tartane]
sTextureName = ships\tartane.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_wartartane]
sTextureName = ships\wartartane.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_lugger]
sTextureName = ships\lugger.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_tartane]
sTextureName = ships\tartane.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_Lodka]
sTextureName = ships\tartane.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_wartartane]
sTextureName = ships\wartartane.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

[SHIPS_lugger]
sTextureName = ships\lugger.tga
wTextureWidth = 128
wTextureHeight = 128
picture = ship,0,0,128,128

void SetShipPictureDataByShipTypeName(string sType)
{
switch(sType)
{
case "tartane":
BI_intNRetValue[0] = 0+4*8;
BI_intNRetValue[1] = 0+4*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;
case "WarTartane": // fix
BI_intNRetValue[0] = 2+4*8;
BI_intNRetValue[1] = 2+4*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;
case "lugger":
BI_intNRetValue[0] = 0+0*8;
BI_intNRetValue[1] = 0+0*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "sloop":
BI_intNRetValue[0] = 0+1*8;
BI_intNRetValue[1] = 0+1*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "barque":
BI_intNRetValue[0] = 0+3*8;
BI_intNRetValue[1] = 0+3*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "schooner":
BI_intNRetValue[0] = 0+2*8;
BI_intNRetValue[1] = 0+2*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "caravel":
BI_intNRetValue[0] = 2+0*8;
BI_intNRetValue[1] = 2+0*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "lugger":
BI_intNRetValue[0] = 0+0*8;
BI_intNRetValue[1] = 0+0*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;
case "Lodka":
BI_intNRetValue[0] = 2+3*8;
BI_intNRetValue[1] = 2+3*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "sloop":
BI_intNRetValue[0] = 0+1*8;
BI_intNRetValue[1] = 0+1*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;

case "barque":
BI_intNRetValue[0] = 0+3*8;
BI_intNRetValue[1] = 0+3*8 + 1;
BI_intNRetValue[2] = BI_ICONS_TEXTURE_SHIP1;
break;