entry.lua
Upload User: bjtaixing
Upload Date: 2021-01-15
Package Size: 24749k
Code Size: 2k
Category:

E-Books

Development Platform:

DOS

  1. --此文件中,凡是可能被多次执行的函数,函数名都要加上地图名前缀,如after_destroy_entry_testpk
  2. --此文件每行最大字符个数为255,若有异议,请与程序探讨
  3. function config_entry(entry) 
  4.     SetMapEntryEntiID(entry, 193,1) --设置地图入口实体的编号(该编号对应于characterinfo.txt的索引)
  5. end 
  6. function after_create_entry(entry) 
  7.     local copy_mgr = GetMapEntryCopyObj(entry, 0) --创建副本管理对象,此函数在有显式入口的地图中必须调用,对于隐式入口的地图(如队伍挑战)无要调用该接口
  8.     map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry) --取地图入口的位置信息(地图名,坐标,目标地图名)
  9.     Notice("海盗广播:有玩家发现,在深蓝大陆的["..posx..","..posy.."]位置附近发现一个通往《幻影冰狼》的入口,该消息尚未核实,请有关单位注意。") --通知本组服务器的所有玩家
  10. end
  11. function after_destroy_entry_binglang2(entry)
  12.     map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry) 
  13.     Notice("海盗广播:据玩家提供的消息,通往《幻影冰狼》的入口已经消失了。请大家继续关注我台的广播,祝您愉快~!") 
  14. end
  15. function after_player_login_binglang2(entry, player_name)
  16.     map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry) --取地图入口的位置信息(地图名,坐标,目标地图名)
  17.     ChaNotice(player_name, "海盗广播:有玩家发现,在深蓝大陆的["..posx..","..posy.."]位置附近发现一个通往《幻影冰狼》的入口,该消息尚未核实,请有关单位注意。") --通知本组服务器的所有玩家
  18. end
  19. --用于检测进入条件
  20. --返回值:0,不满足进入条件。1,成功进入。
  21. function check_can_enter_binglang2( role, copy_mgr )
  22. local i = IsChaStall(role)
  23. if i == LUA_TRUE then
  24. SystemNotice(role, "摆摊状态不可传送哦")
  25. return 0    
  26. end
  27. if Lv(role) < 70 then
  28. SystemNotice(role, "进入进入幻影冰狼角色等级必须在70级以上")
  29. return 0    
  30. end
  31. if Lv(role) > 119 then
  32. SystemNotice(role, "进入进入幻影冰狼角色等级必须在120级以下")
  33. return 0    
  34. end
  35. local Num
  36. Num = CheckBagItem(role,2326)
  37. if Num < 1 then
  38. SystemNotice(role, "没有真实面具,无法正确通过幻像到幻影冰狼")
  39. return 0
  40. end
  41. local Credit_Binglang2 = GetCredit(role)
  42. if Credit_Binglang2 < 10 then
  43. SystemNotice(role, "您的名声值不够,不能进入幻影冰狼")
  44. return 0
  45. else
  46. DelCredit(role,10)
  47. return 1
  48. end
  49. end
  50. function begin_enter_binglang2(role, copy_mgr)
  51. local Cha = TurnToCha(role)
  52. local Dbag = 0
  53. Dbag = DelBagItem(Cha, 2326, 1)
  54. if Dbag == 1 then
  55. SystemNotice(role,"开始进入《幻影冰狼》") 
  56. MoveCity(role, "幻影冰狼")
  57. else
  58. SystemNotice(role, "收取真实面具失败,无法正确通过幻象到幻影冰狼")
  59. end
  60. end