烈焰私服特色传送VIP地图脚本

发表时间：2015-12-17 13:14点击人气：责任编辑：admin

function ontalk2111(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
哎哟，客官，什么风将您吹来了，快里面请，今儿刚好新到一批姑娘，保证让客官爽个够...
姑娘们出来接客了
#&talk_line#&
<a href='event:M2402,410'>怡红院</a> <a href='event:M2402,420'>丽春院</a>
#&talk_line#&
<a href='event:M2402,430'>万魁楼</a> <a href='event:M2402,440'>红袖坊</a>
#&talk_line#&
<a href='event:M2402,450'>华清池</a> <a href='event:M2402,460'>天上人间</a>
#&talk_line#&
里面的姑娘都是大有来头，个个国色天资，倾城容颜。但上下的功夫可也厉害着呢，即是温柔乡也是英雄冢。想要搞死里面的姑娘，可先得有一身好本事才行……
#&talk_line#&
 提示
#&talk_line#&

里面美女个个携带大量大量元宝、极品道具
就看公子您能不能让她们跪下唱征服！
]]);
end
function ontalk2111_410(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 红袖坊
#&talk_line#&
 十三学得琵琶成，名属教坊第一部。
 曲罢常教善才伏，妆成每被秋娘妒。
#&talk_line#&
 场地信息
#&talk_line#&

       花魁：苏小小、李香君
       掉落：顶级装备，大额元宝券

#&talk_line#&
                   入场要求
#&talk_line#&

门票：5W元宝（黄金VIP免费）

#&talk_line#&
 <a href='event:M2402,4101'>立即进入</a>
#&talk_line#&

]]);

end
function ontalk2111_4101(npc,event,player)
 --player:randomthismap(500);
 if player:get_player_type() >= 11 then
 player:enter_map(500,33,37);
 g_alert("玩家["..player:GetName().."]进入【怡红院】,潇洒风流快活去了",2,1000,0,1);
 elseif player:get_vcoin() >= 50000 then
 player:sub_vcoin(50000);
 player:enter_map(500,33,37);
 g_alert("玩家["..player:GetName().."]进入【怡红院】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您没有5W元宝，或您不是黄金VIP！");
 ontalk2111_410(npc,0,player,0);
 end
end

function ontalk2111_420(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 红袖坊
#&talk_line#&
 落魄江湖载酒行，楚腰纤细掌中轻。
 十年一觉扬州梦，赢得青楼薄幸名。
#&talk_line#&
 场地信息
#&talk_line#&

       花魁：赛金花、李师师
       掉落：顶级装备，大额元宝券

#&talk_line#&
                   入场要求
#&talk_line#&

门票：6W元宝（白金VIP免费）

#&talk_line#&
 <a href='event:M2402,4201'>立即进入</a>
#&talk_line#&

]]);

end
function ontalk2111_4201(npc,event,player)
 if player:get_player_type() >= 12 then
 player:enter_map(501,25,56);
 g_alert("玩家["..player:GetName().."]进入【丽春院】,潇洒风流快活去了",2,1000,0,1);
 elseif player:get_vcoin() >= 60000 then
 player:sub_vcoin(60000);
 player:enter_map(501,25,56);
 g_alert("玩家["..player:GetName().."]进入【丽春院】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您没有6W元宝，或您不是白金VIP！");
 ontalk2111_420(npc,0,player,0);
 end
end

function ontalk2111_430(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 红袖坊
#&talk_line#&
 手如柔荑，肤如凝脂，领如蝤蛴，
 齿如瓠犀，巧笑倩兮，美目眇兮。
#&talk_line#&
 场地信息
#&talk_line#&

       花魁：董小婉、柳如是
       掉落：顶级装备，大额元宝券

#&talk_line#&
                   入场要求
#&talk_line#&

门票：8W元宝（钻石VIP免费）

#&talk_line#&
 <a href='event:M2402,4301'>立即进入</a>
#&talk_line#&

]]);
end
function ontalk2111_4301(npc,event,player)
 if player:get_player_type() >= 13 then
 player:enter_map(502,33,53);
 g_alert("玩家["..player:GetName().."]进入【万魁楼】,潇洒风流快活去了",2,1000,0,1);
 elseif player:get_vcoin() >= 80000 then
 player:sub_vcoin(80000);
 player:enter_map(502,33,53);
 g_alert("玩家["..player:GetName().."]进入【万魁楼】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您没有8W元宝，或您不是钻石VIP！");
 ontalk2111_430(npc,0,player,0);
 end
end

function ontalk2111_440(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 红袖坊
#&talk_line#&
 丽宇芳林对高阁，新装艳质本倾城；
 妖姬脸似花含露；玉树流光照后庭；
#&talk_line#&
 场地信息
#&talk_line#&

       花魁：陈圆圆、张丽华
       掉落：顶级装备，大额元宝券

#&talk_line#&
                   入场要求
#&talk_line#&

门票：10W元宝（皇冠VIP免费）

#&talk_line#&
 <a href='event:M2402,4401'>立即进入</a>
#&talk_line#&

]]);

end
function ontalk2111_4401(npc,event,player)
 if player:get_player_type() >= 14 then
 player:enter_map(503,41,53);
 g_alert("玩家["..player:GetName().."]进入【红袖坊】,潇洒风流快活去了",2,1000,0,1);
 elseif player:get_vcoin() >= 100000 then
 player:sub_vcoin(100000);
 player:enter_map(503,41,53);
 g_alert("玩家["..player:GetName().."]进入【红袖坊】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您没有10W元宝，或您不是皇冠VIP！");
 ontalk2111_440(npc,0,player,0);
 end
end

function ontalk2111_450(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 华清池
#&talk_line#&
 春寒赐浴华清池，温泉水滑洗凝脂。
 借问汉宫谁得似？可怜飞燕倚新妆。
#&talk_line#&
 场地信息
#&talk_line#&

       花魁：杨玉环、赵飞燕
       掉落：顶级装备，大额元宝券

#&talk_line#&
                   入场要求
#&talk_line#&

门票：12W元宝（至尊VIP免费）

#&talk_line#&
 <a href='event:M2402,4501'>立即进入</a>
#&talk_line#&

]]);

end
function ontalk2111_4501(npc,event,player)
 if player:get_player_type() >= 14 then
 player:enter_map(504,18,48);
 g_alert("玩家["..player:GetName().."]进入【华清池】,潇洒风流快活去了",2,1000,0,1);
 elseif player:get_vcoin() >= 120000 then
 player:sub_vcoin(120000);
 player:enter_map(504,18,48);
 g_alert("玩家["..player:GetName().."]进入【华清池】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您没有12W元宝，或您不是至尊VIP！");
 ontalk2111_450(npc,0,player,0);
 end
end

function ontalk2111_460(npc,event,player)
 player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
 天上人间
#&talk_line#&
 你知道，这里，不是谁都能来的。
 有钱，还得有身份！我们这不是谁都接待的。
 在我们这要办高级VIP的都排到2018了！
#&talk_line#&
 场地信息
#&talk_line#&
 花魁：张馨予、张柏芝、林志玲、潘金莲
 掉落：终极装备，大额元宝券

#&talk_line#&
 入场要求
#&talk_line#&
 门票：0W元宝
 身份：至尊VIP

#&talk_line#&
 <a href='event:M2402,4601'>立即进入</a>
#&talk_line#&

]]);

end
function ontalk2111_4601(npc,event,player)
 if player:get_player_type() >= 15 then
 player:enter_map(505,13,115);
 player:set_timer(2,3600);--设置个人时间变量2，值为3600秒，触发在PLAYER.LUA的OnSetTimer中：一小时后回城
 g_alert("玩家["..player:GetName().."]进入【天上人间】,潇洒风流快活去了",2,1000,0,1);
 else
 player:alert(1,1000,1,"您不是至尊VIP！");
 ontalk2111_460(npc,0,player,0);
 end
end

Npc2111Funid =
{
[410] = ontalk2111_410;
[420] = ontalk2111_420;
[430] = ontalk2111_430;
[440] = ontalk2111_440;
[450] = ontalk2111_450;
[460] = ontalk2111_460;
[4101] = ontalk2111_4101;
[4201] = ontalk2111_4201;
[4301] = ontalk2111_4301;
[4401] = ontalk2111_4401;
[4501] = ontalk2111_4501;
[4601] = ontalk2111_4601;
}

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

RegisterUnitEvent(2111,20,"ontalk2111")
RegisterUnitEvent(2111,29,"funid")

上一篇：设置一个道具根据飞升等级自动进入相应飞升地图的方法
下一篇：浅析制作烈焰私服服务端的一些建议和方案

热点文章

更多>>新游测试表

时间	游戏	区服	其他
10:00	雷霆之怒	星辰雷霆复古
10:00	雷霆之怒	逐鹿雷霆之怒