online_jf.lua --累计在线时间领取物品(积分)的lua脚本

原作者: ayase

8-27修正
修复首次使用后的红字
不需要额外进数据库导入计分表，这lua全自动生成

--------------------------------------------------------------
惯例写在前面：

写这玩意其实学习性更大于目的性。。
= =研究了两天晚上写的我人参中滴第一个lua脚本，居然还真给我写出来了，好感动
由于写代码的基础基本是零 所以碰了N+N次壁
什么函数字母大小写还要区分  -- 闹哪样啊喂 因为这个原因我试了半个多钟才发现问题所在
什么函数命名 基本我感觉除了我自己能看得懂之外没别人能看得懂的了  我自己都感觉无法直视了，总之乱七八糟的 ，各种中西合并，英文+拼音混搭，反正跟规范完全不搭边，嘛，对于我这小白来说反正能用就得了。。
对于语句优化。。。  反正没优化过 而且有大量重复或者完全没必要的语句  所以执行效率并不是说很好
嘛  反正自己用也不在意了。。

都是看别人的脚本（item_up.lua）才会了这么点皮毛。。
然后不得不说不知道为啥我手头的item_up.lua 只有这么个文件 配套的sql居然没有
我这是在哪扒的脚本没扒干净啊
最后看一晚上这个脚本终于算是还原出来数据库的表了 在这么纠结的情况下唯一庆幸的是因为这个lua是我基本上是看懂了。。
然后对应lua的执行过程有了点了解了算是
但是还有好多不懂的说。。

= =  废话这么多  进正题吧。。

解压后放到服务端 lua_Scripts 文件夹下即可

使用之前首先用文本(最好是nptepad++之类的高级文本编辑工具，否则可能会导致游戏乱码)打开该lua 
修改这几个参数
local ItemEntry=70008  --积分宝石
local jf_entry=70002  --要领取的物品id
local jf_mins=10   --每多少分钟领取

依次分别是 积分宝石(即点击后打开下面的面板)，在线时间可以领取的物品id，每多少分钟可以领取一个

  print (">> loading online_jf.lua")

 local ItemEntry= --用于使用后查看积分并兑换的物品entry。 ps 其实可以整合到什么超级炉石那里的，所选用的物品必须带技能的能使用的。
 local jf_entry= --代表积分的物品可以叫某某货币之类的,本来想直接加在数据库值然后读取的 不过兑换东西的时候太麻烦，所以还是做成了物品容易用于兑换。
 local jf_mins= --设置每多少分钟得到1点积分。

 local mins=nil
 local jf=nil
 local jf_count=nil
 local inGameTime=nil
 local playergid=nil
 local jf_DBtime=nil
 local jf_ingametime=nil

 local function online_jf(event, player, item, target)
     player:MoveTo(,player:GetX(),player:GetY(),player:GetZ()+0.01)
     --player:GossipComplete()
     player:GossipClearMenu()
     playergid=item:GetOwnerGUID()
     jf_DBtime=CharDBQuery("SELECT * FROM characters_jf WHERE guid="..playergid..";")
     if (jf_DBtime==nil) then
         CharDBExecute("insert into characters_jf (guid,jf_time,jf) VALUES ("..playergid..",0,0);")
         player:SendBroadcastMessage("首次领取，初始化数据，请再次点击使用。")
     else
     inGameTime=player:GetTotalPlayedTime()
     jf_ingametime=math.modf(inGameTime-jf_DBtime:GetUInt32())
     jf=math.modf(jf_ingametime//jf_mins)
     mins=math.modf(jf_ingametime/)
     jf_count=player:GetItemCount(jf_entry)
         if(jf_count==nil) then
             jf_count=
         end
     player:GossipComplete()
     player:GossipMenuAddItem(,"您当前拥有"..GetItemLink(jf_entry).." x "..jf_count.."。\n\n累计共领取"..GetItemLink(jf_entry).." x "..jf_DBtime:GetUInt32().."\n\n累计未兑换的在线时间: "..mins.."分钟\n\n每在线"..jf_mins.."分钟可以兑换"..GetItemLink(jf_entry).." x 1  \n\n你当前一共可以兑换"..GetItemLink(jf_entry).." x "..jf.." ",,)
     player:GossipMenuAddItem(,"点击确定兑换",,)
     player:GossipSendMenu(, item)
     --player:GossipClearMenu()
     --player:GossipComplete()
     end
 end

 local function timetojf(event, player, item, target)
     if (jf==) then
           player:SendBroadcastMessage("兑换失败，累计在线时间少于"..jf_mins.."分钟。")
     else
      jf=math.modf(jf_ingametime//jf_mins)
       player:AddItem(jf_entry, jf)
       playergid=item:GetOwnerGUID()
       CharDBExecute("update characters_jf set jf_time=jf_time+"..jf_ingametime..",jf=jf+"..jf.." where guid="..playergid..";")
       player:SendBroadcastMessage("成功兑换"..GetItemLink(jf_entry).." x " ..jf)
       player:GossipComplete()
       player:GossipClearMenu()
     end

 end

     CharDBExecute([[
 CREATE TABLE IF NOT EXISTS `characters_jf` (
   `guid` int(10) NOT NULL,
   `jf_time` int(10) NOT NULL DEFAULT '0',
   `jf` int(10) NOT NULL DEFAULT '0',
   PRIMARY KEY (`guid`)
 ) ENGINE=InnoDB DEFAULT CHARSET=utf8;
     ]])

 RegisterItemEvent(ItemEntry, , online_jf)
 RegisterItemGossipEvent(ItemEntry, , timetojf)

查看代码