手游传奇私服发布站

 找回密码
 注册账号
查看: 419|回复: 0

土豪充值排行榜脚本

[复制链接]

133

主题

138

帖子

592

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
592
发表于 2015-10-27 15:31:57 | 显示全部楼层 |阅读模式
此脚本功能强大,可用于传送追杀等等


banmapidlist = {
{12,30,60,61,104,376,377,380,381,382,383,384,
385,386,387,388,389,390,391,392,393,400,401,
402,403,404,405,406,407,408,409,410,411},
};--(禁止传送的地图)暂时没用
function ontalk3011(npc,event,player)
  fuhao={};
  local vc=0;
  local t = tonumber(os.date("%m%d",os.time()));
player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
          <font color="#F76809">土豪排行榜  TOP10    <u><a href='event:M2402,888'>刷新排名</a></u></font>
  仅显示当前在线土豪,可传送至土豪身边一睹尊容
  领奖时间为22:30 - 23:00
#&talk_line#&
]]);
local isF = true;
for k,v in pairs(GetPlayersInWorld()) do
if v:get_vcoin_worth()>=100000 then--累计充值10W以上被统计
vc=vc+1;
  fuhao[vc] = {};
  fuhao[vc][0] = v:get_vcoin_worth();
  fuhao[vc][1] = v:GetName();
  fuhao[vc][2] = v:GetMapId();
  fuhao[vc][3] = v:GetX();      
  fuhao[vc][4] = v:GetY();
    end  
end
local m = table.getn(fuhao);
for n = m - 1,1,-1 do
  isF = true;
  for i = m - 1,1,-1 do
   if fuhao[i][0] < fuhao[i+1][0] then
    fuhao[i][0],fuhao[i+1][0] = fuhao[i+1][0],fuhao[i][0];
    fuhao[i][1],fuhao[i+1][1] = fuhao[i+1][1],fuhao[i][1];
    fuhao[i][2],fuhao[i+1][2] = fuhao[i+1][2],fuhao[i][2];
    fuhao[i][3],fuhao[i+1][3] = fuhao[i+1][3],fuhao[i][3];
    fuhao[i][4],fuhao[i+1][4] = fuhao[i+1][4],fuhao[i][4];
    isF = false;
   end
  end
  if isF then
  break end
end
if m >= 10 then
  for i = 1,10 do
    if player:GetName() == fuhao[i][1] then
   player:echo(0,npc:GetLowGUID(),[[
  第[]]..i..[[]名   充值元宝数:]]..fuhao[i][0]..[[    尊姓大名:]]..fuhao[i][1]..[[  
]]);
    else
    if player:GetName() ~= fuhao[i][1] then
        player:echo(0,npc:GetLowGUID(),[[
  <a href='event:M2402,]]..i..[['></a>第[]]..i..[[]名   充值元宝数:]]..fuhao[i][0]..[[    尊姓大名:]]..fuhao[i][1]..[[  
]]);
    end
   end
end
else
  for i = 1,m do
    if player:GetName() == fuhao[i][1] then
        player:echo(0,npc:GetLowGUID(),[[
  第[]]..i..[[]名   充值元宝数:]]..fuhao[i][0]..[[    尊姓大名:]]..fuhao[i][1]..[[  
]]);
    else
    if player:GetName() ~= fuhao[i][1] then
        player:echo(0,npc:GetLowGUID(),[[
  <a href='event:M2402,]]..i..[['></a>第[]]..i..[[]名   充值元宝数:]]..fuhao[i][0]..[[    尊姓大名:]]..fuhao[i][1]..[[  
]]);
      end
    end
  end
end
     player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
            <a href='event:M2402,100'>领取土豪榜第一名战力奖励</a>
#&talk_line#&
]]);
end
function ontalk3011_1(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[1][2] ~= 12 and fuhao[1][2] ~= 30 and fuhao[1][2] ~= 60 and fuhao[1][2] ~= 61 and fuhao[1][2] ~= 104 and fuhao[1][2] ~= 376 and fuhao[1][2] ~= 377 and fuhao[1][2] ~= 380 and fuhao[1][2] ~= 381 and fuhao[1][2] ~= 382 and fuhao[1][2] ~= 383 and fuhao[1][2] ~= 384 and fuhao[1][2] ~= 385 and fuhao[1][2] ~= 386 and fuhao[1][2] ~= 387 and fuhao[1][2] ~= 388 and fuhao[1][2] ~= 389 and fuhao[1][2] ~= 390 and fuhao[1][2] ~= 391 and fuhao[1][2] ~= 392 and fuhao[1][2] ~= 393 and fuhao[1][2] ~= 400 and fuhao[1][2] ~= 401 and fuhao[1][2] ~= 402 and fuhao[1][2] ~= 403 and fuhao[1][2] ~= 404 and fuhao[1][2] ~= 405 and fuhao[1][2] ~= 406 and fuhao[1][2] ~= 407 and fuhao[1][2] ~= 408 and fuhao[1][2] ~= 409 and fuhao[1][2] ~= 410 and fuhao[1][2] ~= 411 then
                 player:enter_map(fuhao[1][2],fuhao[1][3],fuhao[1][4]);   
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[1][1].."]在"..MapIdToMapName[fuhao[1][2]].."("..fuhao[1][3]..","..fuhao[1][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_2(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[2][2] ~= 12 and fuhao[2][2] ~= 30 and fuhao[2][2] ~= 60 and fuhao[2][2] ~= 61 and fuhao[2][2] ~= 104 and fuhao[2][2] ~= 376 and fuhao[2][2] ~= 377 and fuhao[2][2] ~= 380 and fuhao[2][2] ~= 381 and fuhao[2][2] ~= 382 and fuhao[2][2] ~= 383 and fuhao[2][2] ~= 384 and fuhao[2][2] ~= 385 and fuhao[2][2] ~= 386 and fuhao[2][2] ~= 387 and fuhao[2][2] ~= 388 and fuhao[2][2] ~= 389 and fuhao[2][2] ~= 390 and fuhao[2][2] ~= 391 and fuhao[2][2] ~= 392 and fuhao[2][2] ~= 393 and fuhao[2][2] ~= 400 and fuhao[2][2] ~= 401 and fuhao[2][2] ~= 402 and fuhao[2][2] ~= 403 and fuhao[2][2] ~= 404 and fuhao[2][2] ~= 405 and fuhao[2][2] ~= 406 and fuhao[2][2] ~= 407 and fuhao[2][2] ~= 408 and fuhao[2][2] ~= 409 and fuhao[2][2] ~= 410 and fuhao[2][2] ~= 411 then
                 player:enter_map(fuhao[2][2],fuhao[2][3],fuhao[2][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[2][1].."]在"..MapIdToMapName[fuhao[2][2]].."("..fuhao[2][3]..","..fuhao[2][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_3(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[3][2] ~= 12 and fuhao[3][2] ~= 30 and fuhao[3][2] ~= 60 and fuhao[3][2] ~= 61 and fuhao[3][2] ~= 104 and fuhao[3][2] ~= 376 and fuhao[3][2] ~= 377 and fuhao[3][2] ~= 380 and fuhao[3][2] ~= 381 and fuhao[3][2] ~= 382 and fuhao[3][2] ~= 383 and fuhao[3][2] ~= 384 and fuhao[3][2] ~= 385 and fuhao[3][2] ~= 386 and fuhao[3][2] ~= 387 and fuhao[3][2] ~= 388 and fuhao[3][2] ~= 389 and fuhao[3][2] ~= 390 and fuhao[3][2] ~= 391 and fuhao[3][2] ~= 392 and fuhao[3][2] ~= 393 and fuhao[3][2] ~= 400 and fuhao[3][2] ~= 401 and fuhao[3][2] ~= 402 and fuhao[3][2] ~= 403 and fuhao[3][2] ~= 404 and fuhao[3][2] ~= 405 and fuhao[3][2] ~= 406 and fuhao[3][2] ~= 407 and fuhao[3][2] ~= 408 and fuhao[3][2] ~= 409 and fuhao[3][2] ~= 410 and fuhao[3][2] ~= 411 then
                 player:enter_map(fuhao[3][2],fuhao[3][3],fuhao[3][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[3][1].."]在"..MapIdToMapName[fuhao[3][2]].."("..fuhao[3][3]..","..fuhao[3][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_4(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[4][2] ~= 12 and fuhao[4][2] ~= 30 and fuhao[4][2] ~= 60 and fuhao[4][2] ~= 61 and fuhao[4][2] ~= 104 and fuhao[4][2] ~= 376 and fuhao[4][2] ~= 377 and fuhao[4][2] ~= 380 and fuhao[4][2] ~= 381 and fuhao[4][2] ~= 382 and fuhao[4][2] ~= 383 and fuhao[4][2] ~= 384 and fuhao[4][2] ~= 385 and fuhao[4][2] ~= 386 and fuhao[4][2] ~= 387 and fuhao[4][2] ~= 388 and fuhao[4][2] ~= 389 and fuhao[4][2] ~= 390 and fuhao[4][2] ~= 391 and fuhao[4][2] ~= 392 and fuhao[4][2] ~= 393 and fuhao[4][2] ~= 400 and fuhao[4][2] ~= 401 and fuhao[4][2] ~= 402 and fuhao[4][2] ~= 403 and fuhao[4][2] ~= 404 and fuhao[4][2] ~= 405 and fuhao[4][2] ~= 406 and fuhao[4][2] ~= 407 and fuhao[4][2] ~= 408 and fuhao[4][2] ~= 409 and fuhao[4][2] ~= 410 and fuhao[4][2] ~= 411 then
                 player:enter_map(fuhao[4][2],fuhao[4][3],fuhao[4][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[4][1].."]在"..MapIdToMapName[fuhao[4][2]].."("..fuhao[4][3]..","..fuhao[4][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_5(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[5][2] ~= 12 and fuhao[5][2] ~= 30 and fuhao[5][2] ~= 60 and fuhao[5][2] ~= 61 and fuhao[5][2] ~= 104 and fuhao[5][2] ~= 376 and fuhao[5][2] ~= 377 and fuhao[5][2] ~= 380 and fuhao[5][2] ~= 381 and fuhao[5][2] ~= 382 and fuhao[5][2] ~= 383 and fuhao[5][2] ~= 384 and fuhao[5][2] ~= 385 and fuhao[5][2] ~= 386 and fuhao[5][2] ~= 387 and fuhao[5][2] ~= 388 and fuhao[5][2] ~= 389 and fuhao[5][2] ~= 390 and fuhao[5][2] ~= 391 and fuhao[5][2] ~= 392 and fuhao[5][2] ~= 393 and fuhao[5][2] ~= 400 and fuhao[5][2] ~= 401 and fuhao[5][2] ~= 402 and fuhao[5][2] ~= 403 and fuhao[5][2] ~= 404 and fuhao[5][2] ~= 405 and fuhao[5][2] ~= 406 and fuhao[5][2] ~= 407 and fuhao[5][2] ~= 408 and fuhao[5][2] ~= 409 and fuhao[5][2] ~= 410 and fuhao[5][2] ~= 411 then
                 player:enter_map(fuhao[5][2],fuhao[5][3],fuhao[5][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[5][1].."]在"..MapIdToMapName[fuhao[5][2]].."("..fuhao[5][3]..","..fuhao[5][4]..")");
        player:sub_vcoin(100000);
        end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_6(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[6][2] ~= 12 and fuhao[6][2] ~= 30 and fuhao[6][2] ~= 60 and fuhao[6][2] ~= 61 and fuhao[6][2] ~= 104 and fuhao[6][2] ~= 376 and fuhao[6][2] ~= 377 and fuhao[6][2] ~= 380 and fuhao[6][2] ~= 381 and fuhao[6][2] ~= 382 and fuhao[6][2] ~= 383 and fuhao[6][2] ~= 384 and fuhao[6][2] ~= 385 and fuhao[6][2] ~= 386 and fuhao[6][2] ~= 387 and fuhao[6][2] ~= 388 and fuhao[6][2] ~= 389 and fuhao[6][2] ~= 390 and fuhao[6][2] ~= 391 and fuhao[6][2] ~= 392 and fuhao[6][2] ~= 393 and fuhao[6][2] ~= 400 and fuhao[6][2] ~= 401 and fuhao[6][2] ~= 402 and fuhao[6][2] ~= 403 and fuhao[6][2] ~= 404 and fuhao[6][2] ~= 405 and fuhao[6][2] ~= 406 and fuhao[6][2] ~= 407 and fuhao[6][2] ~= 408 and fuhao[6][2] ~= 409 and fuhao[6][2] ~= 410 and fuhao[6][2] ~= 411 then
                 player:enter_map(fuhao[6][2],fuhao[6][3],fuhao[6][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[6][1].."]在"..MapIdToMapName[fuhao[6][2]].."("..fuhao[6][3]..","..fuhao[6][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_7(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[7][2] ~= 12 and fuhao[7][2] ~= 30 and fuhao[7][2] ~= 60 and fuhao[7][2] ~= 61 and fuhao[7][2] ~= 104 and fuhao[7][2] ~= 376 and fuhao[7][2] ~= 377 and fuhao[7][2] ~= 380 and fuhao[7][2] ~= 381 and fuhao[7][2] ~= 382 and fuhao[7][2] ~= 383 and fuhao[7][2] ~= 384 and fuhao[7][2] ~= 385 and fuhao[7][2] ~= 386 and fuhao[7][2] ~= 387 and fuhao[7][2] ~= 388 and fuhao[7][2] ~= 389 and fuhao[7][2] ~= 390 and fuhao[7][2] ~= 391 and fuhao[7][2] ~= 392 and fuhao[7][2] ~= 393 and fuhao[7][2] ~= 400 and fuhao[7][2] ~= 401 and fuhao[7][2] ~= 402 and fuhao[7][2] ~= 403 and fuhao[7][2] ~= 404 and fuhao[7][2] ~= 405 and fuhao[7][2] ~= 406 and fuhao[7][2] ~= 407 and fuhao[7][2] ~= 408 and fuhao[7][2] ~= 409 and fuhao[7][2] ~= 410 and fuhao[7][2] ~= 411 then
                 player:enter_map(fuhao[7][2],fuhao[7][3],fuhao[7][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[7][1].."]在"..MapIdToMapName[fuhao[7][2]].."("..fuhao[7][3]..","..fuhao[7][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_8(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[8][2] ~= 12 and fuhao[8][2] ~= 30 and fuhao[8][2] ~= 60 and fuhao[8][2] ~= 61 and fuhao[8][2] ~= 104 and fuhao[8][2] ~= 376 and fuhao[8][2] ~= 377 and fuhao[8][2] ~= 380 and fuhao[8][2] ~= 381 and fuhao[8][2] ~= 382 and fuhao[8][2] ~= 383 and fuhao[8][2] ~= 384 and fuhao[8][2] ~= 385 and fuhao[8][2] ~= 386 and fuhao[8][2] ~= 387 and fuhao[8][2] ~= 388 and fuhao[8][2] ~= 389 and fuhao[8][2] ~= 390 and fuhao[8][2] ~= 391 and fuhao[8][2] ~= 392 and fuhao[8][2] ~= 393 and fuhao[8][2] ~= 400 and fuhao[8][2] ~= 401 and fuhao[8][2] ~= 402 and fuhao[8][2] ~= 403 and fuhao[8][2] ~= 404 and fuhao[8][2] ~= 405 and fuhao[8][2] ~= 406 and fuhao[8][2] ~= 407 and fuhao[8][2] ~= 408 and fuhao[8][2] ~= 409 and fuhao[8][2] ~= 410 and fuhao[8][2] ~= 411 then
                 player:enter_map(fuhao[8][2],fuhao[8][3],fuhao[8][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[8][1].."]在"..MapIdToMapName[fuhao[8][2]].."("..fuhao[8][3]..","..fuhao[8][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_9(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[9][2] ~= 12 and fuhao[9][2] ~= 30 and fuhao[9][2] ~= 60 and fuhao[9][2] ~= 61 and fuhao[9][2] ~= 104 and fuhao[9][2] ~= 376 and fuhao[9][2] ~= 377 and fuhao[9][2] ~= 380 and fuhao[9][2] ~= 381 and fuhao[9][2] ~= 382 and fuhao[9][2] ~= 383 and fuhao[9][2] ~= 384 and fuhao[9][2] ~= 385 and fuhao[9][2] ~= 386 and fuhao[9][2] ~= 387 and fuhao[9][2] ~= 388 and fuhao[9][2] ~= 389 and fuhao[9][2] ~= 390 and fuhao[9][2] ~= 391 and fuhao[9][2] ~= 392 and fuhao[9][2] ~= 393 and fuhao[9][2] ~= 400 and fuhao[9][2] ~= 401 and fuhao[9][2] ~= 402 and fuhao[9][2] ~= 403 and fuhao[9][2] ~= 404 and fuhao[9][2] ~= 405 and fuhao[9][2] ~= 406 and fuhao[9][2] ~= 407 and fuhao[9][2] ~= 408 and fuhao[9][2] ~= 409 and fuhao[9][2] ~= 410 and fuhao[9][2] ~= 411 then
                 player:enter_map(fuhao[9][2],fuhao[9][3],fuhao[9][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[9][1].."]在"..MapIdToMapName[fuhao[9][2]].."("..fuhao[9][3]..","..fuhao[9][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_10(npc,event,player)
  local systime = tonumber(os.date("%H%M",os.time()));
  local chengzhuzhiren = (systime >= 1530 and systime <= 1540);
  local yabiao = (systime >= 1950 and systime <= 2005);
  local huangchengweiji = (systime >= 2100 and systime <= 2120);
    if player:get_vcoin() >= 100000 then
      if player:get_player_type() >= 1 then
        if player:is_war_time() == false and (g_has_war() ~= 1 or g_has_war() ~= 3) then
         if chengzhuzhiren == false then
           if yabiao == false then
             if huangchengweiji == false then
               if fuhao[10][2] ~= 12 and fuhao[10][2] ~= 30 and fuhao[10][2] ~= 60 and fuhao[10][2] ~= 61 and fuhao[10][2] ~= 104 and fuhao[10][2] ~= 376 and fuhao[10][2] ~= 377 and fuhao[10][2] ~= 380 and fuhao[10][2] ~= 381 and fuhao[10][2] ~= 382 and fuhao[10][2] ~= 383 and fuhao[10][2] ~= 384 and fuhao[10][2] ~= 385 and fuhao[10][2] ~= 386 and fuhao[10][2] ~= 387 and fuhao[10][2] ~= 388 and fuhao[10][2] ~= 389 and fuhao[10][2] ~= 390 and fuhao[10][2] ~= 391 and fuhao[10][2] ~= 392 and fuhao[10][2] ~= 393 and fuhao[10][2] ~= 400 and fuhao[10][2] ~= 401 and fuhao[10][2] ~= 402 and fuhao[10][2] ~= 403 and fuhao[10][2] ~= 404 and fuhao[10][2] ~= 405 and fuhao[10][2] ~= 406 and fuhao[10][2] ~= 407 and fuhao[10][2] ~= 408 and fuhao[10][2] ~= 409 and fuhao[10][2] ~= 410 and fuhao[10][2] ~= 411 then
                 player:enter_map(fuhao[10][2],fuhao[10][3],fuhao[10][4]);   --送到恶人身边
                 player:sub_vcoin(100000);
                 else
                  player:alert(10,0,0,"目标所在地图无法传送");
                  ontalk3011(npc,0,player);
                end
             else
               player:alert(10,0,0,"皇城危机期间,无法传送");
               ontalk3011(npc,0,player);
             end
           else
             player:alert(10,0,0,"押镖期间,无法传送");
             ontalk3011(npc,0,player);
           end
         else
           player:alert(10,0,0,"城主之刃期间,无法传送");
           ontalk3011(npc,0,player);
         end
        else
          player:alert(10,0,0,"攻城期间,无法传送");
          ontalk3011(npc,0,player);
        end
      else
        player:alert(10,0,0,"["..fuhao[10][1].."]在"..MapIdToMapName[fuhao[10][2]].."("..fuhao[10][3]..","..fuhao[10][4]..")");
        player:sub_vcoin(100000);
        ontalk3011(npc,0,player);
      end
    else
     player:alert(10,0,0,"元宝不足10万,无法使用追杀");
     ontalk3011(npc,0,player);
   end
  end
function ontalk3011_100(npc,event,player)
local t = tonumber(os.date("%H%M",os.time()));
if t >= 2230 and t <= 2300 then
  for k = 1,table.getn(fuhao) do
   if fuhao[k][1] ~= nil then
    if player:GetName() == fuhao[k][1] and player:get_param(230) == 0 then
     player:add_vcoin(5000000);     --奖励500W元宝
     player:set_param(230,1);   --记录领奖
     player:set_status(3004,0,100,5);
     player:alert(10,0,0,"恭喜获得500万元宝 + 土豪专属战力奖励");
     break;
    else
     player:alert(10,0,0,"你不是排行榜第一名 :"..fuhao[k][1] ..",或者你已经领过了。");
     break;
    end
   else
    break;
   end
  end
else
  player:alert(10,0,0,"领取时间为22:30 - 23:00");
end
ontalk3011(npc,0,player);
end
function ontalk3011_888(npc,event,player)
ontalk3011(npc,0,player);
player:alert(10,0,0,"已获取最新土豪排名数据");
end
Npc3011Funid =
{
[0] = ontalk3011;
[1] = ontalk3011_1;
[2] = ontalk3011_2;
[3] = ontalk3011_3;
[4] = ontalk3011_4;
[5] = ontalk3011_5;
[6] = ontalk3011_6;
[7] = ontalk3011_7;
[8] = ontalk3011_8;
[9] = ontalk3011_9;
[10] = ontalk3011_10;
[100] = ontalk3011_100;
[101] = ontalk3011_101;
[888] = ontalk3011_888;
}
function CreatureNpcFun(npc,event,player,funid)
if Npc3011Funid[funid] ~= nil then
  Npc3011Funid[funid](npc,event,player);
end
end
RegisterUnitEvent(3011,20,"ontalk3011")
RegisterUnitEvent(3011,29,"CreatureNpcFun")



回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册账号

本版积分规则

手游传奇私服发布站

GMT+8, 2025-4-18 21:35 , Processed in 0.051182 second(s), 22 queries , Gzip On.

快速回复 返回顶部 返回列表