飞身轮回等经验兑换元宝的写法
先打开数据库创建个NPC的代码在服务端的脚本文件夹内新建个duihuan.lua脚本
然后把以下内容复制进去：
function ontalk1920(npc,event,player)
player:echo(0,npc:GetLowGUID(),[[
#&talk_line#&
您好，欢迎光临小店！！！
#&talk_line#&
－－－－－－－－－－－－－－－－－－－－－－－－
小店目前可以兑换如下：
1200万 魂力值可兑换：10万元宝 确定兑换
1000万 轮回值可兑换：10万元宝 确定兑换
一亿飞升值可兑换：10万元宝 确定兑换
－－－－－－－－－－－－－－－－－－－－－－－－
你目前魂力值为：]]..player:get_param(250)..[[
你目前轮回值为：]]..player:get_param(266)..[[
你目前飞升值为：]]..player:get_param(259)..[[
－－－－－－－－－－－－－－－－－－－－－－－－
]]);
end
function ontalk1920_400(npc,event,player)
player:alert(10,0,0,"已经关闭此功能,不能兑换");
end
function ontalk1920_100(npc,event,player)
if player:get_param(250) >= 12000000 then
player:set_param(250,player:get_param(250) - 12000000);
player:add_vcoin(100000);
player:alert(10,0,0,"元宝+10万");
g_alert("玩家["..player:GetName().."]使用魂力值.在财神处兑换:10万元宝",2,1000,0,1);
else
player:alert(10,0,0,"你目前魂力值不足1000万,不能兑换");
end
ontalk1920(npc,0,player,0);
end
function ontalk1920_200(npc,event,player)
if player:get_param(266) >= 10000000 then
player:set_param(266,player:get_param(266) - 10000000);
player:add_vcoin(100000);
player:alert(10,0,0,"元宝+10万");
g_alert("玩家["..player:GetName().."]使用轮回值.在财神处兑换:10万元宝",2,1000,0,1);
else
player:alert(10,0,0,"你目前轮回值不足800万,不能兑换");
end
ontalk1920(npc,0,player,0);
end
function ontalk1920_300(npc,event,player)
if player:get_param(259) >= 100000000 then
player:set_param(259,player:get_param(259) - 100000000);
player:add_vcoin(100000);
player:alert(10,0,0,"元宝+10万");
g_alert("玩家["..player:GetName().."]使用飞升值.在财神处兑换:10万元宝",2,1000,0,1);
else
player:alert(10,0,0,"你目前飞升值不足一亿,不能兑换");
end
ontalk1920(npc,0,player,0);
end
Npc1920Funid =
{
= ontalk1920;
= ontalk1920_100;
= ontalk1920_200;
= ontalk1920_300;
= ontalk1920_400;
}
function CreatureNpcFun(npc,event,player,funid)
if Npc1920Funid ~= nil then
Npc1920Funid(npc,event,player);
end
end
RegisterUnitEvent(1920,20,"ontalk1920")
RegisterUnitEvent(1920,29,"CreatureNpcFun")
此脚本为疯狂烈焰私服www.ly878.com独家创作，转帖请注明，谢谢！
520页游论坛www.ye520.com 欢迎你的到来~~~
页:
[1]