Jump to content
Sign in to follow this  
Graf

НПС "Вытащить вещь из аппарели"

Recommended Posts

НПС "Вытащить вещь из аппарели"

Вещь должна лежать в 4 слоте инвентаря.

Взято с архива. В скрипте не было имени или ника автора.

Как же добавить НПС..

Открываем Server/resource/script/MisSdk/npcsdk.lua и ищем функцию MsgProc.

Вставляем в неё:

elseif item.func == UnfuseNpc then
			return UnfuseNpc(character)

Открываем Server/resource/script/calculate/function.lua и вставляем:

function UnfuseNpc(role)
local Apparel = GetChaItem(role,2,3)
local ApparelID = GetItemID(Apparel)
local MainApparelID = ApparelID
if Apparel == nil then
HelpInfo(role,0,"Вы должны положить вещь в 4 слот инвентаря. ")
return
end

if MainApparelID > 5000 then
MainApparelID = GetItemAttr(Apparel,ITEMATTR_VAL_FUSIONID)
else
HelpInfo(role,0,"В вашей аппарели отсутствует вещь! ")
return
end

local ApparelFusedID = GetItemAttr(Apparel,ITEMATTR_VAL_FUSIONID)
if ApparelFusedID == 0 then
HelpInfo(role,0,"В вашей аппарели отсутствует вещь! ")
return
end

local EquipGems = GetItemForgeParam(Apparel,1)
local r1 = 0
local r2 = 0
r1,r2 = MakeItem(role,MainApparelID,1,18)
GiveItem(role,0,ApparelID,1,1)
local Remove = 0
Remove = RemoveChaItem(role,MainApparelID,2,2,3,2,1)
if Remove == 0 then
HelpInfo(role,0,"Ошибка удаления предмета! ")
return
end

local NewEquip = GetChaItem(role,2,r2)
local ParanTransfered = SetItemForgeParam(NewEquip,1,EquipGems)
if ParanTransfered == 0 then
HelpInfo(role,0,"Не удалось перенести характеристики! ")
return
else
HelpInfo(role,0,"Вещь успешно вытащена из аппарели! ")
RefreshCha(role)
end
end

 

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×