LPC基础教程-Lpc程序和编程环境 mudos 加载原理
编程环境
通常我们所见到的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) == 1 member_array(2,a,2) == 2 member_array(4,a) == -1 ARRAY和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 void
my_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:nothing
int: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 things
mixed: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.
*/
float
compute_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";
//栗子
void
my_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 array
copy_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));
}
java新手自学群 626070845
java/springboot/hadoop/JVM 群 4915800
Hadoop/mongodb(搭建/开发/运维)Q群481975850
GOLang Q1群:6848027
GOLang Q2群:450509103
GOLang Q3群:436173132
GOLang Q4群:141984758
GOLang Q5群:215535604
C/C++/QT群 1414577
单片机嵌入式/电子电路入门群群 306312845
MUD/LIB/交流群 391486684
Electron/koa/Nodejs/express 214737701
大前端群vue/js/ts 165150391
操作系统研发群:15375777
汇编/辅助/破解新手群:755783453
大数据 elasticsearch 群 481975850
本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。