Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
entry.lua
Package: 4fcom-20090616-13.rar [view]
Upload User: bjtaixing
Upload Date: 2021-01-15
Package Size: 24749k
Code Size: 2k
Category:
E-Books
Development Platform:
DOS
- --此文件中,凡是可能被多次执行的函数,函数名都要加上地图名前缀,如after_destroy_entry_testpk
- --此文件每行最大字符个数为255,若有异议,请与程序探讨
- function config_entry(entry)
- SetMapEntryEntiID(entry, 193,1) --设置地图入口实体的编号(该编号对应于characterinfo.txt的索引)
- end
- function after_create_entry(entry)
- local copy_mgr = GetMapEntryCopyObj(entry, 0) --创建副本管理对象,此函数在有显式入口的地图中必须调用,对于隐式入口的地图(如队伍挑战)无要调用该接口
- map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry) --取地图入口的位置信息(地图名,坐标,目标地图名)
- Notice("海盗广播:有玩家发现,在深蓝大陆的["..posx..","..posy.."]位置附近发现一个通往《幻影冰狼》的入口,该消息尚未核实,请有关单位注意。") --通知本组服务器的所有玩家
- end
- function after_destroy_entry_binglang2(entry)
- map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry)
- Notice("海盗广播:据玩家提供的消息,通往《幻影冰狼》的入口已经消失了。请大家继续关注我台的广播,祝您愉快~!")
- end
- function after_player_login_binglang2(entry, player_name)
- map_name, posx, posy, tmap_name = GetMapEntryPosInfo(entry) --取地图入口的位置信息(地图名,坐标,目标地图名)
- ChaNotice(player_name, "海盗广播:有玩家发现,在深蓝大陆的["..posx..","..posy.."]位置附近发现一个通往《幻影冰狼》的入口,该消息尚未核实,请有关单位注意。") --通知本组服务器的所有玩家
- end
- --用于检测进入条件
- --返回值:0,不满足进入条件。1,成功进入。
- function check_can_enter_binglang2( role, copy_mgr )
- local i = IsChaStall(role)
- if i == LUA_TRUE then
- SystemNotice(role, "摆摊状态不可传送哦")
- return 0
- end
- if Lv(role) < 70 then
- SystemNotice(role, "进入进入幻影冰狼角色等级必须在70级以上")
- return 0
- end
- if Lv(role) > 119 then
- SystemNotice(role, "进入进入幻影冰狼角色等级必须在120级以下")
- return 0
- end
- local Num
- Num = CheckBagItem(role,2326)
- if Num < 1 then
- SystemNotice(role, "没有真实面具,无法正确通过幻像到幻影冰狼")
- return 0
- end
- local Credit_Binglang2 = GetCredit(role)
- if Credit_Binglang2 < 10 then
- SystemNotice(role, "您的名声值不够,不能进入幻影冰狼")
- return 0
- else
- DelCredit(role,10)
- return 1
- end
- end
- function begin_enter_binglang2(role, copy_mgr)
- local Cha = TurnToCha(role)
- local Dbag = 0
- Dbag = DelBagItem(Cha, 2326, 1)
- if Dbag == 1 then
- SystemNotice(role,"开始进入《幻影冰狼》")
- MoveCity(role, "幻影冰狼")
- else
- SystemNotice(role, "收取真实面具失败,无法正确通过幻象到幻影冰狼")
- end
- end