Создай Сервер Пиратии
Наш сайт переехал на http://forum.all-piratia.ru/index.php

[Гайд]Очки чести за убийство в Аргенте

Перейти вниз

[Гайд]Очки чести за убийство в Аргенте

Сообщение автор Andrei123 в Пн Янв 09, 2012 12:34 am

Сейчас я вам расскажу как сделать чтобы за убийство в PvP зоне Аргента давались Очки Чести.
Откройте файл functions.lua который находится в папке resource\script\calculate
И найдите там такой код: (у вас он может быть немного другим)

local MGPK_MapNameNum = 10
local MGPK_MapName = {}
MGPK_MapName[0] = "puzzleworld"
MGPK_MapName[1] = "puzzleworld2"
MGPK_MapName[2] = "abandonedcity"
MGPK_MapName[3] = "abandonedcity2"
MGPK_MapName[4] = "abandonedcity3"
MGPK_MapName[5] = "darkswamp"
MGPK_MapName[6] = "hell"
MGPK_MapName[7] = "hell2"
MGPK_MapName[8] = "hell3"
MGPK_MapName[9] = "hell4"
MGPK_MapName[10] = "hell5"

И добавьте туда:

MGPK_MapName[11] = "garner"

После того как добавили не забудьте это:

local MGPK_MapNameNum = 10

Заменить на:

local MGPK_MapNameNum = 11

Ниже этой функции будут строчки:

local ATKER_Get_Ry = 0
local DEFER_Get_Ry = 0

local ATKER_Get1_LD = 0
local DEFER_Get1_Ry = 0

И сразу после них вставляем:

if map_name_ATKER == "garner" or map_name_DEFER == "garner" or map_name_ATKER =="bountypk" or map_name_DEFER == "bountypk" then

local Lv_ATKER = Lv( ATKER )
local Lv_DEFER = Lv( DEFER )
local Lv_dif = Lv_ATKER - Lv_DEFER
if Lv_dif < 15 and Lv_dif > -15 then
ATKER_Get1_HONOR = 5
DEFER_Get1_HONOR = -5
SystemNotice ( ATKER ,"Вы убили противника и получаете 5 Очков Чести " )
SystemNotice ( DEFER ,"Вы потерпели поражение от противника и теряете 5 Очков Чести " )
end

if Lv_dif >= 15 then
ATKER_Get1_HONOR = 0
DEFER_Get1_HONOR = 0
SystemNotice ( ATKER , "Уровень игрока слишком маленький для получение Очков Чести " )
SystemNotice ( DEFER , "Вас убил слишком сильный противник для потери Очков Чести " )
end

if Lv_dif <= -14 then
ATKER_Get1_HONOR = 10
DEFER_Get1_HONOR = -10
SystemNotice ( ATKER ,"Вы убили сильного противника и получаете 10 Очков Чести " )
SystemNotice ( DEFER ,"Вас убил слабый противник и вы теряете 10 очков Чести " )
end

local ATKER_LD = GetChaItem2 ( ATKER , 2 , 3849 )
local DEFER_RYZ1 = GetChaItem2 ( DEFER , 2 , 3849 )
local FightingPoint=GetItemAttr ( ATKER_LD , ITEMATTR_MAXENERGY)
local HonorPoint = GetItemAttr ( DEFER_RYZ1 , ITEMATTR_MAXENERGY)
local FightingPoint = FightingPoint + ATKER_Get1_LD
local HonorPoint = HonorPoint + DEFER_Get1_Ry
local honor_A = GetItemAttr ( ATKER_LD , ITEMATTR_VAL_STR)
local honor_D = GetItemAttr ( DEFER_RYZ1 , ITEMATTR_VAL_STR)
local honor_A_add = honor_A + ATKER_Get1_HONOR
local honor_D_add = honor_D + DEFER_Get1_HONOR
if ATKER == DEFER then
ATKER_Get1_LD = ATKER_Get1_LD-1
end
SetItemAttr ( ATKER_LD , ITEMATTR_MAXENERGY,FightingPoint)
SetItemAttr ( DEFER_RYZ1 , ITEMATTR_MAXENERGY,HonorPoint)
local atk_name = GetChaDefaultName ( ATKER )
local def_name = GetChaDefaultName ( DEFER )
local map_copy = GetChaMapCopy ( ATKER )
SetItemAttr ( ATKER_LD, ITEMATTR_VAL_STR , honor_A_add )
SetItemAttr ( DEFER_RYZ1, ITEMATTR_VAL_STR, honor_D_add )

MapCopyNotice ( map_copy , Notice_map )

end

Всё, теперь PvP система работает и за убийство игроков в Аргенте будет даваться честь.
avatar
Andrei123

Сообщения : 13
Дата регистрации : 2012-01-08
Возраст : 20
Откуда : Из дома

http://crack3.ucoz.ru/

Вернуться к началу Перейти вниз

Вернуться к началу

- Похожие темы

 
Права доступа к этому форуму:
Вы не можете отвечать на сообщения