网页传奇类页游烈焰脚本之充值福利官NPC代码

function ontalk3016(npc,event,player)
local yb = (player:get_vcoin_worth())/10000;
local todayyb = player:get_param(333)/10000;
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
               <font size="20px"><font color='#ffd306'>充值福利官</font></font>
#&talk_line#&
累计充值:<font color='#FFCC00'>]]..yb..[[W元宝</font>
今日充值:<font color='#FFCC00'>]]..todayyb..[[W元宝</font>
#&talk_line#&

             <font size="16px"><u><a href='event:M2402,1'>领取累计充值豪礼</a></u></font>
           说明：终极装备，神兵利器
#&talk_line#&

             <font size="16px"><u><a href='event:M2402,88'>领取每日充值豪礼</a></u></font>
           说明：高级材料，快速强力
    
#&talk_line#&

 

]]);
end

function ontalk3016_1(npc,event,player)
local yb = (player:get_vcoin_worth())/10000;
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
               <font size="20px"><font color='#ffd306'>充值福利官</font></font>
#&talk_line#&
累计充值:<font color='#FFCC00'>]]..yb..[[W元宝</font>

#&item10404#&  <u><a href='event:M2402,1001'>领取黄金礼包</a></u> 充值达到50万元宝  
#&item10405#&  <u><a href='event:M2402,1011'>领取白金礼包</a></u> 充值达到250万元宝
#&item10406#&  <u><a href='event:M2402,1021'>领取钻石礼包</a></u> 充值达到500万元宝
#&item10407#&  <u><a href='event:M2402,1031'>领取皇冠礼包</a></u> 充值达到1000万元宝
#&item10408#&  <u><a href='event:M2402,1041'>领取至尊礼包</a></u> 充值达到2000万元宝

          <u><a href='event:M2402,0'>返回上页</a></u>
]]);
end

--黄金充值礼包 10404
--白金充值礼包 10405
--钻石充值礼包 10406
--皇冠充值礼包 10407
--至尊充值礼包 10408

function ontalk3016_1001(npc,event,player)
 if player:get_vcoin_worth() >= 500000 then    ----检测充值元宝
  if player:get_param(222) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 1 then    ----检测背包数量
     player:add_item(10404,1,0);             ----黄金充值礼包     
     player:set_param(222,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]在福利官领取了[黄金充值礼包],充值50W元宝即可获得哦!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足1格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过[黄金充值礼包]了");
  end
 else
  player:alert(10,0,0,"累计充值50W元宝,才能领取[黄金充值礼包]");
 end
 ontalk3016_1(npc,0,player,0);
end
function ontalk3016_1011(npc,event,player)
 if player:get_vcoin_worth() >= 2500000 then    ----检测充值元宝
  if player:get_param(223) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 1 then    ----检测背包数量
     player:add_item(10405,1,0);             ----黄金充值礼包     
     player:set_param(223,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]在福利官领取了[白金充值礼包],充值250W元宝即可获得哦!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足1格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过[白金充值礼包]了");
  end
 else
  player:alert(10,0,0,"累计充值250W元宝,才能领取[白金充值礼包]");
 end
 ontalk3016_1(npc,0,player,0);
end
function ontalk3016_1021(npc,event,player)
 if player:get_vcoin_worth() >= 5000000 then    ----检测充值元宝
  if player:get_param(224) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 1 then    ----检测背包数量
     player:add_item(10406,1,0);             ----黄金充值礼包     
     player:set_param(224,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]在福利官领取了[钻石充值礼包],充值500W元宝即可获得哦!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足1格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过[钻石充值礼包]了");
  end
 else
  player:alert(10,0,0,"累计充值500W元宝,才能领取[钻石充值礼包]");
 end
 ontalk3016_1(npc,0,player,0);
end
function ontalk3016_1031(npc,event,player)
 if player:get_vcoin_worth() >= 10000000 then    ----检测充值元宝
  if player:get_param(225) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 1 then    ----检测背包数量
     player:add_item(10407,1,0);             ----黄金充值礼包     
     player:set_param(225,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]在福利官领取了[皇冠充值礼包],充值1000W元宝即可获得哦!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足1格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过[皇冠充值礼包]了");
  end
 else
  player:alert(10,0,0,"累计充值1000W元宝,才能领取[皇冠充值礼包]");
 end
 ontalk3016_1(npc,0,player,0);
end
function ontalk3016_1041(npc,event,player)
 if player:get_vcoin_worth() >= 20000000 then    ----检测充值元宝
  if player:get_param(226) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 1 then    ----检测背包数量
     player:add_item(10408,1,0);             ----黄金充值礼包     
     player:set_param(226,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]在福利官领取了[至尊充值礼包],充值2000W元宝即可获得哦!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足1格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过[至尊充值礼包]了");
  end
 else
  player:alert(10,0,0,"累计充值2000W元宝,才能领取[至尊充值礼包]");
 end
 ontalk3016_1(npc,0,player,0);
end

 

function ontalk3016_88(npc,event,player)
local todayyb = player:get_param(333)/10000;
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
               <font size="20px"><font color='#ffd306'>充值福利官</font></font>
#&talk_line#&
今日充值:<font color='#FFCC00'>]]..todayyb..[[W元宝</font>

#&item10136#&  <u><a href='event:M2402,881'>领取今日充值礼包1</a></u> 充值达到5万元宝  
#&item10137#&  <u><a href='event:M2402,882'>领取今日充值礼包2</a></u> 充值达到50万元宝
#&item10138#&  <u><a href='event:M2402,883'>领取今日充值礼包3</a></u> 充值达到100万元宝
#&item10139#&  <u><a href='event:M2402,884'>领取今日充值礼包4</a></u> 充值达到200万元宝
#&item10140#&  <u><a href='event:M2402,885'>领取今日充值礼包5</a></u> 充值达到500万元宝

          <u><a href='event:M2402,0'>返回上页</a></u>
]]);
end

function ontalk3016_881(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
             <font color="#ffd306">当日充值达到5万元宝礼包</font>
#&talk_line#&

#&item19205#&  5级灵羽*1  
#&item18100#&  烈焰锻造石*1
#&item10079#&  内功经验卷*1
#&item10303#&  超级功勋令牌*2
#&item10306#&  超级飞升修为丹*2
#&talk_line#&
               <font size="22px">【<u><a href='event:M2402,8811'>点击领取</a></u>】</font>
          <u><a href='event:M2402,88'>返回上页</a></u>
]]);
end
function ontalk3016_8811(npc,event,player)
 if player:get_param(333) >= 50000 then    ----检测每日充值元宝
  if player:get_param(232) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 7 then   ----检测背包数量
      player:add_item(19205,1,1);---5级灵羽
      player:add_item(18100,1,1);--烈焰锻造石
      player:add_item(10079,1,1);--内功经验卷
      player:add_item(10303,2,1);--超级功勋令牌
      player:add_item(10306,2,1);--超级飞升修为丹
      player:set_param(297,1);
      player:set_param(232,1);
      g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]领取每日首充礼包,充值5W元宝即可领取!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足7格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过每日首冲礼包了");
  end
 else
  player:alert(10,0,0,"今天充值5W元宝,才能领取每日首冲礼包");
 end
 ontalk3016_881(npc,0,player,0);
end

function ontalk3016_882(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
             <font color="#ffd306">当日充值达到50万元宝礼包</font>
#&talk_line#&

#&item19206#&  6级灵羽*1  
#&item18100#&  烈焰锻造石*2
#&item10079#&  内功经验卷*2
#&item19214#&  神兵积分*2
#&item10307#&  超级神石碎片*2
#&talk_line#&
               <font size="22px">【<u><a href='event:M2402,8821'>点击领取</a></u>】</font>
          <u><a href='event:M2402,88'>返回上页</a></u>
]]);
end
function ontalk3016_8821(npc,event,player)
 if player:get_param(333) >= 500000 then    ----检测每日充值元宝
  if player:get_param(233) == 0 then        ----检测是否领取过新区充值豪礼
   if player:num_bag_black() >= 9 then   ----检测背包数量
      player:add_item(19206,1,1);---6级灵羽
      player:add_item(18100,2,1);--烈焰锻造石
      player:add_item(10079,2,1);--内功经验卷
      player:add_item(19214,2,1);--神兵积分
      player:add_item(10307,2,1);--超级神石碎片
      player:set_param(297,2);
      player:set_param(233,1);
      g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]领取每日充值礼包2,充值10W元宝即可领取!",2,1000,0,1);
   else
    player:alert(10,0,0,"您的背包空间不足9格,无法领取");
   end
  else
   player:alert(10,0,0,"您已经领取过每日充值礼包2了");
  end
 else
  player:alert(10,0,0,"今天充值50W元宝,才能领取每日充值礼包2");
 end
 ontalk3016_882(npc,0,player,0);
end

function ontalk3016_883(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
             <font color="#ffd306">当日充值达到100万元宝礼包</font>
#&talk_line#&

#&item19207#&  7级灵羽*1  
#&item18100#&  烈焰锻造石*3
#&item10079#&  内功经验卷*3
#&item10222#&  注灵石(13级)*2
#&item10121#&  金刚石(大)*2
#&talk_line#&
               <font size="22px">【<u><a href='event:M2402,8831'>点击领取</a></u>】</font>
          <u><a href='event:M2402,88'>返回上页</a></u>
]]);
end
function ontalk3016_8831(npc,event,player)
  if player:get_param(333) >= 1000000 then    ----检测每日充值元宝
   if player:get_param(234) == 0 then        ----检测是否领取过新区充值豪礼
       if player:num_bag_black() >= 10 then   ----检测背包数量
     player:add_item(19207,1,1);---7级灵羽
     player:add_item(18100,3,1);--烈焰锻造石
     player:add_item(10222,2,1);--注灵石(13级)
     player:add_item(10079,3,1);--内功经验卷
     player:add_item(10121,1,1);--金刚石(大)
     player:set_param(297,3);
     player:set_param(234,1);
     g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]领取每日充值礼包3,充值100W元宝即可领取!",2,1000,0,1);
    else
     player:alert(10,0,0,"您的背包空间不足10格,无法领取");
    end
   else
    player:alert(10,0,0,"您已经领取过每日充值礼包3了");
   end
  else
   player:alert(10,0,0,"今天充值100W元宝,才能领取每日充值礼包3");
  end
 ontalk3016_883(npc,0,player,0);
end

function ontalk3016_884(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
             <font color="#ffd306">当日充值达到200万元宝礼包</font>
#&talk_line#&

#&item19208#&  8级灵羽*1  
#&item18100#&  烈焰锻造石*4
#&item10079#&  内功经验卷*3
#&item10223#&  注灵石(14级)*2
#&item10309#&  超级魂珠碎片*2
#&talk_line#&
               <font size="22px">【<u><a href='event:M2402,8841'>点击领取</a></u>】</font>
          <u><a href='event:M2402,88'>返回上页</a></u>
]]);
end
function ontalk3016_8841(npc,event,player)
  if player:get_param(333) >= 2000000 then    ----检测每日充值元宝
   if player:get_param(235) == 0 then        ----检测是否领取过新区充值豪礼
       if player:num_bag_black() >= 12 then   ----检测背包数量
       player:add_item(19208,1,1);---8级灵羽
       player:add_item(18100,4,1);--烈焰锻造石
       player:add_item(10223,2,1);--注灵石(14级)
       player:add_item(10079,3,1);--内功经验卷
       player:add_item(10309,2,1);--超级魂珠碎片
       player:set_param(297,4);
       player:set_param(235,1);
       g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]领取每日充值礼包4,充值200W元宝即可领取!",2,1000,0,1);
    else
     player:alert(10,0,0,"您的背包空间不足12格,无法领取");
    end
   else
    player:alert(10,0,0,"您已经领取过每日充值礼包4了");
   end
  else
   player:alert(10,0,0,"今天充值200W元宝,才能领取每日充值礼包4");
  end
 ontalk3016_884(npc,0,player,0);
end

 

function ontalk3016_885(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
             <font color="#ffd306">当日充值达到500万元宝礼包</font>
#&talk_line#&

#&item19209#&  9级灵羽*1  
#&item18100#&  烈焰锻造石*5
#&item10079#&  内功经验卷*3
#&item10224#&  注灵石(15级)*2
#&item10309#&  印度神油*1
#&talk_line#&
               <font size="22px">【<u><a href='event:M2402,8851'>点击领取</a></u>】</font>
          <u><a href='event:M2402,88'>返回上页</a></u>
]]);
end
function ontalk3016_8851(npc,event,player)
  if player:get_param(333) >= 5000000 then    ----检测每日充值元宝
   if player:get_param(236) == 0 then        ----检测是否领取过新区充值豪礼
       if player:num_bag_black() >= 12 then   ----检测背包数量
       player:add_item(19209,1,1);---9级灵羽
       player:add_item(18100,5,1);--烈焰锻造石
       player:add_item(10224,2,1);--注灵石(15级)
       player:add_item(10079,3,1);--内功经验卷
       player:add_item(10070,1,1);--印度神油
       player:set_param(297,5);
       player:set_param(236,1);
       g_alert("[<font color='#FF0000'>"..player:GetName().."</font>]领取每日充值礼包5,充值500W元宝即可领取!",2,1000,0,1);
    else
     player:alert(10,0,0,"您的背包空间不足12格,无法领取");
    end
   else
    player:alert(10,0,0,"您已经领取过每日充值礼包5了");
   end
  else
   player:alert(10,0,0,"今天充值500W元宝,才能领取每日充值礼包5");
  end
 ontalk3016_885(npc,0,player,0);
end

 

 

Npc3016Funid =
{
[0] = ontalk3016;
[1] = ontalk3016_1;
[1001] = ontalk3016_1001;
[1011] = ontalk3016_1011;
[1021] = ontalk3016_1021;
[1031] = ontalk3016_1031;
[1041] = ontalk3016_1041;
[88] = ontalk3016_88;
[881] = ontalk3016_881;
[882] = ontalk3016_882;
[883] = ontalk3016_883;
[884] = ontalk3016_884;
[885] = ontalk3016_885;
[8811] = ontalk3016_8811;
[8821] = ontalk3016_8821;
[8831] = ontalk3016_8831;
[8841] = ontalk3016_8841;
[8851] = ontalk3016_8851;

}

function CreatureNpcFun(npc,event,player,funid)
 if Npc3016Funid[funid] ~= nil then
  Npc3016Funid[funid](npc,event,player);
 end
end

RegisterUnitEvent(3016,20,"ontalk3016")
RegisterUnitEvent(3016,29,"CreatureNpcFun")