| 关于大地图PK死亡传送到另一地图 |
|
| 作者：佚名 文章来源:本站原创 阅读： 更新时间:2007-9-24 2:47:15 |
在中央常pk的地方放置一个npc叫——中央管理员，建议放在500 500的位置。
unit 中央管理员;
interface
function gettoken (astr, atoken, asep : string) : string;
function comparestr (astr1, astr2 : string) : boolean;
function callfunc (atext: string): string;
procedure print (atext: string);
function random (ascope: integer): integer;
function length (atext: string): integer;
procedure inc (aint: integer);
procedure dec (aint: integer);
function strtoint (astr: string): integer;
function inttostr (aint: integer): string;
procedure exit;
procedure onchangestate (astr : string);
implementation
//下面是当玩家状态改变时，也就是检测到玩家死亡了。
procedure onchangestate (astr : string);
var str, name : string;
begin if astr <> 'die' then exit;
str := callfunc ('getsenderrace');
//这里是检测死亡的是不是玩家
if str <> '1' then exit;
//下面这一段和普通传送有点不同，这个是利用本地图的npc传送的，如果本地图没有中央管理员，那么这段就无效了。
name := callfunc ('getsendername');
str := 'movespacebyname ' + name;
str := str + ' user 6 84 81 中央管理员 npc 300';
print (str);
end;
end. |
| 【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
| 文章录入：黑鹰 责任编辑：ceo |
|
| 版权声明：严禁商业网站和媒体未经授权对本站内容进行转载、摘编、复制或建立镜像；非商业网站转载本站文章必须标注原作者和“转载自无忧网络网游技术网”字样。文章版权属原作者所有。 |
|
|
|
|
设为首页 加入收藏 
网站地图 