Добавлено (13.11.2011, 23:19)
---------------------------------------------

Никому не обязана, ни к чему не привязана, никому не подобна, потому и свободна...

Добавлено (14.11.2011, 14:25)
---------------------------------------------
makdm, Попробуй вставь это на замену старых строчек...Мне памогло!
[cut noguest=sgm_functions.script]-- 'Работа с электронными деньгами.
function relocate_web_money(num,type,with_news,show_time)
local web_money=read_variable("actor_web_money")
if web_money==nil then web_money=0 end
if db.actor then
if type == "in" then
write_variable("actor_web_money",web_money+num)
elseif type == "out" then
write_variable("actor_web_money",web_money-num)
end
if with_news==nil or with_news==true then
news_manager.relocate_web_money(db.actor,type,num,show_time)
end
end
end
-- 'Извлечение денег из трупа.
function extract_money_from_corpse(npc)
local extract_value=0
local npc_rank = ranks.get_obj_rank_name(npc)
if has_alife_info("sgm_achievements_marauder") then
if npc_rank~=nil then
if ReadCorpseMoney(npc:section())==0 then
if npc_rank=="novice" then extract_value=math.random(10,50)+math.random(5,25)
elseif npc_rank=="experienced" then extract_value=math.random(20,100)+math.random(10,50)
elseif npc_rank=="veteran" then extract_value=math.random(100,200)+math.random(50,100)
elseif npc_rank=="master" then extract_value=math.random(200,500)+math.random(100,250)
end
else
local achievement=ReadCorpseMoney(npc:section())/100*40
extract_value=ReadCorpseMoney(npc:section())+achievement
end
end
else
if npc_rank~=nil then
if ReadCorpseMoney(npc:section())==0 then
if npc_rank=="novice" then extract_value=math.random(10,50)
elseif npc_rank=="experienced" then extract_value=math.random(20,100)
elseif npc_rank=="veteran" then extract_value=math.random(100,200)
elseif npc_rank=="master" then extract_value=math.random(200,500)
end
else
extract_value=ReadCorpseMoney(npc:section())
end
end
end
local bringed_money=math.floor(extract_value)
relocate_web_money(bringed_money,"in",false)
news_manager.send_tip(db.actor,bringed_money.." "..game.translate_string("st_bankir_ru"),0,"money",3000,nil,"st_loot_entry")
inc_counter("stat_s_trupov",bringed_money)
end
-- 'Переброска предметов от одного обьекта к другому.
function relocate_items_with_inv_box(box,victim)
local function calc(temp,item)
if item~=nil then
box:transfer_item(item,victim)
end
end
box:iterate_inventory_box(calc,box)
end[/cut]