e muốn add item mới vào vượt ải qua 1 ải được nhận 1 vật phẩm mình muốn. code
Additem(6,1,3012,0,0,0)
mình add toàn làm lag quái :
-- description : NPC死亡
-- author : wangbin
-- datetime : 2005-06-06

Include("\\script\\missions\\challengeoftime\\incl ude.lua")
Include("\\script\\missions\\challengeoftime\\npc. lua")
IL("RELAYLADDER");
Include("\\script\\event\\storm\\function.lua") --Storm
Include("\\script\\event\\great_night\\huangzhizha ng\\event.lua")
Include("\\script\\activitysys\\g_activity.lua");
Include("\\script\\activitysys\\functionlib.lua");
Include("\\script\\lib\\common.lua");
Include("\\script\\event\\change_destiny\\mission. lua"); -- 逆天改命

--120级技能修炼
Include("\\script\\task\\task_award_extend.lua")
-- 越南资料片生日活动
Include("\\script\\event\\birthday_jieri\\200905\\ class.lua");
-- 闯关活动每日排行榜
Include("\\script\\missions\\challengeoftime\\rank _perday.lua");
-- 闯关调整 2011.03.01
Include("\\script\\lib\\awardtemplet.lua")

Include("\\script\\missions\\challengeoftime\\doub leexp.lua")
--Phong V﹏ L謓h B礽 t?i h?tr?t﹏ th?- Modified By DinhHQ - 20110916
Include("\\script\\activitysys\\config\\1005\\part ysupport.lua")

function award_player(player, exp, objects, time)
local OldPlayerIndex = PlayerIndex;
PlayerIndex = player;

--Storm 增加积分
if(GetMissionV(VARV_MISSION_RESULT) == 1) then --最终奖励
storm_addpoint(2, LIMIT_FINISH - time)
end

-- 奖励经验
local experience = exp;
if (type(exp) == "function") then
experience = exp(time);
end
if (experience ~= 0) then
local point = experience * 10000;
--给与120技能熟练度
AddExp_Skill_Extend(point);
if(greatnight_huang_event(3) == 1) then
elseif(greatnight_huang_event(3) == 2) then
point = point * 2;
elseif(greatnight_huang_event(3) == 3) then
point = point * 3;
else
end;
-- 是否队长
local name = GetMissionS(VARS_TEAM_NAME);
if (GetName() == name) then
point = point * (1 + 0.2); --奖励更多
end;
if (advanced()) then
point = point * 2;
end

point = BigBoss:AddChuangGuanPoint(point);
point = Chuangguan_checkdoubleexp(point)
AddOwnExp(point);
Msg2Player("<#>B筺 t 頲" .. point .. "甶觤 kinh nghi謒.");
end

-- 奖励随机物品
if (objects ~= nil) then
award_random_object(objects, player);
end

-- 恢复玩家索引
PlayerIndex = OldPlayerIndex;
end

-- 掉落物品
function drop_item(index, count)
local x, y, world = GetNpcPos(index);
if (count ~= 0) then
for i = 1, count do
-- 掉落五花
DropItem(world, x, y, -1, 1, 2, 0, 5, 0, 0, 0, 0, 0, 0, 0, 0);
end
end
-- 掉落礼品盒
if ( random(1,100) <= 5 ) then
DropItem(world, x, y, -1, 6, 1, 1392, 0, 0, 0, 0, 0, 0, 0, 0, 0);
end
end

-- 奖励
function award_batch_item(item, npc_index, time)
-- 给每个队员经验和奖励
local index = 0;
local player = 0;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
award_player(player, item[1], item[3], time);
end
if (index == 0) then
break;
end
end

-- 掉落物品
drop_item(npc_index, item[2]);
end

-- 批次奖励
function award_batch(batch, npc_index)
local map = current_npc_map();
award_batch_item(map[batch][2], npc_index, 0);

local tbAllPlayer = {};
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
tbAllPlayer[getn(tbAllPlayer)+1] = player;
end
if (index == 0) then
break;
end
end

local n_level = 0;
if (advanced()) then
n_level = 2
else
n_level = 1
end

G_ACTIVITY:OnMessage("Chuanguan", batch, tbAllPlayer, n_level);

--Phong V﹏ L謓h B礽 t?i h?tr?t﹏ th?- Modified By DinhHQ - 20110916
tbPVLB_PtSpprt:COTAward(batch, tbAllPlayer)

-- LLG_ALLINONE_TODO_20070802
award_batch_extend(batch)
end


--奖励的扩展函数，方便未来其它活动� �用。
--触发条件：当本关所有NPC死亡后，并� �于所有玩家基本奖励后，将被调用。
--此时的PlayerIndex是打死最后一只本关怪 的人
--如果需要对所以玩家奖励时，必须使� �GetNextPlayer的方式，一一获得。
--by Romandou
--Change number of award - By DinhHQ - 20120312
local tbAward_batch =
{
-- [10] = 1,
-- [20] = 2,
-- [28] = 2,
-- [29] = 3,
[15] = 2,
[28] = 2,
}

local tbPro = {szName="B秓 Rng Vt 秈",tbProp={6, 1, 2742, 1, 0, 0},}

function award_batch_extend(batch)
award_batch_contribution(batch)
local nOldPlayer = PlayerIndex;
local index = 0;
local player = 0;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
PlayerIndex = player;
-- 越南生日活动时间挑战赛的过关数
SetTask(tbBirthday0905.tbTask.tsk_toll_cg_passcoun t, batch);
-- 闯关调整 by wangjingjun 2011.03.01
if %tbAward_batch[batch] and GetMissionV(VARV_BATCH_MODEL) == 1 then
%tbPro.nCount = %tbAward_batch[batch]
tbAwardTemplet:GiveAwardByList(%tbPro, "chuangguan award", 1)
end
-- 小聂弑尘奖励
if GetMissionV(VARV_BATCH_MODEL) == 1 and batch == GetMissionV(VARV_XIAONIESHICHEN_BATCH) then
%tbPro.nCount = 1
tbAwardTemplet:GiveAwardByList(%tbPro, "xiaonieshichen awrad", 1)

local nExpCount = 10000000
nExpCount = Chuangguan_checkdoubleexp(nExpCount)
tbAwardTemplet:GiveAwardByList({nExp_tl=1,nCount = nExpCount,}, "xiaonieshichen awrad", 1)
end

end
if (index == 0) then
break;
end
end
PlayerIndex = nOldPlayer;
end

function award_batch_worldcup(batch)
-- 世界杯活动的处理
if checkPayCardTime() ~= 1 then
return
end;

local oldPlayer = PlayerIndex
local index = 0;
local player = 0;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
PlayerIndex = player
if batch==20 then
_Debug("<<未翻译>>"..batch.."<<未翻译>>");
worldcup_challenge_addpoint(1);
elseif batch==28 then
_Debug("<<未翻译>>"..batch.."<<未翻译>>");
worldcup_challenge_addpoint(1);
end;
end
if (index == 0) then
break;
end
end
PlayerIndex = oldPlayer
end

--加帮会贡献度
function award_batch_contribution(batch)
local nOldPlayer = PlayerIndex;
local index = 0;
local player = 0;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
PlayerIndex = player;
tongaward_challengeoutoftime(batch);
end
if (index == 0) then
break;
end
end
PlayerIndex = nOldPlayer;
end
-- 通关奖励
function award_success(npc_index, time)
local item = {};
if (advanced()) then
item = map_haward_success; -- 高级比赛通关奖励
else
item = map_laward_success; -- 初级比赛通关奖励
end
award_batch_item(item, npc_index, time);
end

-- 比赛胜利
function success(npc_index)
-- 统计时间
local time = GetMissionV(VARV_BOARD_TIMER);
time = time + INTERVAL_BOARD * 60 - floor(GetMSRestTime(MISSION_MATCH, TIMER_BOARD) / 18);
SetMissionV(VARV_BOARD_TIMER, time);

-- 标记为通关
SetMissionV(VARV_MISSION_RESULT, 1);

-- 通关奖励
award_success(npc_index, time);

--local laddertime = LIMIT_FINISH - time;
local laddertime = time;
local teamname = GetMissionS(VARS_TEAM_NAME)
local nLeaderFaction = GetMissionS(VARS_TEAMLEADER_FACTION)
local nLeaderGender = GetMissionS(VARS_TEAMLEADER_GENDER)
local MapId = SubWorldIdx2ID(SubWorld)
local LadderId = 10179;
if (map_isadvanced[MapId] == 1) then
LadderId = 10180;
end

-- DEBUG
--print(format("team name:%s", teamname));

-- 排行榜
local bfind = 0
for i = 1, 10 do
name , value = Ladder_GetLadderInfo(LadderId, i)
if (name == teamname) then
bfind = 1
if ( laddertime > value) then
Ladder_NewLadder(LadderId, teamname, -1 * laddertime, 1, nLeaderFaction, nLeaderGender)
break
end
end
end

if (bfind == 0) then
Ladder_NewLadder(LadderId, teamname, laddertime, 1, nLeaderFaction, nLeaderGender)
end

Ladder_NewLadder(DailyRankLadderId, teamname, -1 * laddertime, 1)
-- 更新每天的成绩
if (advanced()) then
local nOldPlayer = PlayerIndex;
local index = 0;
local player = 0;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
PlayerIndex = player;
ndate = tonumber(GetLocalDate("%y%m%d"));
update_gbtask(time);
if (GetTask(tsk_rank_lastdate) == ndate) then
if (GetTask(tsk_rank_lastscore) > time) then
SetTask(tsk_rank_lastscore, time);
end
else
SetTask(tsk_rank_2thdate, GetTask(tsk_rank_lastdate));
SetTask(tsk_rank_2thscore, GetTask(tsk_rank_lastscore));
SetTask(tsk_rank_lastdate, ndate);
SetTask(tsk_rank_lastscore, time);
end
end
if (index == 0) then
break;
end
end
PlayerIndex = nOldPlayer;

end
broadcast(GetMissionS(VARS_TEAM_NAME) .. "чi ng? th緉g l頸 ho祅 th祅h nhi謒 v?ng th阨 gian,  d鬾g" .. floor(time / 60) .. "ph髏" .. mod(time, 60) .. "gi﹜! Trc "..laddertime.." gi﹜");

-- DEBUG
--print(format("used time: %d seconds", time));

-- 如果用时少于12分钟，从隐藏关卡中随 机选取1个开启
if (time < 20 * 60) then
local map = map_lo_hidden_npc;
if (advanced()) then
map = map_hi_hidden_npc;
end
local index = random(1, getn(map));
close_board_timer();
Msg2MSAll(MISSION_MATCH, "<#>Nhi謒 v?b?m藅  kh醝 ng r錳");
create_all_npc(map[index]);
else
-- 踢回报名点
kickout();
end
end

-- 隐藏任务奖励
function award_hidden_mission()
local index = 0;
local player = 0;
local OldPlayerIndex = PlayerIndex;
while (1) do
index, player = GetNextPlayer(MISSION_MATCH, index, 0);
if (player > 0) then
award_random_object(map_random_awards, player);
-- 越南生日活动时间挑战赛的过关数
PlayerIndex = player;
SetTask(tbBirthday0905.tbTask.tsk_toll_cg_passcoun t, 29);

if GetMissionV(VARV_BATCH_MODEL) == 1 then
--Change feature award - Modified By DinhHQ - 20120326
-- %tbPro.nCount = 3
-- tbAwardTemplet:GiveAwardByList(%tbPro, "chuangguan award", 1)
end

end
if (index == 0) then
break;
end
end
PlayerIndex = OldPlayerIndex;
end

-- 批次结束
function batch_finish(index)

if (GetMissionV(VARV_MISSION_RESULT) == 1) then
-- 隐藏任务奖励
award_hidden_mission();

if GetMissionV(VARV_BATCH_MODEL) == 1 and GetMissionV(VARV_BOARD_TIMER) <= CHUANGGUAN30_TIME_LIMIT then
add_transfer_npc()
else
-- 踢回报名点
kickout();
end
else
-- 通告
local batch = GetMissionV(VARV_NPC_BATCH);
Msg2MSAll(MISSION_MATCH, GetMissionS(VARS_TEAM_NAME) .. "чi ng? ti猽 di謙 to祅 b?" .. batch .. "m qu竔!");

-- 奖励
award_batch(batch, index);

if (batch >= get_batch_count()) then
-- 结束
success(index);
else
-- 产生下一批怪
batch = batch + 1;
SetMissionV(VARV_NPC_BATCH, batch);
create_batch_npc(batch);
end
end
end

-- NPC死亡奖励
function NpcDeathAward(index)
local nNpcSettingIdx = GetNpcSettingIdx(index);
tbChangeDestiny:completeMission_NieShiChen(nNpcSet tingIdx);
end

function OnDeath(index)
NpcDeathAward(index);
local count = GetMissionV(VARV_NPC_COUNT) - 1;
if (count >= 0) then
SetMissionV(VARV_NPC_COUNT, count);
if (count == 0) then
batch_finish(index);
end
end
end