编程环境

      通常我们所见到的Mud大多是LpMud。LpMuds使用Unix的指令和文件结构。如果你对Unix有所了解，那么LpMud中的一些指令和它的文件结构与普通的Unix基本一样。如果你从未使用过Unix，那么它与Dos不同的是在文件的路径用"/"，而不是Dos的"/".一个典型的LpMud的文件是这样的: /clone/player/player.c 其中"/clone/player/"是路径，player.c是文件名。

      在多数的LpMud中，下面这些的基本的Unix指令是可以使用的：  

pwd: 显示当前目录

cd: 改换你当前的工作目录，和Dos的cd一样。

ls: 列出指定目录下的所有文件，如果没有指定任何目录，那就列出当前目录底

下的文件。和Dos的dir一样。

rm: 删除一个文件 和Dos的rmdir一样

mv: 从命名一个文件 和Dos的move一样

cp: 复制一个文件 和Dos的copy一样

mkdir: 创建一个目录

LPC入门　　LPC就是我们用来写MUD的语言啦，它的语法和C 基本一样。它独特之处在于有简单的 OOP特性(简单但很有用:PP)，还有一个C里面没有的HASH表的类型：MAPPING LPC和C还有一个不同是其主函数是CREATE()而不是MAIN()。create()别写错哦:PP 　　LPC里面主要的(也是写MUD所足够的)数据类型有int,string,mapping,object,mixed。下面主要讲一下这些类型了。　　因为整数类型对于写MUD已经足够，所以不用FLOAT了。同样的，因为我们的 汉字是双字节的，所以CHAR类型其实也没用，只需要STRING 类型就可以了。　　STRING的定义，这里要提一下：string常量的赋值，假如是常量的话可以只用 “连接”的办法代替string，例如: string str = "我" "们" ;那么结果是str == "我们" 同样的str = "我" "们";也是一样，空格与换行在LPC编译时是被忽略的，所以我们 写MUD的时侯不仿多些TAB和换行，这样程序容易看些。　　当然，除了直接连接之外还可以用 + 连接。在有变量的时侯就要用了。例如： string str0 = "我们";string str1 = "和"+str0+"大家"; 结果是str1 == "和我们大家 mixed是一个比较特别的类型。mixed 类型的变量可以赋任何其他类型的值。 这在未知变量类型的时侯非常有用。不过一般情况下很少会用到mixed。LPC里面没有“指针”的概念。在变量名前面加 * 的定义表示数组。如int *a 表示a 是整数数组。一般来说我们定义数组时是未知其大小的。所以定义时不用象 C 那样给定大小。数组和MAPPING有些类似，所以将在下面和MAPPING一起讲它们 的操作。　　LPC里面没有“指针”的概念。在变量名前面加 * 的定义表示数组。如int *a 表示a 是整数数组。一般来说我们定义数组时是未知其大小的。所以定义时不用象 C 那样给定大小。数组和MAPPING有些类似，所以将在下面和MAPPING一起讲它们 的操作。　　object, 是OOP概念了，在LPC里面好象有CREATE()的都可以做object 类型变量 了。object 我们称为“对象”，在MUD里就是一件物品，一个房间或任何一个“具 体”的东西，都是OBJECT。“对象”，在OOP中是一些数据与基于这些数据的函数的 集合（好象文诌诌的？ :PP）嗯，object 中的数据一般不能直接操作（至少在LPC 里面不能的 :PP），所以对object的操作只有赋值（对object类型的赋直 ）和执行object的函数( private函数不能被外部调用 )。函数调? 式：eg. object ob;ob-$#@62;test(1,2);基本格式： object类型变量名-$#@62;函数名(函数参数列);其中若该object 中未定义该函数名的函数则返回 0 值（呵呵，不会有出错信息的哦， 所以千万别写错名字了）。　　写了这么多终于写到LPC 最有特色的两个类型了，mapping和数组。mapping和数组在“外观”上有些类似，所以在一起写了。前面提到过：mapping是 散列表，具体如何这里不详述了，只希望大家一定要记住mapping的格式！！( 实际 上这格式只在给变量赋初值时用到 )mapping 格式如下：eg. mapping a = ([ "ab" : 1 ,"cd": 2 ,])标准格式：mapping 变量名 = ([key1 : value1 ,key2 : value2 ,....................]);　　其中key可以是除了int以外的任何值！！ (好象char也不行吧 :P )，包括任何数组 甚至mapping也可以做key ,而value则可以是任意所有值。mapping的应用在于： 可以用key来index得到相应的value值。如上面eg的，我们有：a["cd"] == 2,....　　因为要用key来index的关系，在mapping中key值不能相等，若相等则覆盖掉原来该key对应的value。写的有些乱了，SORRY :P　　那么一个mapping怎么改变它的值呢？有两个方法(下面设mapping map )。1. map[key] = value;2. map += ([key : value ]);请大家留意第二种赋值方法，它跟我们将要提到的数组的方法一样的 。在mapping中“删除”一个key （其相应value当然也没了）方法是：map_delete(map,key);lpc里面的系统函数(efun)的命名一般按参数顺序来取名（ map_delete的参数就是map在前，被delete的key在后的 ），希望大家注意。另外mapping的efun还有values,keys,undefinedp　　大家可以直接在MUD里 help efunname 来看帮助，也可以参阅 /doc/lpc/types/mapping这一文件数组：即ARRAY，前面说过，LPC中的数组只要在类型后面加 * 就可以了一般来说数组不用预先定大小但若有需要可以用allocate(size)来固定大小。如：a = allocate(10);在固定了SIZE之后好处是可以任意用下标定位来对数组元素操作。我的习惯是不用固定SIZE的数组，因为那样更自由些。数组的操作在LPC里是相当强的。最常见的是 +, - 操作，也是最useful的。+就是通常的“连接”操作，-是集合的“差”操作，如果没有这两个概念请看下面例子：a == ({ 1,2,2,3, })则a + ({2,3,4}) == ({ 1,2,2,3,2,3,4})a - ({ 2,1}) == ({3})请注意 - 的时候会把所有相同的元素都消掉的.结合上面例子可以知道ARRAY常量的表示方法了，就是 ({元素,元素,....})当然这只是一维数组（事实上我们用一维数组就足够了，我想）在对数组的元素改变的时候，一般可以用直接赋值，如a[3] = 2;在对数组的元素改变的时候，一般可以用直接赋值，如a[3] = 2;如何删除一个元素？假如你确定该元素的值唯一的话可以用 - ({元素值 })但要是有同值元素的话就会把它也删掉了，那不是我们所要的。一般常用的方法是把该元素赋一个“不可能值”，或者说“无用值”，然后再用 - 把该元素删除掉，比如说我们确定数组内所有元素都为正，则我们可把那个元素赋值为0然后把数组 -= ({0})关于array的一个很有用的函数是member_array用法是 member_array(元素值，数组，起始下标（可选） ）;函数返回数组中从下标开始第一个元素值为所搜索值的元素下标。若无则返回-1;嗯，LPC的数组是跟C一样的，下标从0开始到size-1 ，请注意。member_array的参数中起始下标一般可缺省。eg: a = ({1,2,2,3})则 member_array(2,a) == 1member_array(2,a,2) == 2member_array(4,a) == -1ARRAY和MAPPING可以说是LPC里面最有用和最直接用的结构了。再加上两个功能强大的函数：filter_array 和filter_mapping。我们有了filter就可以实现对ARRAY，MAPPING里各元素的过滤操作。这样一来我们就可以实现数据库的操作了，这样我们的LPC程序所拥有的功能是非常强大了最后说一下多维数组的定义方法。多维数组一般各维SIZE固定的，有两种方法定义：eg1:定义多维数组变量a = allocate(10);a[0] = allocate(10);a[1] = allocate(10);...etc...也就定义了a [10][10]eg2:用mixed 类型 = 多维数组常量mixed a;a = ({ ({ 1, 2, 3 }), ({ 1, 2, 3 }) });

rmdir: 删除一个目录

more: 按页显示一个文件在你的当前屏幕。

cat: 显示整个文件。和Dos的type一样。

tail: 显示一个文件的结尾几行。

ed: 允许你使用Mud自带的编辑器，编辑一个文件。

Lpc程序

      Lpc的程序看起来和一般的C区别不断大，语法基本一样，但是Lpc和一般的语言有着根本的不同，Lpc程序是编写一个一个的"Object"。这有什么区别呢？一般的程序是在执行过程中，通常有一个明显的开始和和结束。程序从一个地方开始，然后顺序执行下去，到了结束的地方就中断了。Lpc的Object不是这样的。所谓的不同的Mud，实际上是一些不同的Lpc的Object在一个Driver的上的各种不同的表现。也就说，Lpc的Object是运行在一个Driver上的。这些Object组成了LpMud的丰富多彩的世界。Driver几乎不参与创建你所接触到的世界，它所完成的工作只是让那些Lpc的Object活动起来。Lpc的Object可能没有明显的开始和结束的标志，它可能永远在工作。

和一般的程序一样，Lpc“程序”也是由一个或多个文件组成。一个Lpc的Object是按如下方式被执行的：Driver把和这个Object相关的文件读入内存，然后解释执行。但是要记住的是，读入内存，并不是说，它就开始按顺序执行。

Driver和Mudlib关系

在有些游戏中，整个游戏包括Driver和游戏世界都用C写好，这样能快一些，但是游戏的扩充性很差，巫师们不可能在游戏进行中添加任何东西。LpMud则相反。Driver理论上应该和玩家所接触的世界几乎没有任何直接的联系。游戏世界应该是自己独立的，而且是“即玩即加”的。这就是为什么LpMud使用Lpc作为编程语言的原因。它允许你创建一个游戏世界，再由Driver在需要时读入解释执行。Lpc甚至比C更简单，更容易明白，但是它可以创建一个可以让许多人在上面游戏的世界。在你写完一个Lpc的文件时，它存在于主机的硬盘上。在游戏进行中，当需要整个Object时，这份文件将被调入内存，一个特殊的函数被调用来初始化这个Object的一些变量。现在你不用关心什么是变量，什么是函数以及游戏本身怎样来调用这个object，你只要记住Driver从硬盘中读入一个文件，然后放在内存中，如果没有任何错误的话。

Object载入内存

      一个Object不会也不必有一个特点的地方让Driver去执行它，通常Drvier会在Object中找一个地方去初始化它。一般都是这个函数叫做create()。Lpc的Object是一些变量(它的值能变化)和函数(函数通常是用来操纵那些变量的一段程序)的组合。函数操纵变量的方式有：调用其他函数，使用Driver内部定义的函数(efun)，基本的Lpc表达式以及流控制。我们来看个变量的例子: wiz_level。这个变量记录你的巫师等级，如果是0呢，通常是普普通通的玩家了。这个值如果越大就表示你的巫师等级越高。这个也同时控制了你能不能执行一些巫师指令。基本上来说，一个Object就是一些变量“堆”在一起的东西。一个Object改变了，也就是某一个或者一些变量改变了。总的来说，一个Object如果要被内存中的另一个Object调用，Driver会去找这个Object的那堆变量放在哪里，如果这些变量没有值，那么Driver会调用一个特定的函数create来初始化这些变量。但是create()不是Lpc代码开始执行的地方，只是大多数的Object从这里开始。事实上，create()可以不存在。如果这个Object不需要对变量初始化，那么create()可以不存在。那么这样的Object开始执行的地方就完全的不同于一般的Object，可以从任何地方开始。那么究竟什么是Lpc的Object？Lpc的Object就是一堆变量的集合，它带有一个或者更多的函数来操纵控制这些变量，函数的排列顺序是无所谓的，随便那个排在前面对这个Object的特性没有影响。

小结

关于Lpc程序和编程环境，就介绍到这里。看完这一章，我想大家要记住的是LpMud是采用Lpc做为编程语言， Unix文件结构作为文件组织形式。Lpc是编写Object的一种语言，它的程序没有特殊的开始和结束的标志。如果Object被使用到，那么它被调入内存，如果这个Object有一个叫create()的函数，首先被执行，来初始化一些变量。Lpc的Object是一堆变量的集合，同时带有一些能操纵改变这些变量的函数。Lpc的代码风格，我想一个Mud最好有一个统一的风格，特别的XO有自己的特别的要求。

LPC Tutorial

从lpc-tutorial下载tutorial，通过阅读教程来学习LPC。

关于LPC

LPC被发明出来是一个用于LPMUD的解释性语言。LPMUD其实就是一个游戏服务器，那么就很清楚了LPC是一个用来写游戏服务器的脚本语言。

LPC这个名字暗示了和C语言的联系。当然两者之间是有区别的，后面会渐次展开来讲。

LPC游戏解析

一个LPC游戏可以划分为三个部分：游戏驱动、mudlib、domain code。

游戏驱动：运行于主机上的程序。基本的对象管理核心和解释器。它被用来理解LPC语言并执行这些指令。

mudlib：LPC对象的集合。其中包含了基本的游戏环境。mulib里面的对象是最基本的游戏元素，比如玩家、怪物、房子等等。

domain code：???

语法入门

啥都别说了，看代码。

while语句while (test)     statement;if语句if (this){    statement;}else if (that){    another_statement;}else{    default_statement;}定义变量int a, b, c;for循环：for (a = 0; a < 10; a++){    b = function_call(a, b * 2);    c = b * 3 / 4;}空语句循环：while (!(var = func(var)))    ;for循环:for (i = 0; i < 100; i++);{    <code that gets executed only once, but always>}定义方法：public voidmy_function(int a, int b){    < code >}文件头注释：/* * <filename> * * <Short description of what the file does, no more than 5-7 lines. * ... * ... > *  * Copyright (C): <your name and year> * */函数注释：    /*  *  * * Arguments:     <A list of all arguments, one per line *                 arg1 - description no longer than the line. *                 arg2 - next argument, etc. > * Returns:       <What the function returns> */

LPC基本语言概念

LPC不是编译型的，而是解释型的语言。

每次运行都被会重新解释为机器语言。

其实这意味我们写的是一种间接语言，通过特定的解释器执行特定的机器语言。

LPC语言的文件都是以.c为后缀的。文件名全部小写，如果文件里面含有多个单词，用下划线_把单词隔开。

LPC基本语法

注释

// This is a comment stretching to the end of the line./* This is an enclosed comment */

数据类型

void:nothingint:the range -2147483648 to 2147483647.float:range 1.17549435e-38 to 3.40282347e+38. string:such as "hallo world!"mapping:key value pair.object:references to LPC programs loaded into memory.function:LPC functions.array:all of thingsmixed:all of type

变量声明

    int        counter;    float      height, weight;    mapping    age_map;    int        counter = 8;    float      height = 3.0, weight = 1.2;    mapping    age_map = ([]);    object     *monsters = ({});

基本上语法和pike是差不多的，如果还没入门最好先去看看pike。pike学习笔记

如果没有为变量赋初值，那么变量会被赋值为0，相当于其他语言的null，一般来说都不是我们希望看到的，所以哪怕赋值为空都好过没有。

方法声明

/* * Compute the diameter of a circle given the circumference. * * Variables:     surf_area - the surface area *                name - the name given the circle * Returns:       The circumference. */floatcompute_diam(float surf_area, string name){    float rval;    // Circumference = pie * diameter    rval = surf_area / 3.141592643;    write("The diameter of " + name + " is " + ftoa(rval) + "\n");    return rval;}

基本上对照上面的例子就知道怎么去声明和定义一个方法了。

语句和表达式

就是一些算数、布尔、条件、比较操作符。跟pike差不多，不赘述了。

比较特别的是：
The statement ‘a = 1, 2, 3;‘ will set ‘a‘ to contain ‘1‘.

一般我们写if语句都这样写：

if (name == "fatty"){    nat = "se";    desc = "blimp";}else if (name == "plugh"){    nat = "no";    desc = "warlock";}else if (name == "olorin"){    nat = "de";    desc = "bloodshot";}else{    nat = "x";    desc = "unknown";}

更好的选择其实是使用switch语句：

switch (name){case "fatty":    nat = "se";    desc = "blimp";    break;case "plugh":    nat = "no";    desc = "warlock";    break;case "olorin":    nat = "de";    desc = "bloodshot";    break;default:    nat = "x";    desc = "unknown";}

省了很多括号，而且更加清晰明了。

多用三元符号代替if-else语句：

int max(int a, int b){    if(a > b)        return a;    else        return b;}int max(int a, int b){    a > b ? a:b;}

优先级可以去查表：lpc优先级查找

普通的循环语句就不再赘述了。

array

可以通过下面的方式声明array:

    int *my_arr, *your_arr;    float *another_arr;    object *ob_arr;    my_arr = ({})

虽然我觉得这种方式不太好。

可以声明一个固定大小的array：

you_arr = allocate(3);  // => your_arr = ({ 0, 0, 0 });

此外，如何想要在array后面或者前面添加元素，可以这样：

int a = 3;int *b = ({1,2});b = b + ({a});

甚至还能切片,切片始终返回一个array：

my_arr = ({ 9, 3, 5, 10, 3 });my_arr = my_arr[0..0] + my_arr[2..4]; // => ({ 9, 5, 10, 3 })

mapping

mapping就是键值对序列。

声明一个mapping：

mapping my_map;

使用mapping的方法和pike一致。

比较特别的是，如果想删除mapping内的数据，可以用这个:

my_map = m_delete(my_map, "bertil");my_map = m_delete(my_map, "david");

此外，如果查找一个不存在的键值对，不会报错，而是返回0.

预处理

预处理并不属于LPC语言的一部分。在编译为可执行程序之前，预处理会将替换好所有的特定字符串。

导入源文件

当我们需要一些其他源代码文件提供的函数时，我们可以通过下面的方式来导入：

#include <standard_file>#include "special_file"#include <stdproperties.h>#include <adverbs.h>#include "/d/Genesis/login/login.h"#include "my_defs.h"#include "/sys/adverbs.h"    // Same as the shorter one above

基本上和C语言导入源文件是一样的。

宏定义

偶尔我们会需要用字符串来代替数字或者表达式，比如说：

#define MAX_LOGIN  100          /* Max logged on players */#define LOGIN_OB   "/std/login" /* The login object      */#define GREET_TEXT "Welcome!"   /* The login message     */

一般来说，不建议写宏。因为宏是无类型的，而且会在异常时无法确定到底是哪个地方出了问题。建议使用常量来代替宏，记得宏之所以还存在完全是为了向下兼容。

#if, #ifdef, #ifndef, #else and #elseif

直接看代码吧：

#if CODE_VAR == 2    <code that will be kept only if CODE_VAR == 2>#else    <code that will be kept only if CODE_VAR != 2>#endif#define CODE_VAR    /* This defines the existence of CODE_VAR */#ifdef CODE_VAR    <code that will be kept only if CODE_VAR is defined>#else    <code that will be kept only if CODE_VAR isn‘t defined>#endif#ifndef CODE_VAR    <code that will be kept only if CODE_VAR isn‘t defined>#else    <code that will be kept only if CODE_VAR is defined>#endif

感觉用这些有硬编码的感觉，会增加理解代码的难度，所以不推荐使用。

进阶篇

打印

1、write：自然不用在赘述了，相当于printf。
2、dump_array:打印一个array所有值，调试的时候挺有用的。注意，pike里没有这个函数。

函数调用

各种外部函数调用方式：

    pie = math_ob->compute_pie(1.0);    pie = "/d/Mydom/thewiz/math_ob"->compute_pie(1.0);    pie = call_other(math_ob, "compute_pie", 1.0);    pie = call_other("/d/Mydom/thewiz/math_ob", "compute_pie", 1.0);

虽然后面三种也能调用函数，但是这种代码的可读性太低了，完全应该忘掉。

再来看看实际应用时的情况：

    object *people, *names;    mapping hp_map;    // Get a list of all players.    people = users();    // Get their names.    names = people->query_real_name();    // Make a mapping to call with. Item = name:pointer    hp_map = mkmapping(names, people)    // Replace the pointers with hit point values.    hp_map = hp_map->query_hp();    // All this could also have been done simpler as:    hp_map = mkmapping(users()->query_real_name(), users()->query_hp());

如何继承一个对象类？

inherit "<file path>";// 比如说inherit "/std/door";inherit "/std/room.c";//栗子voidmy_func(){    /*      * This function exists in the parent, and I need to     * call it from here.     */    ::my_func();        // Call my_func() in the parent.}

检测变量类型

由于变量可能是0或者任意类型的东西，往往需要自己对变量做类型检查。

@bullet{int intp(mixed)}Test if given value is an integer@bullet{int floatp(mixed)}Test if given value is a float@bullet{functionp(mixed)}Test if given value is a function pointer@bullet{int stringp(mixed)}Test if given value is a string@bullet{int objectp(mixed)}Test if given value is an object pointer@bullet{int mappingp(mixed)}Test if given value is a mapping@bullet{int pointerp(mixed)}Test if given value is an array

类型限定符

static 变量：静态的全局变量，声明一次之后一直存在

static 函数：只能内部访问，外部是不可见的

private 变量或函数：不被继承，只能对象内部访问

normal 变量或函数：can not be mask?

public 变量或函数:默认的限定符，任何成员都可访问内部对象

varargs 函数：可变参数数量的，按顺序对参数赋值，如果没有则默认赋值为0。

函数类型

函数也可以作为一个变量。

function my_func, *func_array;my_func = allocate;my_func = &allocate();int *i_arr;i_arr = allocate(5);  // Is the same as...i_arr = my_func(5);   // ... using the function assignment above.

通过这种方式给函数重命名。

switch case

LPC的switch case支持int范围：

  switch (i)    {    case 0..4:        write("Try again, sucker!\n");        break;    case 5..6:        write("Congrats, third prize!\n");        break;    case 7..8:        write("Yes! Second prize!\n");        break;    case 9:        write("WOOOOPS! You did it!\n");        break;    default:        write("Someone has tinkered with the wheel... Call 911!\n");        break;    }

catch throw

LPC和普通语言的try-catch方式捕获异常是不一样的：

int catch(function)e.g.    //0-fail 1-true    if (catch(tail("/d/Relic/fatty/hidden_donut_map")))    {        write("Sorry, not possible to read that file.\n");        return;    }throw(mixed info)e.g.    if (test < 5)        throw("The variable ‘test‘ is less than 5\n");

mapping、array 引用

LPC的mapping、array与pike一样是引用类型：

object *arr, *copy_arr;arr = ({ 1, 2, 3, 4 });    // An arraycopy_arr = arr;              // Assume (wrongly) that a copy_arr becomes                             // a copy of arr.// Change the first value (1) into 5.copy_arr[0] = 5;//如果想要一份拷贝怎么做？copy_arr = ({ }) + arr;

LPC/Mudlib接口

感觉到这里就是要开始学习如何实际使用LPC来编程了。前面的都只是基本的语法知识。

首先介绍：/std/object.c。游戏里所有的对象都会继承这个基本类型。

其他类型有：

`/std/armour.c‘Armour of any kind`/std/board.c‘Bulletin boards`/std/book.c‘A book with pages you can open, turn and read`/std/coins.c‘The base of all kinds of money`/std/container.c‘Any object that can contain another`/std/corpse.c‘Corpse of dead monsters/players/npcs`/std/creature.c‘Simple living creatures, basically a mobile that can fight`/std/domain_link.c‘Use this as a base to preload things in domains`/std/door.c‘A door that connects two rooms`/std/drink.c‘Any type of drink`/std/food.c‘Any type of food`/std/guild (directory)‘Guild related objects (the guild and the shadows)`/std/heap.c‘Any kind of object that can be put in heaps`/std/herb.c‘Herbs`/std/key.c‘Keys for doors`/std/leftover.c‘Remains from decayed corpses`/std/living.c‘Living objects`/std/mobile.c‘Mobile living objects`/std/monster.c‘Monsters of any kind`/std/npc.c‘A creature which can use ‘tools‘, i.e. weapons.`/std/object.c‘The base object class`/std/poison_effect.c‘Handle effects in poison of any kind`/std/potion.c‘Potions`/std/receptacle.c‘Any kind of closable/lockable container`/std/resistance.c‘Handle resistance against various kinds of things`/std/room.c‘Any kind of room`/std/rope.c‘Rope objects`/std/scroll.c‘Scrolls`/std/shadow.c‘Used as base when creating shadows`/std/spells.c‘Spell objects, tomes etc`/std/torch.c‘Torches/lamps etc`/std/weapon.c‘Any kind of weapons

对象的使用

一个对象总是能够得到自己的引用：

ob = this_object()

这个就类似于C++的this指针。

对象的函数能够往前去查找调用此函数的对象(好神奇的感觉)：

p_ob = previous_object();     // The object calling this function.pp_ob = previous_object(-2);  // The object calling the object                                  // calling this function.

甚至还能往前找指定层数的对象。

不过这个函数只能去找外部调用，如果我们想要更牛掰的话，用这个：

object calling_object(void|int step)

用法是一样的，但是能够找内部也能找外部。

怎么去判断找到的是一个合法的东西呢？（不是一个0）用objectp(something)就好了：

    if (objectp(calling_object(-2)))        write("Yes, an ob calling an ob calling this object exists!\n");    else        write("No such luck.\n");

函数类型

在LPC里面，函数function也是一种对象，或者说变量类型。

可以像这样定义一个函数指针：

function f = (: local_func :);

上面的 f　 可以用于其他程序流程或外部函数中, 如同普通的变量值:

foo(f);　 map_array( ({ 1, 2 }), f);

或者可以直接执行：

x = evaluate(f, "hi");等同于：x = local_func("hi");

甚至于，定义函数指针时还能指定参数：

function f = (: write, "Hello, world!\n" :); evaluate(f); 显然，会输出：Hello, world!

如果想要调用外部对象的函数：

f = (: this_player(), ({ "query", "short" }) :)等同于：f = (: call_other, this_player(), "query", "short" :)　　　　　　　 /* 一个外部函数指针, 使用 call_other */ f = (: this_player()->query("short") :)　　　　　　　 // 有效的运算式; 请见下文.

特殊的，运算式函数指针：

evaluate( (: $1 + $2 :), 3, 4)　　　　　　　 // 返回 7.这可以用于 sort_array, 范例如下: top_ten = sort_array( player_list,(: $2->query_level() - $1->query_level :) )[0..9];

不知名函数(函数内部的函数)：

void create() { function f = function(int x) { int y; switch(x) { case 1: y = 3; case 2: y = 5;} return y - 2;　　　 }; printf("%i %i %i\n", (*f)(1), (*f)(2), (*f)(3));}

LPC基础教程-Lpc程序和编程环境 mudos 加载原理