在你的游戏中应用Lua（1）：在你的游戏代码中运行解释器

  通常，你希望在你的游戏开始的时候读取一些信息，以配置你的游戏，这些信息通常都是放到一个文本文件中，在你的游戏启动的时候，你需要打开这个文件，然后解析字符串，找到所需要的信息。

  是的，或许你认为这样就足够了，为什么还要使用Lua呢？

  应用于“配置”这个目的，Lua提供给你更为强大，也更为灵活的表达方式，在上一种方式中，你无法根据某些条件来配置你的游戏，Lua提供给你灵活的表达方式，你可以类似于这样来配置你的游戏：

if player:is_dead() then
do_something()
else
do_else()
end

更为重要的是，在你做了一些修改之后，完全不需要重新编译你的游戏代码。

通常，在游戏中你并不需要一个单独的解释器，你需要在游戏来运行解释器，下面，让我们来看看，如何在你的代码中运行解释器：

//这是lua所需的三个头文件
//当然，你需要链接到正确的lib
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"

int main(int argc, char *argv[])
{
lua_State *L = lua_open();
luaopen_base(L);
luaopen_io(L);

const char *buf = "print('hello, world!')";

lua_dostring(buf);

lua_close(L);

return 0;
}

程序输出：hello, world!

有时你需要执行一段字符串，有时你可能需要执行一个文件，当你需要执行一个文件时，你可以这么做：
lua_dofile(L, "test.lua");

看，非常简单吧。







在你的游戏中应用Lua（1）：Getting Value

在上一篇文章我们能够在我们的游戏代码中执行Lua解释器，下面让我们来看看如何从脚本中取得我们所需要的信息。

首先，让我来简单的解释一下Lua解释器的工作机制，Lua解释器自身维护一个运行时栈，通过这个运行时栈，Lua解释器向主机程序传递参数，所以我们可以这样来得到一个脚本变量的值：

lua_pushstring(L, "var"); //将变量的名字放入栈
lua_gettatbl(L, LUA_GLOBALSINDEX);变量的值现在栈顶

假设你在脚本中有一个变量 var = 100
你可以这样来得到这个变量值：
int var = lua_tonumber(L, -1);

怎么样，是不是很简单？

Lua定义了一个宏让你简单的取得一个变量的值：
lua_getglobal(L, name)

我们可以这样来取得一个变量的值：
lua_getglobal(L, "var"); //变量的值现在栈顶
int var = lua_tonumber(L, -1);

完整的测试代码如下：

#include "lua.h"
#inculde "lauxlib.h"
#include "lualib.h"

int main(int argc, char *argv[])
{
lua_State *L = lua_open();
luaopen_base(L);
luaopen_io(L);

const char *buf = "var = 100";

lua_dostring(L, buf);

lua_getglobal(L, "var");
int var = lua_tonumber(L, -1);

assert(var == 100);

lua_close(L);

return 0;
}






在你的游戏中应用Lua（1）：调用函数

假设你在脚本中定义了一个函数：

function main(number)
number = number + 1
return number
end

在你的游戏代码中，你希望在某个时刻调用这个函数取得它的返回值。

在Lua中，函数等同于变量，所以你可以这样来取得这个函数：

lua_getglobal(L, "main");//函数现在栈顶

现在，我们可以调用这个函数，并传递给它正确的参数：

lua_pushnumber(L, 100); //将参数压栈
lua_pcall(L, 1, 1, 0); //调用函数，有一个参数，一个返回值
//返回值现在栈顶
int result = lua_tonumber(L, -1);

result 就是函数的返回值

完整的测试代码如下：

#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"

int main(int argc, char *argv[])
{
lua_State *L = lua_open();
luaopen_base(L);

const char *buf = "function main(number) number = number + 1 return number end";

lua_dostring(buf);

lua_getglobal(L, "main");
lua_pushnumber(L, 100);
lua_pcall(L, 1, 1, 0);

int result = lua_tonumber(L, -1);

assert(result == 101);

lua_close(L);

return 0;
}





在你的游戏中应用Lua（2）：扩展Lua


Lua本身定位在一种轻量级的，灵活的，可扩充的脚本语言，这意味着你可以自由的扩充Lua，为你自己的游戏量身定做一个脚本语言。

你可以在主机程序中向脚本提供你自定的api，供脚本调用。

Lua定义了一种类型：lua_CFunction，这是一个函数指针，它的原型是：
typedef int (*lua_CFunction) (lua_State *L);

这意味着只有这种类型的函数才能向Lua注册。

首先，我们定义一个函数

int foo(lua_State *L)
{
//首先取出脚本执行这个函数时压入栈的参数
//假设这个函数提供一个参数，有两个返回值

//get the first parameter
const char *par = lua_tostring(L, -1);

printf("%s\n", par);

//push the first result
lua_pushnumber(L, 100);

//push the second result
lua_pushnumber(L, 200);

//return 2 result
return 2;
}

我们可以在脚本中这样调用这个函数

r1, r2 = foo("hello")

print(r1..r2)

完整的测试代码如下：

#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"

int foo(lua_State *L)
{
//首先取出脚本执行这个函数时压入栈的参数
//假设这个函数提供一个参数，有两个返回值

//get the first parameter
const char *par = lua_tostring(L, -1);

printf("%s\n", par);

//push the first result
lua_pushnumber(L, 100);

//push the second result
lua_pushnumber(L, 200);

//return 2 result
return 2;
}

int main(int argc, char *argv[])
{
lua_State *L = lua_open();
luaopen_base(L);
luaopen_io(L);

const char *buf = "r1, r2 = foo("hello") print(r1..r2)";

lua_dostring(L, buf);

lua_close(L);

return 0;
}

程序输出：
hello
100200




在你的游戏中应用Lua（3）：using lua in cpp


lua和主机程序交换参数是通过一个运行时栈来进行的，运行时栈的信息放在一个lua_State的结构中，lua提供的api都需要一个lua_State*的指针，除了一个：

lua_open();

这个函数将返回一个lua_State*型的指针，在你的游戏代码中，你可以仅仅拥有一个这样的指针，也可以有多个这样的指针。

最后，你需要释放这个指针，通过函数：

lua_close(L);

注意这个事实，在你的主机程序中，open()与close()永远是成对出现的，在c++中，如果有一些事情是成对出现的，这通常意味着你需要一个构造函数和一个析构函数，所以，我们首先对lua_State做一下封装：

#ifndef LUA_EXTRALIBS
#define LUA_EXTRALIBS /* empty */
#endif

static const luaL_reg lualibs[] =
{
{"base", luaopen_base},
{"table", luaopen_table},
{"io", luaopen_io},
{"string", luaopen_string},
{"math", luaopen_math},
{"debug", luaopen_debug},
{"loadlib", luaopen_loadlib},
/* add your libraries here */
LUA_EXTRALIBS
{NULL, NULL}
};

这是lua提供给用户的一些辅助的lib，在使用lua_State的时候，你可以选择打开或者关闭它。

完整的类实现如下：


//lua_State
class state
{
public:
state(bool bOpenStdLib = false)
:
err_fn(0)
{
L = lua_open();

assert(L);

if (bOpenStdLib)
{
open_stdlib();
}
}

~state()
{
lua_setgcthreshold(L, 0);
lua_close(L);
}

void open_stdlib()
{
assert(L);

const luaL_reg *lib = lualibs;
for (; lib->func; lib++)
{
lib->func(L); /* open library */
lua_settop(L, 0); /* discard any results */
}
}

lua_State* get_handle()
{
return L;
}

int error_fn()
{
return err_fn;
}

private:
lua_State *L;

int err_fn;
};


通常我们仅仅在游戏代码中使用一个lua_State*的指针，所以我们为它实现一个单件，默认打开所有lua提供的lib:


//return the global instance
state* lua_state()
{
static state L(true);

return &L;
}




在你的游戏中应用Lua（3）：using lua in cpp（封装栈操作）　

前面提到了lua与主机程序是通过一个运行时栈来交换信息的，所以我们把对栈的访问做一下简单的封装。

我们利用从c++的函数重载机制对这些操作做封装，重载提供给我们一种以统一的方式来处理操作的机制。

向lua传递信息是通过压栈的操作来完成的，所以我们定义一些Push()函数：

inline void Push(lua_State *L, int value);
inline void Push(lua_State *L, bool value);
...

对应简单的c++内建类型，我们实现出相同的Push函数，至于函数内部的实现是非常的简单，只要利用lua提供的api来实现即可，例如：

inline void Push(lua_State *L, int value)
{
lua_pushnumber(L, value);
}

这种方式带来的好处是，在我们的代码中我们可以以一种统一的方式来处理压栈操作，如果有一种类型没有定义相关的压栈操作，将产生一个编译期错误。

后面我会提到，如何将一个用户自定义类型的指针传递到lua中，在那种情况下，我们的基本代码无须改变，只要添加一个相应的Push()函数即可。

记住close-open原则吧，它的意思是对修改是封闭的，对扩充是开放的，好的类库设计允许你扩充它，而无须修改它的实现，甚至无须重新编译。

《c++泛型设计新思维》一书提到了一种技术叫type2type，它的本质是很简单：

template <typename T>
struct type2type
{
typedef T U;
};

正如你看到的，它并没有任何数据成员，它的存在只是为了携带类型信息。

类型到类型的映射在应用于重载函数时是非常有用的，应用type2type，可以实现编译期的分派。

下面看看我们如何在从栈中取得lua信息时应用type2type：

测试类型：由于lua的类型系统与c++是不相同的，所以，我们要对栈中的信息做一下类型检测。

inline bool Match(type2type<bool>, lua_State *L, int idx)
{
return lua_type(L, idx) == LUA_TBOOLEAN;
}

类似的，我们要为cpp的内建类型提供相应的Match函数：

inline bool Match(type2type<int>, lua_State *L, int idx);
inline bool Match(type2type<const char*>, lua_State *L, int idx);

...

可以看出，type2type的存在只是为了在调用Match时决议到正确的函数上，由于它没有任何成员，所以不存在运行时的成本。

同样，我们为cpp内建类型提供Get()函数：

inline bool Get(type2type<bool>, lua_State *L, int idx)
{
return lua_toboolean(L, idx);
}

inline int Get(type2type<int>, lua_State *L, int idx)
{
return static_cast<int>(lua_tonumber(L, idx));
}

...

我想你可能注意到了，在int Get(type2type<int>)中有一个转型的动作，由于lua的类型系统与cpp的类型不同，所以转型动作必须的。

除此之外，在Get重载函数（s）中还有一个小小的细节，每个Get的函数的返回值是不相同的，因为重载机制是依靠参数的不同来识别的，而不是返回值。

前面说的都是一些基础的封装，下来我们将介绍如何向lua注册一个多参数的c函数。还记得吗？利用lua的api只能注册int (*ua_CFunction)(lua_State *)型的c函数，别忘记了，lua是用c写的。




在你的游戏中应用Lua（3）：using lua in cpp（注册不同类型的c函数）之一　

前面说到，我们可以利用lua提供的api，向脚本提供我们自己的函数，在lua中，只有lua_CFunction类型的函数才能直接向lua注册，lua_CFunction实际上是一个函数指针：
typedef int (*lua_CFunction)(lua_State *L);

而在实际的应用中，我们可能需要向lua注册各种参数和返回值类型的函数，例如，提供一个add脚本函数，返回两个值的和：

int add(int x, int y);

为了实现这个目的，首先，我们定义个lua_CFunction类型的函数：

int add_proxy(lua_State *L)
{
//取得参数
if (!Match(TypeWrapper<int>(), L, -1))
return 0;
if (!Match(TypeWrapper<int>(), L, -2))
return 0;

  int x = Get(TypeWrapper<int>(), L, -1);
  int y = Get(TypeWrapper<int>(), L, -1);
 
  //调用真正的函数
  int result = add(x, y);
 
  //返回结果
  Push(result);
 
  return 1;
}

现在，我们可以向lua注册这个函数：

lua_pushstring(L, “add”);
lua_pushcclosure(L, add_proxy, 0);
lua_settable(L, LUA_GLOBALINDEX);

在脚本中可以这样调用这个函数：

print(add(100, 200))

从上面的步骤可以看出，如果需要向lua注册一个非lua_CFunction类型的函数，需要：
1． 为该函数实现一个封装调用。
2． 在封装调用函数中从lua栈中取得提供的参数。
3． 使用参数调用该函数。
4． 向lua传递其结果。

注意，我们目前只是针对全局c函数，类的成员函数暂时不涉及，在cpp中，类的静态成员函数与c函数类似。

假设我们有多个非lua_CFunction类型的函数向lua注册，我们需要为每一个函数重复上面的步骤，产生一个封装调用，可以看出，这些步骤大多是机械的，因此，我们需要一种方式自动的实现上面的步骤。

首先看步骤1，在cpp中，产生这样一个封装调用的函数的最佳的方式是使用template，我们需要提供一个lua_CFunction类型的模板函数，在这个函数中调用真正的向脚本注册的函数，类似于这样：
template <typename Func>
inline int register_proxy(lua_State *L)

现在的问题在于：我们要在这个函数中调用真正的函数，那么我们必须要在这个函数中取得一个函数指针，然而，lua_CFunction类型的函数又不允许你在增加别的参数来提供这个函数指针，现在该怎么让regisger_proxy函数知道我们真正要注册的函数呢？

在oop中，似乎可以使用类来解决这个问题：

template <Func>
struct register_helper
{
explicit register_helper(Func fn) : m_func(fn)
{}
int register_proxy(lua_State *L);

protected:
Func m_func;
};

可是不要忘记，lua_CFunction类型指向的是一个c函数，而不是一个成员函数，他们的调用方式是不一样的，如果将上面的int register_proxy()设置为静态成员函数也不行，因为我们需要访问类的成员变量m_func;

让我们再观察一下lua_CFunction类型的函数：

int register_proxy(lua_State *L);

我们看到，这里面有一个lua_State*型的指针，我们能不能将真正的函数指针放到这里面存储，到真正调用的时候，再从里面取出来呢？

Lua提供了一个api可以存储用户数据：
Lua_newuserdata(L, size)

在适当的时刻，我们可以再取出这个数据：

lua_touserdata(L, idx)

ok，现在传递函数指针的问题我们已经解决了，后面再看第二步：取得参数。





在你的游戏中应用Lua（3）：using lua in cpp（注册不同类型的c函数）之二

在解决了传递函数指针的问题之后，让我们来看看调用函数时会有一些什么样的问题。

首 先，当我们通过函数指针调用这个函数的时候，由于我们面对的是未知类型的函数，也就是说，我们并不知道参数的个数，参数的类型，还有返回值的类型，所以我 们不能直接从lua栈中取得参数，当然，我们可以通过运行时测试栈中的信息来得到lua传递进来的参数的个数和类型，这意味着我们在稍后通过函数指针调用 函数时也需要动态的根据参数的个数和类型来决议到正确的函数，这样，除了运行时的成本，cpp提供给我们的强类型检查机制的好处也剩不了多少了，我们需要 的是一种静态的编译时的“多态”。

在cpp中，至少有两种方法可以实现这点。最直接简单的是使用函数重载，还有一种是利用模板特化机制。

简单的介绍一下模板特化：

在cpp中，可以针对一个模板函数或者模板类写出一些特化版本，编译器在匹配模板参数时会寻找最合适的一个版本。类似于这样：

templat <typename T>
T foo()
{
T tmp();
return tmp;
}

//提供特化版本
template <>
int foo()
{
return 100;
}

在main()函数中，我们可以显示指定使用哪个版本的foo：

int main(int argc, char **argv)
{
cout << foo<int>() << endl;
return 0;
}

程序将输出100，而不是0，以上代码在 g++中编译通过，由于vc6对于模板的支持不是很好，所以有一些模板的技术在vc6中可能不能编译通过。

所以最好使用重载来解决这个问题，在封装函数调用中，我们首先取得这个函数指针，然后，我们要提供一个Call函数来真正调用这个函数，类似于这样：
//伪代码
int Call(pfn, lua_State *L, int idx)

可是我们并不知道这个函数指针的类型，现在该怎么写呢？别忘记了，我们的register_proxy()是一个模板函数，它有一个参数表示了这个指针的类型：

template <typename Func>
int register_proxy(lua_State *L)
{
//伪代码，通过L参数取得这个指针
unsigned char *buffer = get_pointer(L);

//对这个指针做强制类型转化，调用Call函数
return Call(*(Func*)buffer, L, 1);
}

由重载函数Call调用真正的函数，这样，我们可以使用lua api注册相关的函数，下来我们提供一个注册的函数：

template <typename Func>
void lua_pushdirectclosure(Func fn, lua_State *L, int nUpvalue)
{
//伪代码，向L存储函数指针
save_pointer(L);

//向lua提供我们的register_proxy函数
lua_pushcclosure(L, register_proxy<Func>, nUpvalue + 1);
}

再定义相关的注册宏：
#define lua_register_directclosure(L, func) \
lua_pushstring(L, #func);
lua_pushdirectclosure(func, L, 1);
lua_settable(L, LUA_GLOBALINDEX)

现在，假设我们有一个int add(int x, int y)这样的函数，我们可以直接向lua注册：

lua_register_directclosure(L, add);

看，最后使用起来很方便吧，我们再也不用手写那么多的封装调用的代码啦，不过问题还没有完，后面我们还得解决Call函数的问题。




在你的游戏中应用Lua（3）：using lua in cpp（注册不同类型的c函数）之三　


下面，让我们集中精力来解决Call重载函数的问题吧。

前面已经说过来，Call重载函数接受一个函数指针，然后从lua栈中根据函数指针的类型，取得相关的参数，并调用这个函数，然后将返回值压入lua栈，类似于这样：

//伪代码
int Call(pfn, lua_State *L, int idx)

现在的问题是pfn该如何声明？我们知道这是一个函数指针，然而其参数，以及返回值都是未知的类型，如果我们知道返回值和参数的类型，我们可以用一个typedef来声明它：

typedef void (*pfn)();

int Call(pfn fn, lua_State *L, int idx);

我们知道的返回值以及参数的类型只是一个模板参数T，在cpp中，我们不能这样写：

template <typename T>
typedef T (*Func) ();

一种解决办法是使用类模板：

template <typename T>
struct CallHelper
{
typedef T (*Func) ();
};

然后在Call中引用它：

template <typename T>
int Call(typename CallHelper::Func fn, lua_State *L, int idx)

注意typename关键字，如果没有这个关键字，在g++中会产生一个编译警告，它的意思是告诉编译器，CallHelper：：Func是一个类型，而不是变量。

如果我们这样来解决，就需要在CallHelper中为每种情况大量定义各种类型的函数指针，还有一种方法，写法比较古怪，考虑一个函数中参数的声明：

void (int n);

首先是类型，然后是变量，而应用于函数指针上：

typedef void (*pfn) ();
void (pfn fn);

事实上，可以将typedef直接在参数表中写出来：

void (void (*pfn)() );

这样，我们的Call函数可以直接这样写：

//针对没有参数的Call函数
template <typename RT>
int Call(RT (*Func) () , lua_State *L, int idx);
{
//调用Func
RT ret = (*Func)();

//将返回值交给lua
Push（L, ret）；

//告诉lua有多少个返回值
return 1;
}

//针对有一个参数的Call
template <typename T, typename P1>
int Call(RT (*Func)(), lua_State *L, int idx)
{
//从lua中取得参数
if (!Match(TypeWrapper<P1>(), L, -1)
return 0;

RT ret = (*Func) (Get(TypeWrapper<P1>(), L, -1));

Push(L, ret);
return 1;
}

按照上面的写法，我们可以提供任意参数个数的Call函数，现在回到最初的时候，我们的函数指针要通过lua_State *L来存储，这只要利用lua提供的api就可以了，还记得我们的lua_pushdirectclosure函数吗：

template <typename Func>
void lua_pushdirectclosure(Func fn, lua_State *L, int nUpvalue)
{
//伪代码，向L存储函数指针
save_pointer(L);

//向lua提供我们的register_proxy函数
lua_pushcclosure(L, register_proxy<Func>, nUpvalue + 1);
}

其中，save_pointer(L)可以这样实现：

void save_pointer(lua_State *L)
{
unsigned char* buffer = (unsigned char*)lua_newuserdata(L, sizeof(func));
memcpy(buffer, &func, sizeof(func));
}


而在register_proxy函数中：

template <typename Func>
int register_proxy(lua_State *L)
{
//伪代码，通过L参数取得这个指针
unsigned char *buffer = get_pointer(L);
//对这个指针做强制类型转化，调用Call函数
return Call(*(Func*)buffer, L, 1);
}
get_pointer函数可以这样实现：

unsigned char* get_pointer(lua_State *L)
{
  return (unsigned char*) lua_touserdata(L, lua_upvalueindex(1));
}

这一点能够有效运作主要依赖于这样一个事实：

我们在lua栈中保存这个指针之后，在没有对栈做任何操作的情况下，又把它从栈中取了出来，所以不会弄乱lua栈中的信息，记住，lua栈中的数据是由用户保证来清空的。

到现在，我们已经可以向lua注册任意个参数的c函数了，只需简单的一行代码：

lua_register_directclosure(L, func)就可以啦。







在你的游戏中应用Lua（3）：Using Lua in cpp(基本数据类型、指针和引用)之一

Using Lua in cpp(基本数据类型、指针和引用)

前面介绍的都是针对cpp中的内建基本数据类型，然而，即使是这样，在面对指针和引用的时候，情况也会变得复杂起来。

使用前面我们已经完成的宏lua_register_directclosure只能注册by value形式的参数的函数，当参数中存在指针和引用的时候（再强调一次，目前只针对基本数据类型）：

1、 如果是一个指针，通常实现函数的意图是以这个指针传递出一个结果来。
2、 如果是一个引用，同上。
3、 如果是一个const指针，通常只有面对char*的时候才使用const，实现函数的意图是，不会改变这个参数的内容。其它情况一般都避免出现使用const指针。
4、 如果是一个const引用，对于基本数据类型来说，一般都避免出现这种情况。

Lua和cpp都允许函数用某种方式返回多个值，对于cpp来说，多个返回值是通过上述的第1和第2种情况返回的，对于lua来说，多个返回值可以直接返回：

--in Lua
function swap(x, y)
tmp = x
x = y
y = tmp

return x, y
end

x = 100
y = 200

x, y = swap(x, y)

print(x..y)

程序输出：200100

同样的，在主机程序中，我们也可以向Lua返回多个值：

int swap(lua_State *L)
{
//取得两个参数
int x = Get(TypeWrapper<int>(), L, -1);
int y = Get(TypeWrapper<int>(), L, -2);

//交换值
int tmp = x;
x = y;
y = tmp;

//向Lua返回值
Push(L, x);
Push(L, y);

  //告诉Lua我们返回了多少个值
return 2;
}

现在我们可以在Lua中这样调用这个函数：

x = 100
y = 200

x, y = swap(x, y)

在我们的register_proxy函数中只能对基本数据类型的by value方式有效，根据我们上面的分析，如果我们能够在编译期知道，对于一个模板参数T：
1、 这是一个基本的数据类型，还是一个用户自定义的数据类型？
2、 这是一个普通的指针，还是一个iterator？
3、 这是一个引用吗？
4、 这是一个const 普通指针吗？
5、 这是一个const 引用吗？

如果我们能知道这些，那么，根据我们上面的分析，我们希望：（只针对基本数据类型）
1、 如果这是一个指针，我们希望把指针所指的内容返回给Lua。
2、 如果这是一个引用，我们希望把引用的指返回给Lua。
3、 如果这是const指针，我们希望将从Lua栈中取得的参数传递
          给调用函数。
4、 如果这是一个const引用，我们也希望把从Lua栈中取得的参
          数传递给调用函数。

作者： 沐枫

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 字符串，如果你愿意的话，字符串是可以包含'\0'字符的
　　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 line\nnext line\n\"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 accessible
-- 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循环做比较合适。

本人做软件多年，一直与软件开发行业的各种级别的软件开发人才打交道，很多时候，

　　还扮演面视考官的角色（很遗憾，本人还没有被面试过）。

　　写下这篇文章，目的是区分各种层次的软件开发人员，也让软件开发人员能够对照自己，看看自己在什么层次。

　　软件开发工作，其实是一种很复杂的工作，需要多方面的技能。我认为，尤其以学习能力和创新能力为主。所以，我以下对软件人才的层次划分，也围绕这两个能力展开。

　　一、门外汉型：几乎没有学习能力，更没有创新能力。比如，买了一本《一步一步跟我学VB编程》之类的书，对照书上写的，把例子程序给做出来了， 还把例子程序的某些窗口标题给修改了一下。然后，就自认为自己可以做软件开发工作了。到处递简历，应聘的职位为软件开发工程师。这类人，以刚毕业的计算机 专业的大学生为多（当然，刚毕业的学生中也有非常高级的人才）。读书期间，就以玩游戏为主，考试的时候，就搞点舞弊过关。

　　二、入门型：该类型的人员（不叫人才，所以叫人员），可能入门某一种到两种开发语言，10年前，我上大学的时候，这类人的典型特点是热衷于 DOS命令的n种用法。比如，dir命令的各种参数。学习过basic语言，知道C语言中printf函数的各种参数的用法，到了2005年，这类人是热 衷于windows下的注册表，热种于在自己的机器上安装各种开发工具（VB,VC,dephi，asp等）。但是，仅仅停留在编译开发工具中自带的几个 例子程序中。（可能还会做点修改）。经过一段时间的学习，可能还自己能够编写个简单的windows应用程序，修改注册表的程序等等。其很多时间还是在玩 游戏，上QQ聊天泡MM，看了一篇如何修改某病毒的文章，一定会对照文章上的说明，把病毒给修改了，然后到处发，以显示自己的能力。当然，很多时候，该类 人即使对照文章的说明，也不能将病毒修改。那就找那些带配置工具的黑客程序去弄吧，比如。BO等就是他们最常用来炫耀的。中国的破解者与初级黑客，绝大部 分是这一类人。懂的不多，还喜欢炫耀（为炫耀目的的破解和修改病毒就是这一类人的最大特点）。该类人员，一般都没有在软件公司从事软件开发工作。

　　三、基本型人才：该类型一般是大学毕业，并且从事软件开发工作超过2年的人为多，至少比较熟悉一门语言（以VB,dephi,java，asp 等其中的一种）。也有少数人熟悉C或者C++，但是如果是C或者C++，一般对指针等概念还是似懂非懂的状态。哦，对了，该类人员可能还会在自己的机器上 安装过linux或者sco unix等。但由于对自己没有信心，大部分人会在半个月之后把linux删除。该类型人才，有一定学习能力。创新能力为零。适合培养成为软件蓝领，如果人 际交往能力还可以的话，可以培养成为一个初级营销人员。该类型的人典型的特点是：你要他做个项目，他首先就会问：用什么语言？（因为用他不熟悉的语言对他 来说，他就没有信心），该类人员，习惯看中文文档，不得以的情况下，才会看英文文档。另外，该类人员，喜欢购买软件开发类的书籍。该类人员，一般在软件公 司从事软件开发工作，待遇在4000元到10000元以下为主。

　　四、熟练工：该类型一般是毕业5年并一直从事软件开发工作，至少熟悉 VB,asp ,熟悉数据库，知道什么叫存储过程，什么叫触发器。知道软件工程管理的基本概念，如果做面象对象开发，可能还会用到Rose等工具。有过20人以下软件项 目管理的经验。对于linux，至少知道是个开源的项目。由于做过比较大的软件项目，项目中带的小兵一般都不具备unix下的开发经验，所以，项目中难免 会出现需要在unix下运行的代码，所以，就自己动手。用c编写过几段Unix下的小程序。学习能力比较强，该类人员，已经习惯看英文文档，有时候看翻译 的别扭的中文文档会觉得不爽。干脆就找英文文档。该类人员，是否喜欢买书不得而知，如果喜欢买书，一般以非软件开发类书籍为主了。在技术选型方面具备一定 的创新能力，至少，你叫他做一个报表程序，他会考虑用Excel的COM对象来实现。国内软件公司中的项目经理，绝大部分是这一类型的人才。待遇一般在 6000到15000元左右。

　　五、聪明型：该类人员的工作经历不重要，可以是还没毕业的学生，也可以是工作了10年的老鸟，1周内（甚至一小时）就熟悉了一门语言，并且可以 开始用该语言开发，该类人员，由于学习能力很强，短时间内就熟悉了许多语言，即使从来没用过该语言，也敢于在该语言上进行软件开发，选择什么样的语言，不 在于学没学过，而在于是否适合解决当前问题。对技术充满好奇与激情，举个例子，如果该类人员接触过linux，马上就会被Linux的魅力所吸引。即使与 自己的工作无关，也会一回家就研究linux，可以肯定的是，该类人员的笔记本电脑上，肯定安装有linux ，并且，linux的启动次数和windows的启动次数一样多甚至更多。如果该类人员接触到了人工智能，至少会编写一个推理机程序来用用。另外，该类型 人才的典型特点是学习能力超强。英语不一定很厉害，但是，不害怕看英文资料。该类型人才，许多并不是计算机专业毕业，可以是学数学的，物理的，音乐的等等 都有可能。我就见过一个学英语的学生属于这种类型。该类型的人才，几乎所有的病毒代码是他们写出来的（不算那些修改病毒代码的人）。爱表现，也是他们的特 点。如果该类人员在读书，那么，他们是软件公司青睐的人才，绝对不会出现简历递出三份还没有人要的情况，一旦进入公司，在半年内，其才能一定会得到公司领 导的认可，并作为重点培养对象。为了留住这样的人才，软件公司一般会每听说有别的公司要挖他的消息就会给他涨工资一次。薪水的增长速度往往令同事红眼。

　　六、技术天才型：该类人才，技术方面一流，如果只从技术方面的学习能力，创新能力来讲，都要超过以上的任何一种类型的人才。上帝造人总是很公平 的，他们在技术方面是天才，往往其他方面几乎白痴，不善与人交往，甚至害怕与人交往。另外，某些东西对他们有致命吸引力，比如，有些人就迷恋自己做一个操 作系统，有些人就迷恋人工智能。该类人员，不写软件则以，一写，肯定是一流的。全球一流。从语言来讲，因为他们几乎不用微软的开发工具做具体的项目，他们 所看的技术资料，全部是英文资料，在网上交流的，全是操英语或者法语的人。即使是中国人，他们也习惯用英语与别人进行技术沟通。该类人才，如果在工作，一 般是在某实验室，或者是在某基金的资助下开展研究，如果在软件公司，一定是主持举世瞩目的软件项目。或者，在自己开的小公司既当CEO又当CTO。由于其 技术的优势明显，即使他不是一个很称职的CEO，也能让这个公司维持下去。

　　七、数学家型：该类型人才，也许根本就不懂具体某种语言的开发（也可以懂），整天就研究算法。建模。一般不属于计算机专业。他们要把自己的成果 变成现实，往往习惯找聪明型或者天才型人才帮他们实现。该类人员，因为不学计算机，所以，无法描述他们在学习技术方面的能力，但是，创新能力绝对一流。该 类人才，没有在软件公司工作的，当然，如果其成果有一定商业价值，他们会成为某软件公司的顾问。或者干脆在某软件公司的实验室中当个主任什么的。

　　八、比尔型：因为比尔的影响力巨大，所以，我们把具有一定软件开发能力，又有很强的商业运作能力的人归到这一类。比尔型人才，学习能力，在聪明 型之上，在技术天才型之下。由于起社会知识面非常广泛，所以，知道什么软件能赚钱，怎么样做能赚钱。该类人写软件的目的只有一个，那就是赚钱，而不会太在 乎采用什么样的技术。他们写软件，会极力迎合用户，迎合市场。

　　对人的划分，有时候是很难的，有的人是跨类型的。但是，缺少创造的人，最多就到达熟练工型，具有超强创造力的人，可以达到技术天才型和数学家 型，如果还有商业头脑，成为比尔型也是可能。最后一句话，如果你连足够的学习能力都没有，那么，就请你离开软件开发行业，另谋出路比较合适。

　　这篇帖子，我首发在共享软件论坛，我认为，如果你不具备超强的学习能力，基本的创新能力和基本的商业能力，那么，就请你尽早不要做共享软件。