Lua脚本语言入门（目前魔兽使用的可以写在宏内的语言）

作者： 沐枫
　　在这篇文章中，我想向大家介绍如何进行Lua程序设计。我假设大家都学过至少一门编程语言，比如Basic或C，特别是C。因为Lua的最大用途是在宿主程序中作为脚本使用的。
　　Lua 的语法比较简单，学习起来也比较省力，但功能却并不弱。
　　在Lua中，一切都是变量，除了关键字。请记住这句话。

I. 首先是注释
　　写一个程序，总是少不了注释的。
　　在Lua中，你可以使用单行注释和多行注释。
　　单行注释中，连续两个减号"--"表示注释的开始，一直延续到行末为止。相当于C++语言中的"//"。
　　多行注释中，由"--[["表示注释开始，并且一直延续到"]]"为止。这种注释相当于C语言中的"/*…*/"。在注释当中，"[["和"]]"是可以嵌套的。
II. Lua编程
　　经典的"Hello world"的程序总是被用来开始介绍一种语言。在Lua中，写一个这样的程序很简单：
　　print("Hello world")
　　在Lua中，语句之间可以用分号"；"隔开，也可以用空白隔开。一般来说，如果多个语句写在同一行的话，建议总是用分号隔开。
　　Lua 有好几种程序控制语句，如：

　　条件控制：if 条件 then … elseif 条件 then … else … end
　　While循环：while 条件 do … end
　　Repeat循环：repeat … until 条件
　　For循环：for 变量 = 初值，终点值，步进 do … end
　　For循环：for 变量1，变量2，… ，变量N in表或枚举函数 do … end

　　注意一下，for的循环变量总是只作用于for的局部变量，你也可以省略步进值，这时候，for循环会使用1作为步进值。
　　你可以用break来中止一个循环。
　　如果你有程序设计的基础，比如你学过Basic，C之类的，你会觉得Lua也不难。但Lua有几个地方是明显不同于这些程序设计语言的，所以请特别注意。

　　．语句块
　　　　语句块在C++中是用"{"和"}"括起来的，在Lua中，它是用do 和 end 括起来的。比如： 
　　　　do print("Hello") end
　　　　你可以在 函数 中和 语句块 中定局部变量。

　　．赋值语句
　　　　赋值语句在Lua被强化了。它可以同时给多个变量赋值。
　　　　例如：
　　　　a,b,c,d=1,2,3,4
　　　　甚至是：
　　　　a,b=b,a -- 多么方便的交换变量功能啊。
　　　　在默认情况下，变量总是认为是全局的。假如你要定义局部变量，则在第一次赋值的时候，需要用local说明。比如：
　　　　local a,b,c = 1,2,3 -- a,b,c都是局部变量

　　．数值运算
　　　　和C语言一样，支持 +, -, *, /。但Lua还多了一个"^"。这表示指数乘方运算。比如2^3 结果为8, 2^4结果为16。
　　　　连接两个字符串，可以用".."运处符。如：
　　　　"This a " .. "string." -- 等于 "this a string"

　　．比较运算
　　　　< > <= >= == ~=
　　　　分别表示 小于，大于，不大于，不小于，相等，不相等
　　　　所有这些操作符总是返回true或false。
　　　　对于Table，Function和Userdata类型的数据，只有 == 和 ~=可以用。相等表示两个变量引用的是同一个数据。比如：
　　　　a={1,2}
　　　　b=a
　　　　print(a==b, a~=b) -- true, false
　　　　a={1,2}
　　　　b={1,2}
　　　　print(a==b, a~=b) -- false, true

　　．逻辑运算
　　　　and, or, not
　　　　其中，and 和 or 与C语言区别特别大。
　　　　在这里，请先记住，在Lua中，只有false和nil才计算为false，其它任何数据都计算为true，0也是true！
　　　　and 和 or的运算结果不是true和false，而是和它的两个操作数相关。
　　　　a and b：如果a为false，则返回a；否则返回b
　　　　a or b：如果 a 为true，则返回a；否则返回b

　　　　举几个例子：
　　　　 print(4 and 5) --> 5
　　　　 print(nil and 13) --> nil
　　　　 print(false and 13) --> false
　　　　 print(4 or 5) --> 4
　　　　 print(false or 5) --> 5

　　　　在Lua中这是很有用的特性，也是比较令人混洧的特性。
　　　　我们可以模拟C语言中的语句：x = a? b : c，在Lua中，可以写成：x = a and b or c。
　　　　最有用的语句是： x = x or v，它相当于：if not x then x = v end 。

　　．运算符优先级，从高到低顺序如下：
　　　　^
　　　　not - （一元运算）
　　　　 * /
　　　　 + -
　　　　 ..（字符串连接）
　　　　 < > <= >= ~= ==
　　　　 and
　　　　 or

III. 关键字
　　关键字是不能做为变量的。Lua的关键字不多，就以下几个：
　　and break do else elseif
　　end false for function if
　　in local nil not or
　　repeat return then true until　while

IV. 变量类型
　　怎么确定一个变量是什么类型的呢？大家可以用type()函数来检查。Lua支持的类型有以下几种：

　　Nil 空值，所有没有使用过的变量，都是nil。nil既是值，又是类型。
　　Boolean 布尔值
　　Number 数值，在Lua里，数值相当于C语言的double
　　String 字符串，如果你愿意的话，字符串是可以包含''字符的
　　Table 关系表类型，这个类型功能比较强大，我们在后面慢慢说。
　　Function 函数类型，不要怀疑，函数也是一种类型，也就是说，所有的函数，它本身就是一个变量。
　　Userdata 嗯，这个类型专门用来和Lua的宿主打交道的。宿主通常是用C和C++来编写的，在这种情况下，Userdata可以是宿主的任意数据类型，常用的有Struct和指针。
　　Thread　　 线程类型，在Lua中没有真正的线程。Lua中可以将一个函数分成几部份运行。如果感兴趣的话，可以去看看Lua的文档。

V. 变量的定义
　　所有的语言，都要用到变量。在Lua中，不管你在什么地方使用变量，都不需要声明，并且所有的这些变量总是全局变量，除非，你在前面加上"local"。
　　这一点要特别注意，因为你可能想在函数里使用局部变量，却忘了用local来说明。
　　至于变量名字，它是大小写相关的。也就是说，A和a是两个不同的变量。
　　定义一个变量的方法就是赋值。"＝"操作就是用来赋值的
　　我们一起来定义几种常用类型的变量吧。
　　A. Nil
　　　　正如前面所说的，没有使用过的变量的值，都是Nil。有时候我们也需要将一个变量清除，这时候，我们可以直接给变量赋以nil值。如：
　　　　var1=nil -- 请注意 nil 一定要小写

　　B. Boolean
　　　　布尔值通常是用在进行条件判断的时候。布尔值有两种：true 和 false。在Lua中，只有false和nil才被计算为false，而所有任何其它类型的值，都是true。比如0，空串等等，都是true。不要被C语言的习惯所误导，0在Lua中的的确确是true。你也可以直接给一个变量赋以Boolean类型的值，如：
　　　　varboolean = true

　　C. Number
　　　　在Lua中，是没有整数类型的，也不需要。一般情况下，只要数值不是很大（比如不超过100,000,000,000,000），是不会产生舍入误差的。在很多CPU上，实数的运算并不比整数慢。
　　　　实数的表示方法，同C语言类似，如：
　　　　4 0.4 4.57e-3 0.3e12 5e+20

　　D. String
　　　　字符串，总是一种非常常用的高级类型。在Lua中，你可以非常方便的定义很长很长的字符串。
　　　　字符串在Lua中有几种方法来表示，最通用的方法，是用双引号或单引号来括起一个字符串的，如：
　　　　"This is a string."
　　　　和C语言相同的，它支持一些转义字符，列表如下：
　　　　a bell
　　　　b back space
　　　　f form feed
　　　　n newline
　　　　r carriage return
　　　　t horizontal tab
　　　　v vertical tab
　　　　\ backslash
　　　　" double quote
　　　　' single quote
　　　　[ left square bracket
　　　　] right square bracket

　　　　由于这种字符串只能写在一行中，因此，不可避免的要用到转义字符。加入了转义字符的串，看起来实在是不敢恭维，比如：
　　　　"one linennext linen"in quotes", 'in quotes'"
　　　　一大堆的""符号让人看起来很倒胃口。如果你与我有同感，那么，我们在Lua中，可以用另一种表示方法：用"[["和"]]"将多行的字符串括起来，如：
　　　　page = [[
　　　　<HTML>
　　　　　　<HEAD>
　　　　　　　　<TITLE>An HTML Page</TITLE>
　　　　　　</HEAD>
　　　　　　<BODY>
　　　　　　　　<A HREF="http://www.lua.org">Lua</A>
　　　　　　　　[[a text between double brackets]]
　　　　　　</BODY>
　　　　</HTML>
　　　　]]

　　　　值得注意的是，在这种字符串中，如果含有单独使用的"[["或"]]"就仍然得用"["或"]"来避免歧义。当然，这种情况是极少会发生的。

E. Table
　　　　关系表类型，这是一个很强大的类型。我们可以把这个类型看作是一个数组。只是C语言的数组，只能用正整数来作索引；在Lua中，你可以用任意类型来作数组的索引，除了nil。同样，在C语言中，数组的内容只允许一种类型；在Lua中，你也可以用任意类型的值来作数组的内容，除了nil。
　　　　Table的定义很简单，它的主要特征是用"{"和"}"来括起一系列数据元素的。比如：

　　　　T1 = {} -- 定义一个空表
　　　　T1[1]=10 -- 然后我们就可以象C语言一样来使用它了。
　　　　T1["John"]={Age=27, Gender="Male"}
　　　　这一句相当于：
　　　　T1["John"]={} -- 必须先定义成一个表，还记得未定义的变量是nil类型吗
　　　　T1["John"]["Age"]=27
　　　　T1["John"]["Gender"]="Male"
　　　　当表的索引是字符串的时候，我们可以简写成：
　　　　T1.John={}
　　　　T1.John.Age=27
　　　　T1.John.Gender="Male"
　　　　或
　　　　T1.John{Age=27, Gender="Male"}
　　　　这是一个很强的特性。

　　　　在定义表的时候，我们可以把所有的数据内容一起写在"{"和"}"之间，这样子是非常方便，而且很好看。比如，前面的T1的定义，我们可以这么写：

　　　　T1=
　　　　{
　　　　　　10, -- 相当于 [1] = 10
　　　　　　[100] = 40,
　　　　　　John= -- 如果你原意，你还可以写成：["John"] =
　　　　　　{
　　　　　　　　Age=27,   -- 如果你原意，你还可以写成：["Age"] =27
　　　　　　　　Gender=Male   -- 如果你原意，你还可以写成：["Gender"] =Male
　　　　　　},
　　　　　　20 -- 相当于 [2] = 20
　　　　}

　　　　看起来很漂亮，不是吗？我们在写的时候，需要注意三点：
　　　　第一，所有元素之间，总是用逗号"，"隔开；
　　　　第二，所有索引值都需要用"["和"]"括起来；如果是字符串，还可以去掉引号和中括号；
　　　　第三，如果不写索引，则索引就会被认为是数字，并按顺序自动从1往后编；

　　　　表类型的构造是如此的方便，以致于常常被人用来代替配置文件。是的，不用怀疑，它比ini文件要漂亮，并且强大的多。

　　F. Function
　　　　函数，在Lua中，函数的定义也很简单。典型的定义如下：
　　　　function add(a,b) -- add 是函数名字，a和b是参数名字
　　　　 return a+b -- return 用来返回函数的运行结果
　　　　end

　　　　请注意，return语言一定要写在end之前。假如你非要在中间放上一句return，那么请写成：do return end。
　　　　还记得前面说过，函数也是变量类型吗？上面的函数定义，其实相当于：
　　　　add = function (a,b) return a+b end
　　　　当你重新给add赋值时，它就不再表示这个函数了。你甚至可以赋给add任意数据，包括nil （这样，你就清除了add变量）。Function是不是很象C语言的函数指针呢？

　　　　和C语言一样，Lua的函数可以接受可变参数个数，它同样是用"…"来定义的，比如：
　　　　function sum (a,b,…)
　　　　如果想取得…所代表的参数，可以在函数中访问arg局部变量（表类型）得到。
　　　　如 sum(1,2,3,4)
　　　　则，在函数中，a = 1, b = 2, arg = {3, 4}
　　　　更可贵的是，它可以同时返回多个结果，比如：
　　　　function s()
　　　　　　return 1,2,3,4
　　　　end
　　　　a,b,c,d = s() -- 此时，a = 1, b = 2, c = 3, d = 4
前面说过，表类型可以拥有任意类型的值，包括函数！因此，有一个很强大的特性是，拥有函数的表，哦，我想更恰当的应该说是对象吧。Lua可以使用面向对象编程了。不信？那我举例如下：

　　　　t =
　　　　{
　　　　 Age = 27
　　　　 add = function(self, n) self.Age = self.Age+n end
　　　　}
　　　　print(t.Age) -- 27
　　　　t.add(t, 10)
　　　　print(t.Age) -- 37

　　　　不过，t.add(t,10) 这一句实在是有点土对吧？没关系，在Lua中，你可以简写成：
　　　　t:add(10)   -- 相当于 t.add(t,10)

　　G. Userdata 和 Thread
　　　　这两个类型的话题，超出了本文的内容，就不打算细说了。

VI. 结束语
　　就这么结束了吗？当然不是，接下来，需要用Lua解释器，来帮助你理解和实践了。这篇小文只是帮助你大体了解Lua的语法。如果你有编程基础，相信会很快对Lua上手了。
　　就象C语言一样，Lua提供了相当多的标准函数来增强语言的功能。使用这些标准函数，你可以很方便的操作各种数据类型，并处理输入输出。有关这方面的信息，你可以参考《Programming in Lua 》一书，你可以在网络上直接观看电子版，网址为：http://www.lua.org/pil/index.html
　　当然，Lua的最强大的功能是能与宿主程序亲蜜无间的合作，因此，下一篇文章，我会告诉大家，如何在你的程序中使用Lua语言作为脚本，使你的程序和Lua脚本进行交互。
---------------------------------------------------------------------------------------------------------
使用流程
1. 函数的使用
以下程序演示了如何在Lua中使用函数, 及局部变量
例e02.lua
-- functions 
function pythagorean(a, b)   
local c2 = a^2 + b^2   
return sqrt(c2) 
end 
print(pythagorean(3,4))

运行结果
5

程序说明
在Lua中函数的定义格式为:
function 函数名(参数)
...
end
与Pascal语言不同, end不需要与begin配对, 只需要在函数结束后打个end就可以了.
本例函数的作用是已知直角三角形直角边, 求斜边长度. 参数a,b分别表示直角边长,
在函数内定义了local形变量用于存储斜边的平方. 与C语言相同, 定义在函数内的代
码不会被直接执行, 只有主程序调用时才会被执行.
local表示定义一个局部变量, 如果不加local刚表示c2为一个全局变量, local的作用域
是在最里层的end和其配对的关键字之间, 如if ... end, while ... end等。全局变量的
作用域是整个程序。

2. 循环语句
例e03.lua
-- Loops 
for i=1,5 do   
print("i is now " .. i) 
end

运行结果
i is now 1 
i is now 2 
i is now 3 
i is now 4 
i is now 5

程序说明
这里偶们用到了for语句
for 变量 = 参数1, 参数2, 参数3 do
循环体
end
变量将以参数3为步长, 由参数1变化到参数2
例如:   
for i=1,f(x) do print(i) end
for i=10,1,-1 do print(i) end

这里print("i is now " .. i)中，偶们用到了..，这是用来连接两个字符串的，
偶在(1)的试试看中提到的，不知道你们答对了没有。
虽然这里i是一个整型量，Lua在处理的时候会自动转成字符串型，不需偶们费心。

3. 条件分支语句
例e04.lua
-- Loops and conditionals 
for i=1,5 do
print(“i is now “ .. i)
  if i < 2 then     
  print(“small”)   
  elseif i < 4 then     
  print(“medium”)   
  else     
  print(“big”)   
  end 
end

运行结果
i is now 1 
small 
i is now 2 
medium 
i is now 3 
medium 
i is now 4 
big 
i is now 5 
big

程序说明
if else用法比较简单, 类似于C语言, 不过此处需要注意的是整个if只需要一个end,
哪怕用了多个elseif, 也是一个end.
例如
if op == "+" then
  r = a + b
elseif op == "-" then
  r = a - b
elseif op == "*" then
  r = a*b
elseif op == "/" then
  r = a/b
else
  error("invalid operation")
end


4.试试看
Lua中除了for循环以外, 还支持多种循环, 请用while...do和repeat...until改写本文中的for程序
----------------------------------------------------------------------------------------------------------
数组的使用

1.简介
Lua语言只有一种基本数据结构, 那就是table, 所有其他数据结构如数组啦,
类啦, 都可以由table实现.

2.table的下标
例e05.lua
-- Arrays 
myData = {} 
myData[0] = “foo” 
myData[1] = 42 

-- Hash tables 
myData[“bar”] = “baz” 

-- Iterate through the 
-- structure 
for key, value in myData do   
print(key .. “=“ .. value) 
end

输出结果
0=foo 
1=42 
bar=baz

程序说明
首先定义了一个table myData={}, 然后用数字作为下标赋了两个值给它. 这种
定义方法类似于C中的数组, 但与数组不同的是, 每个数组元素不需要为相同类型,
就像本例中一个为整型, 一个为字符串.

程序第二部分, 以字符串做为下标, 又向table内增加了一个元素. 这种table非常
像STL里面的map. table下标可以为Lua所支持的任意基本类型, 除了nil值以外.

Lua对Table占用内存的处理是自动的, 如下面这段代码
a = {}
a["x"] = 10
b = a   -- `b' refers to the same table as `a'
print(b["x"]) --> 10
b["x"] = 20
print(a["x"]) --> 20
a = nil   -- now only `b' still refers to the table
b = nil   -- now there are no references left to the table
b和a都指向相同的table, 只占用一块内存, 当执行到a = nil时, b仍然指向table,
而当执行到b=nil时, 因为没有指向table的变量了, 所以Lua会自动释放table所占内存

3.Table的嵌套
Table的使用还可以嵌套，如下例
例e06.lua
-- Table ‘constructor’ 
myPolygon = {   
color=“blue”,   
thickness=2,   
npoints=4;   
{x=0,   y=0},   
{x=-10, y=0},   
{x=-5, y=4},   
{x=0,   y=4} 
}

-- Print the color 
print(myPolygon[“color”]) 

-- Print it again using dot 
-- notation 
print(myPolygon.color) 

-- The points are aclearcase/" target="_blank" >ccessible 
-- in myPolygon[1] to myPolygon[4] 

-- Print the second point’s x 
-- coordinate 
print(myPolygon[2].x)

程序说明
首先建立一个table, 与上一例不同的是，在table的constructor里面有{x=0,y=0}, 
这是什么意思呢？ 这其实就是一个小table, 定义在了大table之内, 小table的
table名省略了.
最后一行myPolygon[2].x，就是大table里面小table的访问方式.
-----------------------------------------------------------------------------------------------------------
如何简化你的宏.

虽然以上介绍让我们了解道宏可以完成非常强大的功能，但暴雪实在太小气了，仅仅只给我们255个字符来编写宏的内容，假如你的宏的功能比较罗嗦，那就很麻烦了，所以以下我介绍一下一些简化宏的小技巧：

1、定义全局变量
看完之前Lua介绍的人该都知道把，在Lua里，所有的变量都是全局变量，也就是说任何一个变量只要你在开始游戏后做过定义，那么到游戏结束时只要你不重新定义他都是有效的。但为了不让我们自己不混淆做全局用的变量和局部使用的变量，我们可以采用大小写区分的办法，即大写一律做为全局变量使用，小写都用局部变量。
这样，我们可以在一个宏里把自己常用的魔法/技能都定义成变量来表示，比如我是个术士，就可以这样：
F="腐蚀术(等级 3)"   X="献祭(等级 3)".......
之后，我们要使用这样魔法的时候，只要直接用F或X来代替就可以了，连""都可以省掉，是不是很方便呢~
或者还可以把一些常见的API函数变量也自己定义：
T="target" P="player".....
使用的时候和上面一样。

2、自定义函数
说实在话，魔兽的有些函数实在长的过头，很多时候珍贵的字节都给函数占去了。所以必要的时候我们就得用自定义函数的方法去简化这些函数。
自定义函数的语句为：
function 函数名称(函数变量1、函数变量2....) return 函数返回值 end
比如，使用法术的这个函数是CastByName()，我们可以在宏里这样写：
/scirpt function C(a) CastByName(a) end
运行后，我们其他宏使用法术就只要直接用C()就可以了，是不是很方便呢？
或是说话的函数：
/script function S(a) SendChatMessage(a,"SAY") end
之后你要控制人物说话就用S()就可以了。

如果是有返回值的函数：
/script
function N(a)
return UNitName(a)       --return之后就是表示函数的返回值,但return必须在end前面.
end
如果以后你要调用目标的名字，直接用 x=N("target")，如果按前面第一点定义了全局变量的话，更简单x=N(T)。

这样，我们就可以把重要的字节都用在宏的判断内容上，而不是沉长的函数上了。如果你还有什么更好的简化方法，可以跟贴哦。
-------------------------------------------------------------------------------------------------------
关于背包物品使用整理类的宏的制作

由于游戏提供的函数无法直接由物品名称调用该物品，所以通常简单的使用物品宏是比较麻烦的，一定要把使用的物品放在背包内特定的位置

；或则大多术士都需要的问题，能随时监视自己的灵魂碎片（当然，有插件可以做到这一点）。

以下我写写关于如何制作这类宏：

首先，我们要在背包里找到自己需要的东西，必须用循环里遍历这些包。由于放的位置有2个参数，1个是包的编号，一个是包内槽位的编号，

所以我们需要一个循环嵌套来搜索：

以下假设我们身上都是16格的包：
for bag=0,4,1 do     --包的编号为从右到左，0,1,2,3,4
for cw=1,16,1 do   --槽位的编号为上到下，左到右 1,2,3,4,5......16
..............   --这里我们可以写如判断物品是否为我们需要的东西的语句
end         --表示内循环结束       
end           --外循环结束


或者用其他方式做这个循环：
While循环：while 条件 do … end

Repeat循环：repeat … until 条件


然后，要处理的是物品的判断：
我们有两个函数可以使用
GetContainerItemLink() 和 GetContainerItemInfo()
这两个函数使用的变量都是2个，一个是包的编号，一个是槽位的编号，但他们的返回值不同

GetContainerItemLink()是返回一个带着物品名字的连接，如果你用聊天函数把返回值说出来就可以看到，说出来的不光是物品的名称，还是

一个可以连接到物品详细内容窗口的连接。

比如，你的包里4，1的位置放了一块熊肉，那么用/script SendChatMessage(GetContainerItemLink(4,1),"SAY")后，就可以看到自己说“[熊

肉]”，而且用鼠标点一下说的内容，还可以弹出一个描写这块肉的窗口。

但要注意，直接用"[熊肉]"这样字符串来判断这个物品是不行的，例如：

if GetContainerItemLink(4,1)=="[熊肉]" then ..... end
这个判断是无效的。

正确的方法是，先把要做判断的物品的赋一个变量，再用变量做出判断：

rou=GetContainerItemLink(4,1)     --把物品连接值赋给rou

if GetContainerItemLink(4,1)==rou then ..... end   --现在就可以正常判断物品了

最后要注意的是，这个函数无法对术士的灵魂碎片做出正确的判断，意思就是，虽然灵魂碎片用这个函数显示出来是一样的，但这个函数却认

为所有的灵魂碎片都是不同的东西，即你把这个灵魂碎片的连接赋给一个变量后，这个变量就只能判断这个灵魂碎片，其他的灵魂碎片就无法

作出判断，奇怪把。所以要判断灵魂碎片，就必须用到第二个函数GetContainerItemInfo()

GetContainerItemInfo()的返回值非常多，几乎所有的物品信息都可以返回，但我们这里判断只用它返回的第一个值。
我们可以先用聊天函数来看看第一个返回值是什么样子的：
/script 
a=GetContainerItemInfo(4,1)
SendChatMessage(a,"SAY")

可以看到，返回值相当长的英文，但物品的关键字是在后面。

这样，我们就有2种方法来使用这个函数来判断物品。

1、和前一个函数的方法一样，用变量存储值后再判断，前提是要把判断的物品放在特定的位置赋一下值。
2、只使用特定物品，把物品的判断关键字写在函数里，然后用string.find()来判断他。
例子：某物品的关键字是bd
if string.find(GetContainerItemInfo(4,1),bd) then .....end --判断包1，4位置是否存在关键字为bd物品。


接着要处理的是物品的使用和交换。
使用特定背包位置的物品函数：UseContainerItem(index,slot) 
这个好理解，不用多解释了把。

拾取/放下物品的函数：PickupContainerItem(index,slot)
这个函数有意思，你鼠标上没抓着东西的时候就是帮你拿起特定位置的物品，有的话就变成放下物品到特定的位置并交换拿起该位置的物品。

所以要完成2个物品在包内的交换要使用3次这个函数：
PickupContainerItem(4,1) --拿起4，1位置的物品
PickupContainerItem(1,4) --放在1，4位置并拿起1，4位置的物品
PickupContainerItem(4,1) --把1，4位置的物品放在4，1位置


好拉，把以上几点组合后宏就基本完成了：

下面的例子是关于灵魂碎片的整理，把前4个包的灵魂碎片全放到最后一个包内：


/script
bag=0 cw=1 sc=1   --定义好变量，bag是包的编号，cw表示查找包的槽位，sc指向最后一个包内的槽位
for bag=0,3,1 do --从0号包开始，到3号包结束，最后一个包不搜索。
for cw=1,16,1 do   --这里假设所有的包都是16个槽位的，如果没那么多槽位的包也可以用。
if GetContainerItemLink(bag,cw)~=nil --判断这个槽位是否是空的，是空就直接跳到下一个槽位
  then 
  if string.find(GetContainerItemInfo(bag,cw),"Gem") --判断这个槽位里是否是灵魂碎片，Gem为灵魂碎片的关键字
  then 
    while string.find(GetContainerItemInfo(4,sc),"Gem") do sc=sc+1 end 
        --这是一个小循环，用于判断最后一个包里原来是否已经有灵魂碎片，有的话就指向包的下一个槽位
    PickupContainerItem(bag,cw) 
    PickupContainerItem(4,sc) 
    PickupContainerItem(bag,cw)   --这3句控制灵魂碎片和最后一个包内物品的交换
    sc=sc+1   --重要，不能忘记这个，每放置好一个碎片后就要把最后一个包的
        槽位指针指向下一个槽位，上面的小循环是无法判断刚刚放好的碎片的。
  end
end 
end 
end   -循环结束

完了么，当然不行。。。因为宏的限制是255个字。所以要简化我们的宏。

最长的内容估计就是函数了，就先从简化函数开始：

建立以下宏：


/script function P(c,d) PickupContainerItem(c,d) end 
/script function I(e,f) if GetContainerItemInfo(e,f) then return string.find(GetContainerItemInfo(e,f),"Gem") else return nil end end

原来的宏就变成了：

/script
bag=0 cw=1 sc=1   
for bag=0,3,1 do 
for cw=1,16,1 do 
if G(bag,cw)~=nil 
  then 
  if I(bag,cw)
  then 
    while I(4,sc) do sc=sc+1 end 
    P(bag,cw) 
    P(4,sc) 
    P(bag,cw)   
    sc=sc+1   
  end       
end 
end 
end 

多余的变量定义和过长的变量都可以更改：


/script
s=1   
for g=0,3 do 
for w=1,16 do 
if G(g,w) 
  then 
  if I(g,w)
  then 
    while I(4,s) do s=s+1 end 
    P(g,w) 
    P(4,s) 
    P(g,w)   
    s=s+1   
  end       
end 
end 
end 

现在写的下了吧。呵呵，至于使用物品的宏我虽然已经写好了，但没有测试过，等测试没问题后再放出来把。有兴趣的朋友也可以自己写写。

但要注意一点，使用物品的宏只要找到物品就可以马上跳出循环，所以用Repeat循环做比较合适

原文转自：http://www.ltesting.net