学着写LUA脚本（一）

local npcid = 1 --这里改成你想要的NPC idfunction WarpNPC_OnGossipTalk(pUnit, event, player, pMisc) --初始菜单
pUnit:GossipCreateMenu(100, player, 0) --创建一个菜单
pUnit:GossipMenuAddItem(5, "Buff Menu", 9,0) --Buff子菜单
pUnit:GossipMenuAddItem(5, "传送菜单", 10,0) --传送子菜单
pUnit:GossipSendMenu(player) --菜单传送给玩家（显示菜单）
endfunction Help_OnGossip_select(pUnit, event, player, id, intid, code)
if (intid == 10) then --选择了传送子菜单
pUnit:GossipCreateMenu(100, player, 0) --创建一个菜单
pUnit:GossipMenuAddItem(player, 5, "Shattrath", 24, 0) --沙塔斯
pUnit:GossipMenuAddItem(player, 0, "Horde cities部落主城", 12, 0) --部落主城
pUnit:GossipMenuAddItem(player, 0, "Alliance cities联盟主城", 13, 0) --联盟主城
pUnit:GossipSendMenu(player) --显示菜单
endif(intid == 12) then
pUnit:GossipCreateMenu(100, player)
pUnit:GossipMenuAddItem(player, 5, "Orgrimmar", 16, 0) --奥格瑞玛
pUnit:GossipMenuAddItem(player, 5, "Undercity", 17, 0) --幽暗城
pUnit:GossipMenuAddItem(player, 5, "Thunder Bluff", 18, 0) --雷霆崖
pUnit:GossipMenuAddItem(player, 5, "Silvermoon City", 19, 0) --银月城
pUnit:GossipSendMenu(player) --显示菜单
endif(intid == 13) then
pUnit:GossipCreateMenu(100, player)
pUnit:GossipMenuAddItem(player, 5, "Stormwind", 20, 0) --暴风城
pUnit:GossipMenuAddItem(player, 5, "Ironforge", 21, 0) --铁炉堡
pUnit:GossipMenuAddItem(player, 5, "Darnassus", 22, 0) --达纳苏斯
pUnit:GossipMenuAddItem(player, 5, "The Exodar", 23, 0) --埃索达
pUnit:GossipSendMenu(player)
endif(intid == 24) then
player:Teleport(530, -1887.510010, 5359.379883, -12.427300) --沙塔斯坐标
endif(intid == 16) then
player:Teleport(1, 1371.068970, -4370.801758, 26.052483) --奥格瑞玛坐标
endif(intid == 17) then
player:Teleport(0, 2050.203125, 285.650604, 56.994549) --幽暗城坐标
endif(intid == 18) then
player:Teleport(1, -1304.569946, 205.285004, 68.681396) --雷霆崖坐标
endif(intid == 19) then
player:Teleport(530, 9400.486328, -7278.376953, 14.206780) --银月城坐标
endif(intid == 20) then
player:Teleport(0, -9100.480469, 406.950745, 92.594185) --暴风城坐标
endif(intid == 21) then
player:Teleport(0, -5028.265137, -825.976563, 495.301575) --铁炉堡坐标
endif(intid == 22) then
player:Teleport(1, 9985.907227, 1971.155640, 1326.815674) --达纳苏斯坐标
endif(intid == 23) then
player:Teleport(530, -4072.202393, -12014.337891, -1.277277) --埃索达坐标
endif (intid == 9) then
pUnit:GossipCreateMenu(100, player, 0) --创建菜单
pUnit:GossipMenuAddItem(5, "Buffs", 1, 0) --buff
pUnit:GossipMenuAddItem(9, "Remove Resurrection Sickness", 2, 0)--去除虚弱复活
pUnit:GossipSendMenu(player) --显示菜单
endfunction WarpNPC_OnGossipSelect(pUnit, event, player, id, intid, code, pMisc)
if (intid == 1) then
pUnit:GossipCreateMenu(99, player, 0) --创建菜单
pUnit:GossipMenuAddItem(3, "Agility敏捷", 3, 0) --敏捷
pUnit:GossipMenuAddItem(3, "Intellect智力", 4, 0) --智力
pUnit:GossipMenuAddItem(3, "quotrotection护甲", 5, 0) --护甲
pUnit:GossipMenuAddItem(3, "Spirit精神", 6, 0) --精神
pUnit:GossipMenuAddItem(3, "Stamina耐力", 7, 0) --耐力
pUnit:GossipMenuAddItem(3, "Strength力量", 8, 0) --力量
pUnit:GossipSendMenu(player) --显示菜单
endif (intid == 2) then --移除虚弱复活
pUnit:CastSpellOnTarget(15007)
player:UnlearnSpell(15007)
unit:SendChatMessage(12, 0, "You have been cleansed of Resurrection Sickness!")
pUnit:GossipComplete(player)
endif (intid == 3) then --敏捷buff
pUnit:CastSpellOnTarget(33077, player)
unit:SendChatMessage(12, 0, "You have been granted the speed of a cat!")
pUnit:GossipComplete(player)
endif (intid == 4) then --智力buff
pUnit:CastSpellOnTarget(33078, player)
unit:SendChatMessage(12, 0, "You have been granted the gift of Intelligence!")
pUnit:GossipComplete(player)
endif (intid == 5) then --护甲buff
pUnit:CastSpellOnTarget(33079, player)
unit:SendChatMessage(12, 0, "You have been granted Protection!")
pUnit:GossipComplete(player)
endif (intid == 6) then --精神buff
pUnit:CastSpellOnTarget(33080, player)
unit:SendChatMessage(12, 0, "You have been granted the gift of great Spirit!")
pUnit:GossipComplete(player)
endif (intid == 7) then --耐力buff
pUnit:CastSpellOnTarget(33081, player)
unit:SendChatMessage(12, 0, "You have been granted the Stamina of a bear!")
pUnit:GossipComplete(player)
endif (intid == 8) then
pUnit:CastSpellOnTarget(33082, player) --力量buff
unit:SendChatMessage(12, 0, "You have been granted the Strength of a tiger!")
pUnit:GossipComplete(player)
endintid = 0
endRegisterUnitGossipEvent(55556, 1, "WarpNPC_OnGossipTalk") --注册函数
RegisterUnitGossipEvent(55556, 2, "WarpNPC_OnGossipSelect")

学着写LUA脚本（一）相关推荐

【Rainmeter】写Lua脚本遇到的文件读写问题
在为Rainmeter写lua脚本的时候,如果需要文件读写(io)操作,需要注意的是不管lua脚本是哪个skin或者哪个组件调用的,它的工作目录都不是组件的根目录(即.ini文件所在的位置),而是在R ...
旧版本金庸群侠传3D新Unity重置修复版入门-lua”脚本“
金庸3DUnity重置入门系列文章金庸3dUnity重置入门 - lua 语法金庸3dUnity重置入门 - UniTask插件金庸3dUnity重置入门 - Cinemachine 动画金庸 ...
在windows程序中嵌入Lua脚本引擎--建立一个简易的“云命令”执行的系统
在<在windows程序中嵌入Lua脚本引擎--使用VS IDE编译Luajit脚本引擎>开始处,我提到某公司被指责使用"云命令"暗杀一些软件.本文将讲述如何去模拟一个 ...
Java中使用LUA脚本语言
Lua 是一个小巧的脚本语言.是巴西里约热内卢天主教大学(Pontifical Catholic University of Rio de Janeiro)里的一个研究小组,由Roberto Ieru ...
android lua sd卡,记Android层执行Lua脚本的一次实践
0. 前言最近一直在写Lua脚本,有时候出了问题,不知道是Lua层的问题,还是上游的问题,不知道从何下手.于是我学习了一点C/C++和JNI,把整个解析Lua脚本包.执行Lua脚本的流程全部都读了一 ...
Redis中的Lua 脚本
Lua/ˈluə/是一种轻量级脚本语言,它是用C 语言编写的,跟数据的存储过程有点类似.使用Lua 脚本来执行Redis 命令的好处: 1.一次发送多个命令,减少网络开销. 2.Redis 会将整个脚 ...
在C/C++中调用LUA脚本简介
简介 LUA脚本是一种可以嵌入C/C++模块的解释型语言,解释性语言与C/C++之类的编译型语言比较优点在于它无需重新编译即可生效,在处理得当的情况下甚至不需要停下程序.LUA只内置了一个功能简单的库 ...
Lua脚本介绍以及编辑器的介绍
编辑器软件LuaStudio 一:Lua脚本说来也巧,redis的大老板给了你解决这种问题的方法,那就是Lua脚本,而且redis的最新版本也支持Lua Script debug,这应该也是未来Re ...
使用Lua脚本实现高并发处理方案
我们使用 Lua 脚本可以很轻松构建出百万并发的应用系统. 由于 Tomcat 并发处理能力弱,nginx 并发处理能力强,我们可以在 nginx 上结合 Lua 脚本来高效处理业务逻辑,不用经过 T ...

学着写LUA脚本（一）

学着写LUA脚本（一）相关推荐

最新文章

热门文章