➤切换繁体中文
切换到宽版

cgmsv引擎论坛

 找回密码
 注册/Sign up
搜索
cgmsv引擎论坛»论坛 › 金币区 › 原创发布区 › 天降宝箱 优化版
返回列表 发新帖
查看: 3145|回复: 3

[LUA] 天降宝箱 优化版

[复制链接]
ahsin

Rank: 1
发表于 2021-4-26 22:23:43 | 显示全部楼层 |阅读模式
根据自带的tjbx.lua做的小修改

主要是右键打开的不再是物品宝箱，而是随机道具，道具可以自定义


  1.  

  2.  

  3.  

  4.  

  5. --参数定义

  6. tbl_TJBX_areaset = {};        --随机掉落的区域设定

  7. --TJBX_itemid = 18002;        --宝箱ID

  8. TJBX_itemid = {};--天降宝箱随机品类

  9. TJBX_outtime = 300;        --宝箱无人捡取自动消失时间，单位秒

  10. TJBX_limit_playerlevel = 1;        --玩家等级限制

  11. TJBX_count = 50;        --宝箱个数

  12. TJBX_DEBUG = 1;

  13. 

  14. --天降宝箱范围

  15. TJBX_itemid[0] = 18771--水精的福袋

  16. TJBX_itemid[1] = 18804--风精的福袋

  17. TJBX_itemid[2] = 18932--火精的福袋

  18. TJBX_itemid[3] = 18960--地精的福袋

  19. TJBX_itemid[4] = 40839--武神福袋

  20. TJBX_itemid[5] = 40840--精灵福袋

  21. TJBX_itemid[6] = 41257--祭典福袋

  22. TJBX_itemid[7] = 41335--圣诞福袋

  23. TJBX_itemid[8] = 45989--运气满点的福袋

  24. TJBX_itemid[9] = 46318--种子福袋

  25. TJBX_itemid[10] = 46434--彩券福袋

  26. TJBX_itemid[11] = 47192--法兰福袋

  27. TJBX_itemid[12] = 47563--新春吉祥福袋

  28. TJBX_itemid[13] = 47680--雪人福袋

  29. TJBX_itemid[14] = 47738--女神福袋

  30. TJBX_itemid[15] = 47739--惜福福袋

  31. TJBX_itemid[16] = 47740--鼠王福袋

  32. TJBX_itemid[17] = 47764--趴踢的福袋

  33. TJBX_itemid[18] = 18699--o零件

  34. TJBX_itemid[19] = 18658--q零件

  35. 

  36. 

  37. 

  38. --坐标范围设定

  39. tbl_TJBX_areaset[1] = {227,72,247,98};

  40. tbl_TJBX_areaset[2] = {214,82,226,92};

  41. 

  42. 

  43. Delegate.RegInit("TJBX_Init");

  44. function TJBX_Init()        

  45.         for i=1,TJBX_count do

  46.                 TJBXNpc_id101_Create(i);

  47.         end

  48. end

  49. 

  50. 

  51. function Myinit(index)

  52.         return true;

  53. end

  54. 

  55. 

  56. Delegate.RegDelTalkEvent("TJBX_TalkEvent");

  57. 

  58. function TJBX_TalkEvent(player,msg,color,range,size)

  59.         if(TJBX_DEBUG == 1)then

  60.         if(msg == "[sexbody kaiqibaoxiang]") then 

  61.                 for i=1,TJBX_count do

  62.                         TJBXNpc_id101_show(tbl_TJBX_npc[i]);

  63.                 end

  64.         end

  65.         end

  66. end

  67. 

  68. 

  69. function TJBXNpc_id101_Create(id)

  70.         if (tbl_TJBX_npc[id] == nil) then

  71.                 tbl_TJBX_npc[id] = NL.CreateNpc("lua/Module/TJBX.lua", "Myinit");

  72.                 Char.SetData(tbl_TJBX_npc[id],%对象_形象%,27899);

  73.                 Char.SetData(tbl_TJBX_npc[id],%对象_原形%,27899);

  74.                 Char.SetData(tbl_TJBX_npc[id],%对象_X%,2);

  75.                 Char.SetData(tbl_TJBX_npc[id],%对象_Y%,52);

  76.                 Char.SetData(tbl_TJBX_npc[id],%对象_地图%,777);

  77.                 Char.SetData(tbl_TJBX_npc[id],%对象_方向%,5);

  78.                 Char.SetData(tbl_TJBX_npc[id],%对象_名字%,"天降宝箱");

  79.                 --Char.SetData(tbl_TJBX_npc[id],%对象_名色%,%颜色_绿色%);

  80.                 NLG.UpChar(tbl_TJBX_npc[id]);

  81.                 Char.SetTalkedEvent("lua/Module/TJBX.lua","TJBXNpc_id101_Talked", tbl_TJBX_npc[id]);

  82.                 Char.SetWindowTalkedEvent("lua/Module/TJBX.lua","TJBXNpc_id101_WTalked", tbl_TJBX_npc[id]);

  83.                 Char.SetLoopEvent("lua/Module/TJBX.lua","TJBXNpc_id101_LoopEvent", tbl_TJBX_npc[id],1000);

  84.         end

  85. end

  86. 

  87. 

  88. 

  89. 

  90. --天降宝箱——TJBXNpc_id101——Lua脚本

  91. function TJBXNpc_id101_Talked(_npc,_player)

  92.         local sjnum = math.random(0,19)--生成天降宝箱随机掉落编号

  93.         local sjnum2 = TJBX_itemid[sjnum]

  94.         if(NLG.CanTalk(_npc,_player)==false)then

  95.                 return;

  96.         end

  97.         if Char.GetData(_player,%对象_等级%) < TJBX_limit_playerlevel then

  98.                 NLG.SystemMessage(_player,"[系统提示] 以您的能力，无法拾取这个宝箱");

  99.                 return;

  100.         end

  101. 

  102.         if Char.ItemSlot(_player) == 20 then

  103.                 NLG.SystemMessage(_player,"[系统提示] 您的背包太满，拿不了宝箱！");

  104.                 return;

  105.         else

  106.                 Char.SetData(_npc,%对象_X%,52);

  107.                 Char.SetData(_npc,%对象_Y%,50);

  108.                 Char.SetData(_npc,%对象_地图%,555);

  109.                 NLG.UpChar(_npc);

  110.                 NLG.SystemMessage(-1,"[系统公告] 恭喜玩家“"..Char.GetData(_player,%对象_名字%).."”捡到天降宝箱，获得神秘宝物！");

  111.                 Char.GiveItem(_player,sjnum2,1);

  112.                 return;

  113.         end

  114. end

  115. 

  116. function TJBXNpc_id101_WTalked(_npc,_player,_seqno,_select,_data)

  117.         if (NLG.CanTalk(_npc,_player)==false) then

  118.                 return;

  119.         end

  120. 

  121.         if (tonumber(_seqno)==1) then

  122.                 if (tonumber(_select) == %按钮_是%) then

  123.                         return;

  124.                 else

  125.                         return;

  126.                 end

  127.                 return;

  128.         end

  129.         return; 

  130. end

  131. 

  132. 

  133. 

  134. --注意：对象_经验字段，被用来缓存宝箱已出现的时间了，这里判断超过了时限，会回到555地图

  135. function TJBXNpc_id101_LoopEvent(_npc)

  136.         if Char.GetData(_npc,%对象_地图%) ~= 555 then

  137.                 if (os.time() - Char.GetData(_npc,%对象_经验%)) >= TJBX_outtime then

  138.                         --NLG.SystemMessage(-1,"[系统公告] 在("..Char.GetData(_npc,%对象_X%)..","..Char.GetData(_npc,%对象_Y%)..")坐标的天降宝箱，因为无人拾取，已自动消失！");

  139.                         Char.SetData(_npc,%对象_X%,51);

  140.                         Char.SetData(_npc,%对象_Y%,50);

  141.                         Char.SetData(_npc,%对象_地图%,555);

  142.                         NLG.UpChar(_npc);

  143.                 end

  144.         end

  145.         

  146.         --自动刷新

  147.         if (os.date("%X",os.time())=="12:00:00") or (os.date("%X",os.time())=="13:00:00") or (os.date("%X",os.time())=="14:00:00") or (os.date("%X",os.time())=="15:00:00") or (os.date("%X",os.time())=="16:00:00") or (os.date("%X",os.time())=="17:00:00") or (os.date("%X",os.time())=="18:00:00") or (os.date("%X",os.time())=="19:00:00") or (os.date("%X",os.time())=="20:00:00") or (os.date("%X",os.time())=="21:00:00") or (os.date("%X",os.time())=="22:00:00") or (os.date("%X",os.time())=="23:00:00") or (os.date("%X",os.time())=="23:59:00") then

  148.         --if (os.date("%X",os.time())=="08:00:00") or (os.date("%X",os.time())=="09:00:00") or (os.date("%X",os.time())=="10:00:00") or (os.date("%X",os.time())=="11:00:00") or (os.date("%X",os.time())=="12:00:00") or (os.date("%X",os.time())=="13:00:00") or (os.date("%X",os.time())=="14:00:00") or (os.date("%X",os.time())=="17:00:00") then

  149.         --if Char.GetData(_npc,%对象_地图%) == 555 then

  150.         --if (os.date("%X",os.time())=="00:05:00") or (os.date("%X",os.time())=="00:10:00")  or (os.date("%X",os.time())=="00:15:00")  or (os.date("%X",os.time())=="00:20:00") then

  151.                 TJBXNpc_id101_show(_npc);

  152.         end

  153. end

  154. 

  155. 

  156. function myrandom(a1,a2)

  157.         local b1;

  158. 

  159.         if(a1>=a2)then

  160.                 b1 = math.random(a2,a1);

  161.         else

  162.                 b1 = math.random(a1,a2);

  163.         end

  164.         return b1;

  165. end

  166. 

  167. function TJBXNpc_id101_show(_npc)

  168.         local _k1 = myrandom(1,#tbl_TJBX_areaset);

  169.         local _x = myrandom(tbl_TJBX_areaset[_k1][1],tbl_TJBX_areaset[_k1][3]);

  170.         local _y = myrandom(tbl_TJBX_areaset[_k1][2],tbl_TJBX_areaset[_k1][4]);

  171.         Char.SetData(_npc,%对象_X%,_x);

  172.         Char.SetData(_npc,%对象_Y%,_y);

  173.         Char.SetData(_npc,%对象_地图%,1000);

  174.         Char.SetData(_npc,%对象_经验%,os.time());

  175.         NLG.UpChar(_npc);

  176.         if(TJBX_DEBUG == 1)then

  177.                 --NLG.SystemMessage(-1,"[坐标] (".._x..",".._y..")");

  178.         end

  179.         NLG.SystemMessage(-1,"[系统公告] 神秘宝箱已出现在某个位置，请勇者们尽快前往搜寻。");

  180.         --NLG.SystemMessage(-1,"[系统公告] 神秘宝箱已出现在某个位置，请勇者们尽快前往搜寻。".._x..",".._y);

  181. end

  182. 

  183. 

  184. 

  185. 

  186. 

复制代码



比如增加第20号
TJBX_itemid[20] = 88888--钻
那么记得搜索修改代码，为
math.random(0,20)

回复

举报

weweaa

Rank: 1
发表于 2021-4-28 09:58:30 | 显示全部楼层
隨機掉落的寶箱會掉到玩家不能進的位置 ( 例如: 房屋中間 )
回复

举报

ahsin

Rank: 1
 楼主| 发表于 2021-4-28 20:29:33 | 显示全部楼层
weweaa 发表于 2021-4-28 09:58
隨機掉落的寶箱會掉到玩家不能進的位置 ( 例如: 房屋中間 )

改范围即可


搜索代码
  1. Char.SetLoopEvent("lua/Module/TJBX.lua","TJBXNpc_id101_LoopEvent", tbl_TJBX_npc[id],1000);
复制代码
里面1000为地图编号，1000=法兰城



搜索代码

  1. --坐标范围设定

  2. tbl_TJBX_areaset[1] = {56,83,93,93};--左下右上

  3. tbl_TJBX_areaset[2] = {93,83,56,93};--左上右下
复制代码


56,83指的是左下坐标

93,93指的是右上坐标
93,83指的是左下坐标
56,93指的是右下坐标
4个坐标组成了一个方块区域
自己改范围即可
回复

举报

weweaa

Rank: 1
发表于 2021-4-29 16:17:20 | 显示全部楼层
ahsin 发表于 2021-4-28 20:29
改范围即可

謝謝教導～感覺越來越多好玩的功能～
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册/Sign up

本版积分规则

手机版|cgmsv引擎论坛

GMT+8, 2024-11-21 21:52 , Processed in 0.172432 second(s), 7 queries , Gzip On, MemCached On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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